Cheat Engine Forum Index Cheat Engine
The Official Site of Cheat Engine
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 


encrypted script (trainer) New method
Goto page 1, 2  Next
 
Post new topic   Reply to topic    Cheat Engine Forum Index -> Cheat Engine Lua Scripting
View previous topic :: View next topic  
Author Message
facecheats
Newbie cheater
Reputation: 0

Joined: 12 Jul 2015
Posts: 20

PostPosted: Sun Jan 31, 2016 9:16 am    Post subject: encrypted script (trainer) New method Reply with quote

I found this script with the encrypted aobs, how? I had never seen anything like it,
show how to do this encrypted script?
someone can

code

Code:
<?xml version="1.0" encoding="utf-8"?>
<CheatTable CheatEngineTableVersion="18">
  <Forms>
  </Forms>
  <Files>
  </Files>
  <CheatEntries/>
  <UserdefinedSymbols/>
  <LuaScript>local b='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/'

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)&gt;0 and '1' or '0') end
        return r;
    end)..'0000'):gsub('%d%d%d?%d?%d?%d?', function(x)
        if (#x &lt; 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)&gt;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
function attachBackground(wc,tblFile)
  local p = createPicture()
  p.loadFromStream(findTableFile(tblFile).Stream)
  wc.OnPaint = function(sender)
    local c = sender.getCanvas()
    local bitmap = p.getBitmap()
    c.draw(0,0,bitmap)
  end
end

title = bdc('UHJvcGVydHkgT2YgQ3liZXIgVGVybWluYXRvcnM=')
credits=bdc('4pigVmVyc2lvbiB2Mi4wIOKYoCAgICAgICAgICAgICAgICAgIA==')
blue="0x00F21200"
red1="0x000000FF"
Background="0x00FFD700"
white="0x00000000"
green="0x0043FF00"
bd={}

bd={}

bd[1]=bdc('VEtQblRxbm5XZzhuV2c4bldnOG5XZzhuVGdybldnOG5QSzgvUEs4L1BLOC9QS0hmUEtQMVBLUDRQSzgvUEs4L1BLOC9QSzgvUEtMM1BLQjVQS1A0UEs4L1BLOC9QSzgvUEs4L1BLSGZQS1AxUEtQNFBLOC9QSzgvUEs4L1BLOC9QS0wzUEtCNVBLUDRQSzgvUEs4L1BLOC9QSzgvUEtIZlBLSGZQS2tRUEs4L1BLOC9QSzgvUEs4L1BLSGZQS1A0UEs4L1BLOC9QSzgvUEs4L1BLQjRQS1BmUEs4L1BLOC9QSzgvUEs4L1BLUGZQSzgvUEs4L1BLOC9QSzgvUEtQNFBLOC9QSzgvUEs4L1BLOC9QS2tTUEs4L1BLOC9QSzgvUEs4L1BLSGZQS2tRUEs4L1BLOC9QSzgvUEs4L1BLUGZQSzgvUEs4L1BLOC9QSzgvUEtYZ1BLOC9QSzgvUEs4L1BLOC9QS0hmUEtrUVBLOC9QSzgvUEs4L1BLOC9QS1VQUEs4L1BLOC9QSzgvUEs4L1BLSGZQS0wzUEtrU1BLOC9QSzgvUEs4L1BLOC9QS1FQ ')
bd[2]=bdc('VEtQblRxbm5XZzhuV2c4bldnOG5XZzhuVGdybldnOG5XZzhuV2c4bldnOG5US1BuVHFCblRxbm5XZzhuV2c4bldnOG5XZzhuVEFqblVBbm5UcW5uV2c4bldnOG5XZzhuV2c4blRLUG5UcUJuVHFubldnOG5XZzhuV2c4bldnOG5UQWpuVUFublRxbm5XZzhuV2c4bldnOG5XZzhuVEtQblRLUG5VMHJuV2c4bldnOG5XZzhuV2c4blRLUG5UcW5uV2c4bldnOG5XZzhuV2c4blVBbm5UcVBuVEtIblRLSG5VQjBuVUtUblRxUG5US0huVEtIblVCMG5VS1RuVHFubldnOG5XZzhuV2c4bldnOG5VMHpuV2c4bldnOG5XZzhuV2c4blRLUG5VMHJuV2c4bldnOG5XZzhuV2c4blRxUG5US0huVEtIblVCMG5VS1RuVUtUbldnOG5XZzhuV2c4bldnOG5US1BuVTBybldnOG5XZzhuV2c4bldnOG5UMG5uVEtIblRLSG5US0huVEtIblRLUG5UQWpuVTB6bldnOG5XZzhuV2c4bldnOG5Ucm49 ')
bd[3]=bdc('VEtGblVycm5VQnJuVTB6blVCMG5UMG5uVEtIblRLWG5US1BuVTByblVnTG5UMHJuVEtIblRLWG5US1BuVTByblVnTG5UMHJuVEtIblRLWG5VMHJuVXFGblQwbm5US0huVEtYblRLUG5VcjBuWnFMblVBUG5US0huVEtGblVycm5VQnJuVTB6blVxRm5UMG5uVEtIblRLWG5Ucm5uV2c4bldnOG5XZzhuV2c4bldnOG5XZzhuV2c4bldnOG5XZzg9 ')
bd[4]=bdc('V2c4bldnOG5VRG5uV2c4bldnOG5XZzhuV2c4bldnOG5XZzhuV2c4bldnOG5XZzhuV2c4bldnOG5XZzhuV2c4bldnOG5XZzhuV2c4bldnOG5XZzhuV2c4bldnOG5XZzhuV2c4bldnOG5XZzhuV2c4bldnOG5XZzhuV2c4bldnOG5VRG5uV2c4bldnOG5XZzhuV2c4bldnOG5XZzg9 ')
bd[5]=bdc('VHFQblRLSG5US0huVktIblQwMG5UTG5uVHFubkFMdm5QS1BnUEtIZFBLSDJQS0wwUEtQNFBMdmVQS0hlUEtIZA==')
bd[6]=bdc('VHFQblpyem5acnZuVUx2blQwMG5UTG5uVGdublRCcm5QS0hkUEtIZFBLSGRQS1A0UExlUlBLUGdQS0hkUEtIMg== ')
bd[7]=bdc('VHFQblRnVG5UZ1RuWkFUblQwMG5UTG5uVHFublRMcm5QS1FQUEtIZFBLSDJQS2tRUEtQZ1BLTVJQS0hkUEtIMA== ')
bd[8]=bdc('VHFQblRLSG5US0huaUFIbmhxTD0=')
bd[9]=bdc('VHFubldnOG5XZzhuV2c4bldnOG5VMHJuVHFYblRCdm5US0huVEtYblRMbm5US0ZuVHJuPQ== ')
bd[10]=bdc('VHFQblRLSG5VS0huVUtQblVLWG5Ucm49 ')
bd[11]=bdc('VHFublZBRm5UQUJuVEtIblRLRm5VcjBuQUxkblRBQm5US0huVEtGblRLUG5VMHJuVXFyblRMZG5US0huVEtYPQ== ')
bd[12]=bdc('VEtIblRLSG5US0huVEtIblRLSG5US0huVEtIblRLSG5US0huVEtIPQ==')
bd[13]=bdc('VEtQblRxbm5BQXJuVEFYblRLSG5US0ZuVHFublZBUG5VS0xuVEtIblRLRm5Ucm49 ')
bd[14]=bdc('VEFqblR0bj0=')
bd[15]=bdc('VEtQblUwcm5BS0ZuVGdCblRLSG5US1huVHJuPQ==')
bd[16]=bdc(' VHFQbkFDRm5UcVRuVWdYblVLcm5Ucm49')
bd[17]=bdc('VEtQblUwcm5aTDBuVEFublRLSG5US1huVHJuPQ== ')
bd[18]=bdc(' VEFqblR0bj0= ')
bd[19]=bdc('VEJ2blVyMG5XZzhuV2c4bldnOG5XZzhuVHFubldnOG5XZzhuV2c4bldnOG5VMHJuV2c4bldnOG5XZzhuV2c4blRCdm5VMHpuV2c4bldnOG5XZzhuV2c4blRLUG5UQm5uVHFubldnOG5XZzhuV2c4bldnOG5US1BuVEFyblRxbm5XZzhuV2c4bldnOG5XZzhuVHJuPQ==')
bd[20]=bdc('VEFqblVyMG5XZzhuV2c4bldnOG5XZzhuVHFubldnOG5XZzhuV2c4bldnOG5VMHJuV2c4bldnOG5XZzhuV2c4blRBam5VMHpuV2c4bldnOG5XZzhuV2c4blRLUG5UQm5uVHFubldnOG5XZzhuV2c4bldnOG5US1BuVEFyblRxbm5XZzhuV2c4bldnOG5XZzhuVHJuPQ==')
function cyberHacks()
t =
{

{'Infinite Ammo',[[
Luacall(scan(bd[1],bd[2]))
]]},
{'Higher Damage(2 hit kill)',[[
Luacall(scan(bd[3],bd[4]))
]]},
{'Disable Zombies',[[
Luacall(scan(bd[5],bd[8]))
Luacall(scan(bd[6],bd[8]))
Luacall(scan(bd[7],bd[8]))
]]},
{'Money Hack',[[
Luacall(scan(bd[9],bd[10]))
]]},
{'Infinite Health(cant kill zombies too)',[[
Luacall(scan(bd[11],bd[12]))
]]},
{'Blueprint Hack',[[
Luacall(scan(bd[13],bd[14]))
Luacall(scan(bd[15],bd[16]))
Luacall(scan(bd[17],bd[18]))
]]},
{'End Mission but get rewards',[[
Luacall(scan(bd[19],bd[20]))
]]},
}
end


cyberGUI     = {}
cyberGUI[1]  = createForm(false)
cyberGUI[5]  = createGroupBox(cyberGUI[1])
cyberGUI[6]  = createLabel(cyberGUI[5])
cyberGUI[7]  = createLabel(cyberGUI[5])
cyberGUI[8]  = createLabel(cyberGUI[1])
cyberGUI[9]  = createLabel(cyberGUI[5])
cyberGUI[10] = createComboBox(cyberGUI[5])
cyberGUI[11]  = createGroupBox(cyberGUI[1])
cyberGUI[12] = createButton(cyberGUI[5])
cyberGUI[13] = createLabel(cyberGUI[1])
cyberGUI[14]  = createLabel(cyberGUI[11])
cyberGUI[15] = createListBox(cyberGUI[11])
cyberGUI[16] = createButton(cyberGUI[11])
cyberGUI[17] = createButton(cyberGUI[11])
cyberGUI[18]  = createLabel(cyberGUI[11])
cyberGUI[19]  = createLabel(cyberGUI[11])
cyberGUI[40] = createButton(cyberGUI[11])
cyberGUI[41] = createButton(cyberGUI[11])
cyberGUI[42] = createButton(cyberGUI[11])
cyberGUI[43] = createButton(cyberGUI[11])
cyberGUI[44] = createButton(cyberGUI[1])



setProperty(cyberGUI[1] , "color", Background)
attachBackground(cyberGUI[1],[[BG1.jpg]])
setProperty(cyberGUI[1] , "ShowInTaskBar", 'stAlways')
setProperty(cyberGUI[1] , "Position", "poScreenCenter")
setProperty(cyberGUI[1] , "BiDiMode", "bdLeftToRight")
setProperty(cyberGUI[10] , "ReadOnly", "True")
FontHeight = getProperty(cyberGUI[5] , "Font")
setProperty(FontHeight , "Height", "18")
setProperty(FontHeight , "Color", white)
FontHeight = getProperty(cyberGUI[8] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "23")
setProperty(FontHeight , "Color", white)
FontHeight = getProperty(cyberGUI[9] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "16")
setProperty(FontHeight , "Color", white)
FontHeight = getProperty(cyberGUI[10] , "Font")
setProperty(FontHeight , "Height", "18")
setProperty(FontHeight , "Color", black)
FontHeight = getProperty(cyberGUI[12] , "Font")
setProperty(FontHeight , "Height", "13")
FontHeight = getProperty(cyberGUI[13] , "Font")
setProperty(FontHeight , "Style", "[fsBold, fsitalic]")
setProperty(FontHeight , "Height", "16")
setProperty(FontHeight , "Color", white)
setProperty(cyberGUI[13], "Cursor", "-21")
FontHeight = getProperty(cyberGUI[14] , "Font")
setProperty(FontHeight , "Height", "18")
setProperty(FontHeight , "Color", white)
FontHeight = getProperty(cyberGUI[15] , "Font")
setProperty(FontHeight , "Height", "16")
FontHeight = getProperty(cyberGUI[18] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "18")
setProperty(FontHeight , "Color", white)
FontHeight = getProperty(cyberGUI[19] , "Font")
setProperty(FontHeight , "Height", "18")
setProperty(FontHeight , "Color", white)

control_setSize(cyberGUI[1], 425, 600)
control_setSize(cyberGUI[5], 400, 129)
control_setSize(cyberGUI[10], 255, 21)
control_setSize(cyberGUI[11], 400, 360)
control_setSize(cyberGUI[12], 107, 28)
control_setSize(cyberGUI[15], 220, 270)
control_setSize(cyberGUI[16], 100, 45)
control_setSize(cyberGUI[17], 100, 45)
control_setSize(cyberGUI[40], 100,45)
control_setSize(cyberGUI[41], 100,45)
control_setSize(cyberGUI[42], 100,45)
control_setSize(cyberGUI[43], 100,45)
control_setSize(cyberGUI[44], 70,20)

control_setPosition(cyberGUI[5], 10, 35)
control_setPosition(cyberGUI[6], 10, 5)
control_setPosition(cyberGUI[8], 15, 175)
control_setPosition(cyberGUI[9], 10, 75)
control_setPosition(cyberGUI[10], 10, 35)
control_setPosition(cyberGUI[11], 10, 205)
control_setPosition(cyberGUI[12], 280, 35)
control_setPosition(cyberGUI[13], 12, 580)
control_setPosition(cyberGUI[14], 10, 5)
control_setPosition(cyberGUI[15], 10, 35)
control_setPosition(cyberGUI[16], 260, 35)
control_setPosition(cyberGUI[17], 260, 80)
control_setPosition(cyberGUI[18], 10, 155)
control_setPosition(cyberGUI[19], 11, 310)
control_setPosition(cyberGUI[40], 260,125)
control_setPosition(cyberGUI[41], 260,170)
control_setPosition(cyberGUI[42], 260,215)
control_setPosition(cyberGUI[43], 260, 260)
control_setPosition(cyberGUI[44], 290,574)


control_setCaption(cyberGUI[1], title.."")
control_setCaption(cyberGUI[6], "Select your browser. Make sure the game is loaded.")
control_setCaption(cyberGUI[8],  "Dead Trigger 2 - Updated on 27th Jan 2016")
control_setCaption(cyberGUI[9], "Attached To Process : Satus: waiting...")
control_setCaption(cyberGUI[12], "Select Process")
control_setCaption(cyberGUI[13], "" ..credits)
control_setCaption(cyberGUI[14],  "Refresh and Enable hacks while Game is still loading .")
control_setCaption(cyberGUI[16], 'Enable selected')
control_setCaption(cyberGUI[17], 'Enable all')
control_setCaption(cyberGUI[18],"Description:")
control_setCaption(cyberGUI[40], 'In-Base Hacks')
control_setCaption(cyberGUI[41], 'Instructions')
control_setCaption(cyberGUI[42], 'Donate')
control_setCaption(cyberGUI[43], 'Help')
control_setCaption(cyberGUI[44], 'About')
control_setCaption(cyberGUI[19],"Please seclect a Hack and click Enable")
control_setEnabled(cyberGUI[16], false)
control_setEnabled(cyberGUI[17], false)

cyberGUI[20] = createProgressBar(cyberGUI[11])
control_setPosition(cyberGUI[20], 10, 310)
control_setSize(cyberGUI[20], 320, 14)
control_setVisible(cyberGUI[20], false)
cyberGUI[21]  = createLabel(cyberGUI[11])
FontHeight = getProperty(cyberGUI[21] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "18")
setProperty(FontHeight , "Color", white)
control_setPosition(cyberGUI[21], 10, 323)
control_setVisible(cyberGUI[21], false)
cyberGUI[22]  = createLabel(cyberGUI[11])
FontHeight = getProperty(cyberGUI[22] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "18")
control_setPosition(cyberGUI[22], 10, 310)
control_setVisible(cyberGUI[22], false)

cyberHacks()
al = combobox_getItems(cyberGUI[10])
strings_clear(al)
strings_add(al, 'Browser list...')
strings_add(al, 'Google Chrome')
strings_add(al, 'Firefox')
strings_add(al, 'Firefox(Unity Game)')
strings_add(al, 'Firefox Windows XP')
strings_add(al, 'Maxthon')
strings_add(al, 'Internet Explorer')
strings_add(al, 'Internet Explorer Windows XP')
setProperty(cyberGUI[10] , "ItemIndex", "0")
all_enabled = 0
success = 1
TeL = listbox_getItems(cyberGUI[15])
TempSave = {}
strings_clear(TeL)
check = 0
i = 0
repeat
if t[i+1]==nil then
   check = 1
else
   i = i+1
   strings_add(TeL, t[i][1])
   TempSave[i] = {}
   TempSave[i][1] = t[i][1]
   TempSave[i][2] = t[i][2]
   TempSave[i][3] = t[i][3]
   TempSave[i][4] = 2
   TempSave[i][5] = 0
   check = 0
end
until check == 1

errorOnLookupFailure(false)
alreadycheckedPIDS={}
openNextProcTimer = createTimer(nil,false)
timer_setInterval(openNextProcTimer, 1000)
timer_onTimer(openNextProcTimer,
function(sender)
   local tempPIDtable = getPids()
   if #tempPIDtable == 0 then return end
   timer_setEnabled(sender,false)
   openProcess(tempPIDtable[1])
end)


function checkProcessMajor()
   reinitializeSymbolhandler()
   if getAddress("pepflashplayer.dll")~=0 or getAddress("AdobeCPGetAPI") ~=0 then
      return true
   end
   return false
end

function getPids()
   local SL=createStringlist()
   getProcesslist(SL)
   local tempPIDtable={}
   for i=0,strings_getCount(SL)-1 do
      local entry = strings_getString(SL,i)
      local processname = entry:sub(10,255)
      local PID = tonumber('0x'..entry:sub(1,8))
      if processname == "chrome.exe" then
         if alreadycheckedPIDS[PID]~=true then
            table.insert(tempPIDtable,PID)
         end
      end
   end
   object_destroy(SL)
   return tempPIDtable
end

function checkProcess(sender)
   timer_setEnabled(sender,false)
   alreadycheckedPIDS[getOpenedProcessID()]=true
   if checkProcessMajor() then
      timer_setEnabled(openNextProcTimer,false)
      alreadycheckedPIDS={}
      enableHacks()
   else
      timer_setEnabled(openNextProcTimer,true)
   end
end

checkProcessTimer = createTimer(nil,false)
timer_setInterval(checkProcessTimer, 100)
timer_onTimer(checkProcessTimer, checkProcess)

function onOpenProcess()
   if success == 1 then return end
   timer_setEnabled(checkProcessTimer,true)
end


function scanBrowser()
   AttachItems = combobox_getItems(cyberGUI[10])
   AttachIndex = combobox_getItemIndex(cyberGUI[10])
   control_setEnabled(cyberGUI[16], false)
   control_setEnabled(cyberGUI[17], false)
   local font = getProperty(cyberGUI[9] , "Font")
   setProperty(font, "Color", white)
   control_setCaption(cyberGUI[9], "Attached to PID: " .. "Scanning Process, Please wait...")
   processMessages()
   if AttachIndex == -1 then return end
   if AttachIndex == 0 then
      control_setCaption(cyberGUI[9], "Attached to PID: " .. "no Browser selected.")
      return
   end
   local check = strings_getString(AttachItems,AttachIndex)
   if check == 'Google Chrome' then
      success = 0
      local test = openProcess("chrome.exe")
      if test == nil then
         setProperty(font , "Color", orange1)
         control_setCaption(cyberGUI[9], "Attached to PID: " .. "Chrome not found.")
         timer_setEnabled(openNextProcTimer,false)
         return
      end
      strings_add(getAutoAttachList(),"chrome.exe")
      timer_setEnabled(openNextProcTimer,true)
      return
   end

   if check == 'Firefox' or check == 'Internet Explorer' or check == 'SeaMonkey Windows 7' then openProcess("FlashPlayerPlugin") end
      errorOnLookupFailure(false)
      reinitializeSymbolhandler()
      err=getAddress("kernel32.dll")==0
   if err==true then
      setProperty(font , "Color", green)
      control_setCaption(cyberGUI[9], "Attached to PID: " .. "Flash player plugin not found")
   else
      local PID=getOpenedProcessID()
      setProperty(font, "Color", green)
      control_setCaption(cyberGUI[9], "Attached to PID: " .. PID .. " - flash player plugin")
      control_setEnabled(cyberGUI[16], true)
      control_setEnabled(cyberGUI[17], true)
   end

      if check == 'Firefox(Unity Game)' or check == 'Internet Explorer Windows XP' or check == 'SeaMonkey Windows XP' then openProcess("plugin-container.exe") end
      errorOnLookupFailure(false)
      reinitializeSymbolhandler()
      err=getAddress("kernel32.dll")==0
   if err==true then
      setProperty(font , "Color", red)
      control_setCaption(cyberGUI[9], "Attached to PID: " .. "Flash player plugin not found")
   else
      local PID=getOpenedProcessID()
      setProperty(font, "Color", green)
      control_setCaption(cyberGUI[9], "Attached to PID: " .. PID .. " - flash player plugin")
      control_setEnabled(cyberGUI[16], true)
      control_setEnabled(cyberGUI[17], true)
   end



      local check = strings_getString(AttachItems,AttachIndex)
   if check == 'Maxthon' then
      success = 0
      local test = openProcess("Maxthon.exe")
      if test == nil then
         setProperty(font , "Color", red1)
         control_setCaption(cyberGUI[9], "Attached to PID: " .. "Maxthon not found.")
         timer_setEnabled(openNextProcTimer,false)
         return
      end
      strings_add(getAutoAttachList(),"Maxthon.exe")
      timer_setEnabled(openNextProcTimer,true)
      return
   end
end


local function browser(text, key)
   return text:gsub("%a", function(t)
         local base = (t:lower() == t and string.byte('a') or string.byte('A'))

         local r = t:byte() - base
         r = r + key
         r = r + base
         return string.char(r)
      end)
end

local function PIDD(text, key)
   return browser(text, -key)
end

Scanning = {
   browser = browser,
   PIDD = PIDD,
}


function enableHacks()
   setProperty(getProperty(cyberGUI[9] , "Font"), "Color", white)
   local PID=getOpenedProcessID()
   local check = strings_getString(AttachItems,AttachIndex)
   if check == 'Firefox' or check == 'Internet Explorer' then
      control_setCaption(cyberGUI[9], "Attached to PID: " .. PID .. " - flash player plugin")
                local font = getProperty(cyberGUI[9] , "Font")
   setProperty(font, "Color", green)

   elseif check == 'Google Chrome' then
      control_setCaption(cyberGUI[9], "Attached to PID: " .. PID .. " - chrome.exe")
            local font = getProperty(cyberGUI[9] , "Font")
   setProperty(font, "Color", green)

   elseif check == 'Maxthon' then
      control_setCaption(cyberGUI[9], "Attached to PID: " .. PID .. " - Maxthon.exe")
            local font = getProperty(cyberGUI[9] , "Font")
   setProperty(font, "Color", green)

elseif check == 'SeaMonkey' then
      control_setCaption(cyberGUI[9], "Attached to PID: " .. PID .. " - SeaMonkey")
            local font = getProperty(cyberGUI[9] , "Font")
   setProperty(font, "Color", green)


end
   success = 1
    control_setEnabled(cyberGUI[16], true)
    control_setEnabled(cyberGUI[17], true)

end

function show_progressbar()
     control_setPosition(cyberGUI[22], 10, 250)
     control_setCaption(cyberGUI[22], '')
     control_setVisible(cyberGUI[18], false)
     control_setVisible(cyberGUI[19], false)
     control_setVisible(cyberGUI[20], true)
     control_setVisible(cyberGUI[21], true)
     control_setVisible(cyberGUI[22], true)
     progressbar_setPosition(cyberGUI[20], 0)
end

function hide_progressbar()
    control_setVisible(cyberGUI[20], false)
    control_setVisible(cyberGUI[21], false)
    control_setVisible(cyberGUI[22], false)
    control_setVisible(cyberGUI[18], true)
    control_setVisible(cyberGUI[19], true)
end

function ExecuteHacks()
    Pause()
    HLS = listbox_getItemIndex(cyberGUI[15])
    LIST = listbox_getItems(cyberGUI[15])
    if HLS == -1 then return end
    i = HLS+1
    font=getProperty(cyberGUI[21], 'Font')
    control_setVisible(cyberGUI[18], false)
    control_setVisible(cyberGUI[19], false)
    control_setVisible(cyberGUI[20], false)
    control_setVisible(cyberGUI[21], true)
    control_setVisible(cyberGUI[22], false)
    if t[i][2]==nil then
         setProperty(font, 'Color', white)
         control_setCaption(cyberGUI[21], "You already enabled this hack !")
         unpause()
         return
    end
    control_setEnabled(cyberGUI[16], false)
    control_setEnabled(cyberGUI[17], false)

    control_setCaption(cyberGUI[21], "Executing hack...")
    control_setVisible(cyberGUI[22], true)
    control_setCaption(cyberGUI[22], '')
    control_setPosition(cyberGUI[22], 10, 250)
    strings_setString(LIST, HLS, t[i][1])
    processMessages()
    if TempSave[i][4] == 2 then
      Asm = autoAssemble(t[i][2])
      font=getProperty(cyberGUI[22], 'Font')
      control_setCaption(cyberGUI[21], "Executing hack. Finished.")
      unpause()
      if scanCheck~=true then
        TempText = t[i][1]..' - Failed'
        TempSave[i][5] = t[i][1]..' - Failed'
        strings_setString(LIST, HLS, TempText)
        setProperty(font, 'Color', red1)
        control_setCaption(cyberGUI[22], 'Failed to enable ')
        unpause()
 else
        TempText = t[i][1]..' - Enabled'
        TempSave[i][5] = t[i][1]..' - Enabled'
        strings_setString(LIST, HLS, TempText)
        setProperty(font, 'Color', green)
        control_setCaption(cyberGUI[22], 'Hack enabled. Enjoy it !')
unpause()
t[i][2] = nil
        TempSave[i][4] = 1
      end
    end
    if TempSave[i][4] == 0 then TempSave[i][4] = 2 end
    control_setEnabled(cyberGUI[16], true)
    control_setEnabled(cyberGUI[17], true)

end

function ExecuteAllHacks()
    Pause()
     font=getProperty(cyberGUI[21], 'Font')
     if all_enabled == 1 then
        control_setVisible(cyberGUI[18], false)
        control_setVisible(cyberGUI[19], false)
        control_setVisible(cyberGUI[20], false)
        control_setVisible(cyberGUI[21], true)
        control_setVisible(cyberGUI[22], false)
        setProperty(font, 'Color', red)
        control_setCaption(cyberGUI[21], "You already enabled all hacks !")
unpause()
return
     end
     lb = listbox_getItems(cyberGUI[15])
     LIST = listbox_getItems(cyberGUI[15])
     control_setEnabled(cyberGUI[16], false)
     control_setEnabled(cyberGUI[17], false)

     show_progressbar()
     progressbar_setMax(cyberGUI[20], strings_getCount(lb))
     for i = 1, strings_getCount(lb) do
         strings_setString(LIST, i-1, t[i][1])
     end
    count = 0
     for i = 1, strings_getCount(lb) do
          control_setCaption(cyberGUI[21], "Executing hack: "..t[i][1])
          progressbar_setPosition(cyberGUI[20], i)
          processMessages()
        if TempSave[i][4] == 2 then
              Asm = autoAssemble(t[i][2])
            if scanCheck~=true then
                    TempSave[i][5] = t[i][1]..' - Failed'
                    strings_setString(LIST, i-1, TempSave[i][5])
             else
                   TempSave[i][5] = t[i][1]..' - Enabled'
                    strings_setString(LIST, i-1, TempSave[i][5])
                   t[i][2] = nil
               TempSave[i][4] = 1
               count = count + 1
             end
         else
              count = count + 1
                 TempSave[i][5] = t[i][1]..' - Enabled'
                 strings_setString(LIST, i-1, TempSave[i][5])
         end
      if TempSave[i][4] == 0 then TempSave[i][4] = 2 end
   end
    control_setEnabled(cyberGUI[16], true)
    control_setEnabled(cyberGUI[17], true)
    setProperty(font, 'Color', green)
    control_setCaption(cyberGUI[21], "Executing hack. Finished ! ")
    unpause()
    font=getProperty(cyberGUI[22], 'Font')
   if count == strings_getCount(lb) then
      setProperty(font, 'Color', green)
        control_setCaption(cyberGUI[22], 'All hacks enabled. Enjoy it !')
        unpause()
        all_enabled = 1
   else
      diff = strings_getCount(lb) - count
        if diff == 1 then
           text = "hack"
        else
           text = "hacks"
        end
        setProperty(font, 'Color', red1)
       control_setCaption(cyberGUI[22], 'Failed to enable ' .. diff .. ' ' .. text .. ' !')
   unpause()
        end
unpause()
end

function ResetAllHacks()
     lb = listbox_getItems(cyberGUI[15])
     ct = strings_getCount(lb)
     for i = 1, ct do
         strings_setString(lb, i-1, t[i][1])
         TempSave[i][4] = 2
         t[i][2]= TempSave[i][2]
     end
     all_enabled = 0
     hide_progressbar()
     control_setVisible(cyberGUI[19], false)
     control_setCaption(cyberGUI[18], 'All hacks reseted.')
end

function DEC_HEX(IN)
   local B,K,OUT,I,D=16,"0123456789ABCDEF","",0
    if IN&lt;1 then
      OUT=0
      return OUT
   end
   while IN&gt;0 do
      I=I+1
      IN,D=math.floor(IN/B),math.mod(IN,B)+1
      OUT=string.sub(K,D,D)..OUT
   end
   return OUT
end

function scan(enter, exit)
pretemp1 =Scanning.PIDD(enter,7)
pretemp2 =Scanning.PIDD(exit,7)
temp1 = bdc(pretemp1)
temp2 = bdc(pretemp2)
search = Scanning.PIDD(temp1,7)
change = Scanning.PIDD(temp2,7)
     aobs = AOBScan(search, "+W")
     if(aobs == nil) then
      scanCheck=false
    else
       j = stringlist_getCount(aobs)
      for i = 1, j do
          address=stringlist_getString(aobs,i-1)
          for i = 1, string.len(change), 3 do
             z = string.sub(change, i, i+2)
             x, y = string.find(z, "%?+")
              if (x == nil) then
                script=[[
                ]]..address.."+"..(DEC_HEX((i-1)/3))..[[:
                db ]]..z..[[
                ]]
                autoAssemble(script)
             end
          end
       end
      object_destroy(aobs);
      aobs=nil
      scanCheck=true
   end
end

function HackDescriptionsChange()
    hide_progressbar()
    control_setCaption(cyberGUI[18], 'Description:')
    HLS = listbox_getItemIndex(cyberGUI[15])
    if HLS == -1 then return end
    i = HLS+1
    if t[i][3]~='' and t[i][3]~=nil then
      control_setCaption(cyberGUI[19] ,t[i][3])
    else
      control_setCaption(cyberGUI[19], "")
    end
end
function OpenCW()
   shellExecute(" ")
end
function ingame()
         form_hide(cyberGUI[1])
         shellExecute("ingame.cetrainer")
         closeCE()
end

function info()
         form_show(UDF1)
end

function update()
         showMessage("You will be now redirected to the official Facebook Group,  where you can find updates and ask for help  ! If you are not a member then you can join .")
         shellExecute(" ")
end

function CloseTrainer()
   form_hide(cyberGUI[1])
    shellExecute(" ")
   closeCE()
end

function donate()
         shellExecute(" ")
end

function about()
         showMessage("Developed By Team of CyberWolf . Special Thanks to FTH .  We are not associated with anyone in any manner .")
end




control_onClick(cyberGUI[12], scanBrowser)
control_onClick(cyberGUI[16], ExecuteHacks)
control_onClick(cyberGUI[13], OpenCW)
control_onClick(cyberGUI[17], ExecuteAllHacks)
control_onClick(cyberGUI[40], ingame)
control_onClick(cyberGUI[41], info)
control_onClick(cyberGUI[42], donate)
control_onClick(cyberGUI[44], about)
control_onClick(cyberGUI[43], update)

setMethodProperty(cyberGUI[15], 'OnSelectionChange', HackDescriptionsChange)
form_onClose(cyberGUI[1], CloseTrainer)
form_hide(UDF1)
form_hide(cyberGUI[40])
form_hide(cyberGUI[17])
form_show(cyberGUI[1])

</LuaScript>
</CheatTable>


_________________
dved rvrdv vrevr rvrve
Back to top
View user's profile Send private message
Redouane
Master Cheater
Reputation: 3

Joined: 05 Sep 2013
Posts: 363
Location: Algeria

PostPosted: Sun Jan 31, 2016 9:58 am    Post subject: Re: encrypted script (trainer) New method Reply with quote

facecheats wrote:
I found this script with the encrypted aobs, how? I had never seen anything like it,
show how to do this encrypted script

Code:

Long script


This is just Base64,nothing fancy,easy to decrypt:
http://lua-users.org/wiki/BaseSixtyFour
Back to top
View user's profile Send private message
diamond818
Newbie cheater
Reputation: 0

Joined: 04 Jan 2016
Posts: 10

PostPosted: Sun Jan 31, 2016 1:10 pm    Post subject: Reply with quote

Dont mind replying to this thread...
he justs want to decrypt and get those codes...
he got this trainer from a site (iam not naming it) and he just want to decrpt the aob codes and wants to use for his site htt p :/ /f ac e c h ea t sb ra s il l . bl o g s po t . c o m. b r (remove spaces)
He even doesnt give the proper credits..
Sorry,if iam posting lke this..[/url]
Back to top
View user's profile Send private message
Redouane
Master Cheater
Reputation: 3

Joined: 05 Sep 2013
Posts: 363
Location: Algeria

PostPosted: Sun Jan 31, 2016 1:48 pm    Post subject: Reply with quote

diamond818 wrote:
Dont mind replying to this thread...
he justs want to decrypt and get those codes...
he got this trainer from a site (iam not naming it) and he just want to decrpt the aob codes and wants to use for his site htt p :/ /f ac e c h ea t sb ra s il l . bl o g s po t . c o m. b r (remove spaces)
He even doesnt give the proper credits..
Sorry,if iam posting lke this..[/url]


Are you the author of the original trainer?How did he find the source code?
At this point,he does not need the AOBs to put the trainer in his website,he has the source code,he could just edit the credits,and done.
Back to top
View user's profile Send private message
facecheats
Newbie cheater
Reputation: 0

Joined: 12 Jul 2015
Posts: 20

PostPosted: Sun Jan 31, 2016 4:00 pm    Post subject: Reply with quote

diamond818 wrote:
Dont mind replying to this thread...
he justs want to decrypt and get those codes...
he got this trainer from a site (iam not naming it) and he just want to decrpt the aob codes and wants to use for his site htt p :/ /f ac e c h ea t sb ra s il l . bl o g s po t . c o m. b r (remove spaces)
He even doesnt give the proper credits..
Sorry,if iam posting lke this..[/url]



you are squarely wrong, I want to know how to encrypt, you read something wrong, or not,

I want to know how to encrypt my codes to hide from people like you, I think ..

_________________
dved rvrdv vrevr rvrve
Back to top
View user's profile Send private message
Zanzer
I post too much
Reputation: 126

Joined: 09 Jun 2013
Posts: 3278

PostPosted: Sun Jan 31, 2016 7:22 pm    Post subject: Reply with quote

if I had to guess...
Code:
local encrypted = bec([[encrypt me]])
Back to top
View user's profile Send private message
diamond818
Newbie cheater
Reputation: 0

Joined: 04 Jan 2016
Posts: 10

PostPosted: Mon Feb 01, 2016 3:43 am    Post subject: Reply with quote

Sorry if some body find my comments offensive.
The trainer is made by some guys called CYBERTERMINATORS

Proof :

UHJvcGVydHkgT2YgQ3liZXIgVGVybWluYXRvcnM= ---->trainer titles

Property Of Cyber Terminators ---------------> decrypted base64
Back to top
View user's profile Send private message
ParkourPenguin
I post too much
Reputation: 138

Joined: 06 Jul 2014
Posts: 4275

PostPosted: Mon Feb 01, 2016 11:40 am    Post subject: Reply with quote

OP: If you want to decrypt it, the answer is right in front of you- all you need to do is read the script. If you don't understand what code you're writing, then it's pretty obvious that you didn't write that code.

I'm pretty sure leeching another's work is against the rules here. Even if it's not, it's still a deplorable act that the table/trainer makers detest, so I'm not going to help you any more than this.

_________________
I don't know where I'm going, but I'll figure it out when I get there.
Back to top
View user's profile Send private message
Rydian
Grandmaster Cheater Supreme
Reputation: 31

Joined: 17 Sep 2012
Posts: 1358

PostPosted: Mon Feb 01, 2016 12:23 pm    Post subject: Reply with quote

OP wants to learn how to encrypt like this, actually.

... but this isn't seriously encryption (with keys and shit), it's a cipher and the functions to "encrypt" and "decrypt" are right there in the script. Run bdc() on the lines and then pick apart the scan() function to see what it's doing to the characters.

_________________
Back to top
View user's profile Send private message
lolAnonymous
Expert Cheater
Reputation: 1

Joined: 19 Jul 2015
Posts: 154

PostPosted: Mon Feb 01, 2016 1:27 pm    Post subject: Reply with quote

Yeah friends it is made by my friend MD Arsalaan (Admin of Cyber Terminators) , Face Cheat Brasil u always try to copy other's hacks so i am not gonna help u...
Back to top
View user's profile Send private message
facecheats
Newbie cheater
Reputation: 0

Joined: 12 Jul 2015
Posts: 20

PostPosted: Wed Feb 03, 2016 4:05 pm    Post subject: Reply with quote

MasterHacking321 wrote:
Yeah friends it is made by my friend MD Arsalaan (Admin of Cyber Terminators) , Face Cheat Brasil u always try to copy other's hacks so i am not gonna help u...



qual hacker eu copiei, voce deve estar louco ou coisa assim, minha pergunta é como encriptar o codigo dessa forma, nao sei onde voce quer chegar com isso seu estupido, se eu quizer copia apenas mudo os creditos do trainer e pronto,,

_________________
dved rvrdv vrevr rvrve
Back to top
View user's profile Send private message
Corroder
Grandmaster Cheater Supreme
Reputation: 75

Joined: 10 Apr 2015
Posts: 1667

PostPosted: Thu Feb 04, 2016 9:49 pm    Post subject: Reply with quote

Its base 64 encoding / decoding. Not encrypting / decrypting
Just find base 64 decoding function and get the source script. or do it online.
Encrypted must be start with CWS symbol (if open the file with Hex Editor).
Decrypted start with FWS symbol.
Back to top
View user's profile Send private message
mlmn21
How do I cheat?
Reputation: 0

Joined: 13 Aug 2014
Posts: 9

PostPosted: Sat Jun 17, 2017 9:39 pm    Post subject: Reply with quote

Corroder wrote:
Its base 64 encoding / decoding. Not encrypting / decrypting
Just find base 64 decoding function and get the source script. or do it online.
Encrypted must be start with CWS symbol (if open the file with Hex Editor).
Decrypted start with FWS symbol.


but for example when ; bd[18]=bdc(' VEFqblR0bj0= ') -----> print(bd[18])RESULT--> TAjnTtn=
result isnt AOBs ??
Back to top
View user's profile Send private message
Dark Byte
Site Admin
Reputation: 457

Joined: 09 May 2003
Posts: 25262
Location: The netherlands

PostPosted: Sun Jun 18, 2017 12:49 am    Post subject: Reply with quote

i also recomnend encodeFunction to convert your script into native bytecode so it's a lot more difficult
_________________
Do not ask me about online cheats. I don't know any and wont help finding them.

Like my help? Join me on Patreon so i can keep helping
Back to top
View user's profile Send private message MSN Messenger
atom0s
Moderator
Reputation: 198

Joined: 25 Jan 2006
Posts: 8516
Location: 127.0.0.1

PostPosted: Sun Jun 18, 2017 12:50 am    Post subject: Reply with quote

Everything needed to get the info in the script is there. You just have to figure out the proper way to piece things together to get the original data back from the encrypted form. It's not hard to do given you have everything needed.
_________________
- Retired.
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    Cheat Engine Forum Index -> Cheat Engine Lua Scripting All times are GMT - 6 Hours
Goto page 1, 2  Next
Page 1 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


Powered by phpBB © 2001, 2005 phpBB Group

CE Wiki   IRC (#CEF)   Twitter
Third party websites