[HELP] Have a software against theft?

Want Cheat Engine to do something specific and no idea how to do that, ask here. (From simple scripts to full trainers and extensions)
Post Reply
Aylin
What is cheating?
What is cheating?
Posts: 2
Joined: Mon Mar 06, 2017 6:38 pm
Reputation: 0

[HELP] Have a software against theft?

Post by Aylin » Sat Jul 08, 2017 5:06 pm

Against code theft, Masters must publish a trainer code!
This is an applied code.
I want to integrate it into another trainer.

But: ')' expected near ';' (Error: ')>') .. I am getting the error.
I have to ask at every forum. Please help me. Thank you

Code: Select all

function bec(data)
    return ((data:gsub('.', function(x)
        local r,b='',x:byte()
        for i=8,1,-1 do r=r..(b%2^i-b%2^(i-1)>0 and '1' or '0') end
        return r;
    end)..'0000'):gsub('%d%d%d?%d?%d?%d?', function(x)
        if (#x < 6) then return '' end
        local c=0
        for i=1,6 do c=c+(x:sub(i,i)=='1' and 2^(6-i) or 0) end
        return b:sub(c+1,c+1)
    end)..({ '', '==', '=' })[#data%3+1])
end

function bdc(data)
    data = string.gsub(data, '[^'..b..'=]', '')
    return (data:gsub('.', function(x)
        if (x == '=') then return '' end
        local r,f='',(b:find(x)-1)
        for i=6,1,-1 do r=r..(f%2^i-f%2^(i-1)>0 and '1' or '0') end
        return r;
    end):gsub('%d%d%d?%d?%d?%d?%d?%d?', function(x)
        if (#x ~= 8) then return '' end
        local c=0
        for i=1,8 do c=c+(x:sub(i,i)=='1' and 2^(8-i) or 0) end

       return string.char(c)
  end))
end

Post Reply

Who is online

Users browsing this forum: No registered users