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 


Help!!!

 
Post new topic   Reply to topic    Cheat Engine Forum Index -> General Discussions -> Guests
View previous topic :: View next topic  
Author Message
Nina5
Guest





PostPosted: Thu Dec 25, 2014 11:38 am    Post subject: Help!!! Reply with quote

I have not idea what I am doing! Someone please help me. I am at a total loss!!! Do not understand any of this!
Back to top
Guest






PostPosted: Sun Dec 28, 2014 9:01 pm    Post subject: Reply with quote

You and me both, I DLed CE, ran the tutorial but, it kept saying I failed on the "Hit me" part. I totally don't get it. I just want to make my DAI Inquisitor wear armor in Skyhold. I have no idea how to make that happen with this complicated mess of letter, numbers and stuff.

Now explain it in terms of BASIC or Four Tran and I'd get it, but what language is this? Nothing makes sense, just need an simple do a,b,c and you have it, not coding BS that makes no sense to me.
Back to top
Guest






PostPosted: Thu Jan 01, 2015 11:57 am    Post subject: Re: Help!!! Who Can Help To Run This Trainer Code..??? CC Reply with quote

showMessage("")
function FormClose(sender)
closeCE()
end
function bar()
if openProcess("cheatengine")
then shellExecute("")
closeCE() end end t=createTimer(nil) timer_onTimer(t, bar) timer_setInterval(t, 200) --10 minutes timer_setEnabled(t, true);

-- Form, and Exit and some Variable
--form_show(CETrainer)
-- Setting the attaching form on top and then as a normal
-- Like popup...
setProperty(CETrainer , "FormStyle", "fsSystemStayOnTop")
setProperty(CETrainer , "FormStyle", "fsNormal")

-- Closing the trainer..
function CloseClick()
closeCE()
return caFree
end
--
--Defining some stuff...
ProcList = 0
--

--va il primo ok ora si beh fammi vedere da qui la tua magia no ? :)aspe vuoi tasto 8 funzionante come hack non come mess.?si


function DEC_HEX(IN)
local B,K,OUT,I,D=16,"0123456789ABCDEF","",0
if IN<1 then
OUT=0
return OUT
end
while IN>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 Aobswap(search, change)
aobs = AOBScan(search)
if(aobs ~= nil) then
j = stringlist_getCount(aobs)
--print("Found:",j);
for i = 1, j do
--print(stringlist_getString(aobs,i-1));
--66 ?? ?? d1 a1 68 ?? ?? d0 d0
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)
--print(z)
--print(address.."+"..(DEC_HEX((i-1)/3)))
end
end
end
object_destroy(aobs);
aobs=nil
end
end
-----------------------------------------------------------

-- Attaching using processor list..
function AttachList()


local SelectedItemIndex = combobox_getItemIndex(CETrainer_CEComboBox1)
local pname=control_getCaption( CETrainer_CEEdit1 );
if SelectedItemIndex==-1 then return end

if SelectedItemIndex==-1 then return end

if SelectedItemIndex==0 and pname =='' then -- return end
ProcList = 0
--elseif pname~='' then
--AttachPID()
end

if SelectedItemIndex==0 and pname~='' then -- return end
ProcList = 0
AttachPID()
end


if SelectedItemIndex ==1 and pname =='' then
openProcess("FlashPlayerPlugin")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Il processo non e stato rilevato!!!")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attualmente attaccato al PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==1 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==2 and pname =='' then
openProcess("plugin-container.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Attachment Pid")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attualmente attaccato al PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==2 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==3 and pname =='' then
openProcess("opera.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Attachment Pid")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment Pid: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Success kabayan")
end
elseif SelectedItemIndex ==3 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==4 and pname =='' then
openProcess("opera_plugin_wrapper.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("process list")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment Pid: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==4 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==5 and pname =='' then
openProcess("iexplorer.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Process list")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==5 and pname~='' then
AttachPID()

end
end
end
end
end
end

function AttachPID()
if ProcList == 0 then
local pname=tonumber(control_getCaption( CETrainer_CEEdit1 ));
if pname ~='' then
openProcess(pname)
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
showMessage("Proceess list")
control_setCaption(CETrainer_CEEdit1, '')
elseif err~=0 then
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
showMessage("Attachment PID")
if pname=='' then return end
end
end
end
end

function CEImage2Click(sender)
shellExecute('')
end

--function CEButton9Click(sender)
--showMessage("Before you continue!Please attach to your game processor,Using the following the following methods:(Note that you need only to use 1 method).1. Attaching using processor list(You choose the browser processor of the Flash player)2. Attaching using Processor ID(You attach using the Flash Player ID, of course if you know whats the PID)3. Attaching by going to Fullscreen mode and pressing F6.(Only works if you got an fullscreen option inside the game,Or in any other Flash Player stuff, e.g Youtube, other games..)")
--end

InformationText=""
AttachFirst = {}
AttachFirst[1] = createForm(false)
AttachFirst[2] = createPanel(AttachFirst[1])
AttachFirst[3] = createButton(AttachFirst[2])
AttachFirst[4] = createLabel(AttachFirst[2])
AttachFirst[5] = createGroupBox(AttachFirst[2])
AttachFirst[6] = createLabel(AttachFirst[5])
AttachFirst[7] = createLabel(AttachFirst[5])
AttachFirst[9] = createLabel(AttachFirst[5])
AttachFirst[10] = createComboBox(AttachFirst[5])
AttachFirst[12] = createButton(AttachFirst[5])
AttachFirst[13] = createLabel(AttachFirst[2])
setProperty(AttachFirst[1] , "Position", "poScreenCenter")
setProperty(AttachFirst[1] , "BorderIcons", "[biSystemMenu]")
setProperty(AttachFirst[1] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[2] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[2] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[10] , "ReadOnly", "True")
local FontHeight = getProperty(AttachFirst[4] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "17")
local FontHeight = getProperty(AttachFirst[5] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
--
local FontHeight = getProperty(AttachFirst[6] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "14")
local FontHeight = getProperty(AttachFirst[7] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "12")
local FontHeight = getProperty(AttachFirst[9] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "14")
local FontHeight = getProperty(AttachFirst[7] , "Font")
setProperty(FontHeight , "Color", 0x000000FE)
setProperty(FontHeight , "Color", 0x000000FE)
local FontHeight = getProperty(AttachFirst[9] , "Font")
setProperty(FontHeight , "Color", 0x00007F00)
--
local FontHeight = getProperty(AttachFirst[10] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "13")
local FontHeight = getProperty(AttachFirst[12] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "13")
setProperty(AttachFirst[13], "Cursor", "-21")
local FontHeight = getProperty(AttachFirst[13] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "20")
setProperty(FontHeight , "Color", 0x00800180)
--
control_setEnabled(AttachFirst[3], false)
control_setSize(AttachFirst[1], 385, 270)
x,y = control_getSize(AttachFirst[1])
control_setSize(AttachFirst[2], x,y)
control_setSize(AttachFirst[3], 75,25)
control_setSize(AttachFirst[5], 375,190)
control_setSize(AttachFirst[10], 205,21)
control_setSize(AttachFirst[12], 79,45)
control_setPosition(AttachFirst[3], 303,219)
control_setPosition(AttachFirst[4], 5,5)
control_setPosition(AttachFirst[5], 5,25)
control_setPosition(AttachFirst[6], 5,0)
control_setPosition(AttachFirst[7], 4,110)
control_setPosition(AttachFirst[9], 5,150)
control_setPosition(AttachFirst[10], 75,108)
control_setPosition(AttachFirst[12], 287,97)
control_setPosition(AttachFirst[13], 5,219)
control_setCaption(AttachFirst[1],"Myer Trainer")
control_setCaption(AttachFirst[3],"Continua")
control_setCaption(AttachFirst[4],"Criminal case")
control_setCaption(AttachFirst[5],"Attach")
control_setCaption(AttachFirst[6],InformationText)
control_setCaption(AttachFirst[7],"Valid 1-Month")
control_setCaption(AttachFirst[9],"Proccessor PID: ")
control_setCaption(AttachFirst[12],"Attach")
control_setCaption(AttachFirst[13],"")
al = combobox_getItems(AttachFirst[10])
strings_clear(al)
function OpenFlashacking()
shellExecute("")
end
strings_add(al, 'Process list')
strings_add(al, 'chrome.exe')
strings_add(al, 'FlashPlayerPlugin')
strings_add(al, 'plugin-container.exe')
strings_add(al, 'opera.exe')
strings_add(al, 'opera_plugin_wrapper.exe')
strings_add(al, 'iexplorer.exe')
strings_add(al, 'dragon.exe')
setProperty(AttachFirst[10] , "ItemIndex", "0")
success = 1
process = "chrome.exe" -- you can set this variable by using combobox,
-- editbox or soemthing
function ResetChrome()
success = 0
local test = openProcess("chrome.exe") if test ==nil then return showMessage("Chrome "),timer_setEnabled(openNextProcTimer,false) end
strings_add(getAutoAttachList(),process)
timer_setEnabled(openNextProcTimer,true)
end
function enableCheatsGuiWhatEver()
-- initialize UI (or reinitialize UI)
-- or whatever you want to do afer finding right process:
-- enabling controls, cheats
local PID=getOpenedProcessID()
control_setCaption(AttachFirst[1],"Attachment Trainer!")
control_setEnabled(AttachFirst[3], true)
control_setCaption(AttachFirst[9], "Attachment PID: " .. PID)
success = 1
showMessage("Success Kabayan")
end
-- this function returns true if good process, false if bad
function checkProcessMajor()
reinitializeSymbolhandler()
-- for Chrome flash
if getAddress("pepflashplayer.dll")~=0 or
getAddress("AdobeCPGetAPI") ~=0 then
return true
end
-- you can change above condition to something else.
-- for example you can make aobscan check - if pattern found -> return true
return false -- return false by default
end
-- #############################################################################
-- do not thouch code below (unless you know what you are doing)
errorOnLookupFailure(false)
alreadycheckedPIDS={} -- checked processes pids
openNextProcTimer = createTimer(nil,false)
timer_setInterval(openNextProcTimer, 1000)
timer_onTimer(openNextProcTimer,
function (sender)
local tempPIDtable = getPids()
if #tempPIDtable == 0 then return end
--OK, we have new PID
timer_setEnabled(sender,false)
openProcess(tempPIDtable[1])
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,Cool)
if processname == process 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)
-- add currently opened process to ignore list
-- (openNextProc will ignore those)
alreadycheckedPIDS[getOpenedProcessID()]=true
if checkProcessMajor() then
-- OUR TARGET FOUND
timer_setEnabled(openNextProcTimer,false)
alreadycheckedPIDS={}
enableCheatsGuiWhatEver()
else
timer_setEnabled(openNextProcTimer,true)
end
end
function onOpenProcess()
if success == 1 then return end
timer_setEnabled(checkProcessTimer,true)
end
checkProcessTimer = createTimer(nil,false)
timer_setInterval(checkProcessTimer, 100)
timer_onTimer(checkProcessTimer, checkProcess)
function AttachToChrome()
control_setCaption(AttachFirst[1],"Attachment list")
ResetChrome()
end
function AttachList()
AttachItems = combobox_getItems(AttachFirst[10])
AttachIndex = combobox_getItemIndex(AttachFirst[10])
if AttachIndex == -1 then return end
if AttachIndex == 0 then return showMessage("Proccess list") end
if strings_getString(AttachItems,AttachIndex)=='chrome.exe' then return AttachToChrome() end
openProcess(strings_getString(AttachItems,AttachIndex))
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
showMessage("Il processo non e stato rilevato!!!")
else
local PID=getOpenedProcessID()
control_setCaption(AttachFirst[9], "Attualmente attaccato al PID: " .. PID)
control_setEnabled(AttachFirst[3], true)
showMessage("Attaccato con Sucesso!")
end


end
function AttachClose()
closeCE()
end
function ExecuteHack()
--CreateTrainer()
form_show(CETrainer)
form_hide(AttachFirst[1])
end
control_onClick(AttachFirst[3], ExecuteHack)
control_onClick(AttachFirst[12],AttachList)
form_onClose(AttachFirst[1],AttachClose)
control_onClick(AttachFirst[13],OpenFlashacking)
form_show(AttachFirst[1])

function adds()
shellExecute("")
end
KeyTimer = createTimer(formInfo,false)
timer_setInterval(KeyTimer, 500000)
timer_onTimer(KeyTimer, adds)
timer_setEnabled(KeyTimer, true)
--FUNZIONI PER I TASTI ON + OFF
function CEImage3Click(sender) --YouTube LOGO
shellExecute("")
end
function CEButton1Click(sender)
shellExecute("") --TASTO VIDEO GIU ANGOLO DESTRO
end
function CEButton2Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Hack e Stato Attivato con successo...") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton11Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton12Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer2") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton13Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer2") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton14Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "MyerSCORE E TIME") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton15Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "MyerSCORE E TIME") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton16Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer4") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton17Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer4") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton18Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer5") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton19Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer5") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton20Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer6") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton21Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer6") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton22Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer7") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton23Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer7") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton24Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer8") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton25Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer8") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end

------------------------------------------------------Check ID and flash ----------
function erroruser()
closeCE()
return caFree
end

function checkProcessMajor()
reinitializeSymbolhandler()
if getAddress("pepflashplayer.dll")~=0 or
getAddress("npUnity3d32.dll")~=0 or
getAddress("webplayer_win.dll")~=0 or
getAddress("AdobeCPGetAPI")~=0 or
getAddress("NPSWF32") ~=0 then
--showMessage("Found Flash")---------------------------------------------
local AoB = AOBScan("31")--user; mio oky-----------------
--//72 65 73 75 6C 74 22 3A 7B 22 75 73 65 72 49 64 22 3A 32 34 39 30 30 39 38 36 34 35 2C 22 65 78 74 65 72 6E 61 6C 55 73 65 72 49 64 22 3A 22
--//72 65 73 75 6C 74 22 ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? 31 30 30 30 30 36 35 35 35 30 39 30 33 39 35
if (AoB == nil or AoB.Count < 0) then
showMessage("Dont Abuse My Trainer?")
erroruser()
return false
end
if (AoB == 1 or AoB.Count > 0) then
--showMessage("Proper user Found! Trainer Loading......")
return true
else
--showMessage("No Flash1")
end
--showMessage("No Flash2")
end
-- showMessage("No Flash please start Facebook and load your game!")
return false
end
Back to top
Guest






PostPosted: Thu Jan 01, 2015 11:57 am    Post subject: Re: Help!!! Who Can Help To Run This Trainer Code..??? CC Reply with quote

showMessage("")
function FormClose(sender)
closeCE()
end
function bar()
if openProcess("cheatengine")
then shellExecute("")
closeCE() end end t=createTimer(nil) timer_onTimer(t, bar) timer_setInterval(t, 200) --10 minutes timer_setEnabled(t, true);

-- Form, and Exit and some Variable
--form_show(CETrainer)
-- Setting the attaching form on top and then as a normal
-- Like popup...
setProperty(CETrainer , "FormStyle", "fsSystemStayOnTop")
setProperty(CETrainer , "FormStyle", "fsNormal")

-- Closing the trainer..
function CloseClick()
closeCE()
return caFree
end
--
--Defining some stuff...
ProcList = 0
--

--va il primo ok ora si beh fammi vedere da qui la tua magia no ? :)aspe vuoi tasto 8 funzionante come hack non come mess.?si


function DEC_HEX(IN)
local B,K,OUT,I,D=16,"0123456789ABCDEF","",0
if IN<1 then
OUT=0
return OUT
end
while IN>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 Aobswap(search, change)
aobs = AOBScan(search)
if(aobs ~= nil) then
j = stringlist_getCount(aobs)
--print("Found:",j);
for i = 1, j do
--print(stringlist_getString(aobs,i-1));
--66 ?? ?? d1 a1 68 ?? ?? d0 d0
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)
--print(z)
--print(address.."+"..(DEC_HEX((i-1)/3)))
end
end
end
object_destroy(aobs);
aobs=nil
end
end
-----------------------------------------------------------

-- Attaching using processor list..
function AttachList()


local SelectedItemIndex = combobox_getItemIndex(CETrainer_CEComboBox1)
local pname=control_getCaption( CETrainer_CEEdit1 );
if SelectedItemIndex==-1 then return end

if SelectedItemIndex==-1 then return end

if SelectedItemIndex==0 and pname =='' then -- return end
ProcList = 0
--elseif pname~='' then
--AttachPID()
end

if SelectedItemIndex==0 and pname~='' then -- return end
ProcList = 0
AttachPID()
end


if SelectedItemIndex ==1 and pname =='' then
openProcess("FlashPlayerPlugin")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Il processo non e stato rilevato!!!")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attualmente attaccato al PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==1 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==2 and pname =='' then
openProcess("plugin-container.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Attachment Pid")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attualmente attaccato al PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==2 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==3 and pname =='' then
openProcess("opera.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Attachment Pid")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment Pid: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Success kabayan")
end
elseif SelectedItemIndex ==3 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==4 and pname =='' then
openProcess("opera_plugin_wrapper.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("process list")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment Pid: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==4 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==5 and pname =='' then
openProcess("iexplorer.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Process list")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==5 and pname~='' then
AttachPID()

end
end
end
end
end
end

function AttachPID()
if ProcList == 0 then
local pname=tonumber(control_getCaption( CETrainer_CEEdit1 ));
if pname ~='' then
openProcess(pname)
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
showMessage("Proceess list")
control_setCaption(CETrainer_CEEdit1, '')
elseif err~=0 then
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
showMessage("Attachment PID")
if pname=='' then return end
end
end
end
end

function CEImage2Click(sender)
shellExecute('')
end

--function CEButton9Click(sender)
--showMessage("Before you continue!Please attach to your game processor,Using the following the following methods:(Note that you need only to use 1 method).1. Attaching using processor list(You choose the browser processor of the Flash player)2. Attaching using Processor ID(You attach using the Flash Player ID, of course if you know whats the PID)3. Attaching by going to Fullscreen mode and pressing F6.(Only works if you got an fullscreen option inside the game,Or in any other Flash Player stuff, e.g Youtube, other games..)")
--end

InformationText=""
AttachFirst = {}
AttachFirst[1] = createForm(false)
AttachFirst[2] = createPanel(AttachFirst[1])
AttachFirst[3] = createButton(AttachFirst[2])
AttachFirst[4] = createLabel(AttachFirst[2])
AttachFirst[5] = createGroupBox(AttachFirst[2])
AttachFirst[6] = createLabel(AttachFirst[5])
AttachFirst[7] = createLabel(AttachFirst[5])
AttachFirst[9] = createLabel(AttachFirst[5])
AttachFirst[10] = createComboBox(AttachFirst[5])
AttachFirst[12] = createButton(AttachFirst[5])
AttachFirst[13] = createLabel(AttachFirst[2])
setProperty(AttachFirst[1] , "Position", "poScreenCenter")
setProperty(AttachFirst[1] , "BorderIcons", "[biSystemMenu]")
setProperty(AttachFirst[1] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[2] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[2] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[10] , "ReadOnly", "True")
local FontHeight = getProperty(AttachFirst[4] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "17")
local FontHeight = getProperty(AttachFirst[5] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
--
local FontHeight = getProperty(AttachFirst[6] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "14")
local FontHeight = getProperty(AttachFirst[7] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "12")
local FontHeight = getProperty(AttachFirst[9] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "14")
local FontHeight = getProperty(AttachFirst[7] , "Font")
setProperty(FontHeight , "Color", 0x000000FE)
setProperty(FontHeight , "Color", 0x000000FE)
local FontHeight = getProperty(AttachFirst[9] , "Font")
setProperty(FontHeight , "Color", 0x00007F00)
--
local FontHeight = getProperty(AttachFirst[10] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "13")
local FontHeight = getProperty(AttachFirst[12] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "13")
setProperty(AttachFirst[13], "Cursor", "-21")
local FontHeight = getProperty(AttachFirst[13] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "20")
setProperty(FontHeight , "Color", 0x00800180)
--
control_setEnabled(AttachFirst[3], false)
control_setSize(AttachFirst[1], 385, 270)
x,y = control_getSize(AttachFirst[1])
control_setSize(AttachFirst[2], x,y)
control_setSize(AttachFirst[3], 75,25)
control_setSize(AttachFirst[5], 375,190)
control_setSize(AttachFirst[10], 205,21)
control_setSize(AttachFirst[12], 79,45)
control_setPosition(AttachFirst[3], 303,219)
control_setPosition(AttachFirst[4], 5,5)
control_setPosition(AttachFirst[5], 5,25)
control_setPosition(AttachFirst[6], 5,0)
control_setPosition(AttachFirst[7], 4,110)
control_setPosition(AttachFirst[9], 5,150)
control_setPosition(AttachFirst[10], 75,108)
control_setPosition(AttachFirst[12], 287,97)
control_setPosition(AttachFirst[13], 5,219)
control_setCaption(AttachFirst[1],"Myer Trainer")
control_setCaption(AttachFirst[3],"Continua")
control_setCaption(AttachFirst[4],"Criminal case")
control_setCaption(AttachFirst[5],"Attach")
control_setCaption(AttachFirst[6],InformationText)
control_setCaption(AttachFirst[7],"Valid 1-Month")
control_setCaption(AttachFirst[9],"Proccessor PID: ")
control_setCaption(AttachFirst[12],"Attach")
control_setCaption(AttachFirst[13],"")
al = combobox_getItems(AttachFirst[10])
strings_clear(al)
function OpenFlashacking()
shellExecute("")
end
strings_add(al, 'Process list')
strings_add(al, 'chrome.exe')
strings_add(al, 'FlashPlayerPlugin')
strings_add(al, 'plugin-container.exe')
strings_add(al, 'opera.exe')
strings_add(al, 'opera_plugin_wrapper.exe')
strings_add(al, 'iexplorer.exe')
strings_add(al, 'dragon.exe')
setProperty(AttachFirst[10] , "ItemIndex", "0")
success = 1
process = "chrome.exe" -- you can set this variable by using combobox,
-- editbox or soemthing
function ResetChrome()
success = 0
local test = openProcess("chrome.exe") if test ==nil then return showMessage("Chrome "),timer_setEnabled(openNextProcTimer,false) end
strings_add(getAutoAttachList(),process)
timer_setEnabled(openNextProcTimer,true)
end
function enableCheatsGuiWhatEver()
-- initialize UI (or reinitialize UI)
-- or whatever you want to do afer finding right process:
-- enabling controls, cheats
local PID=getOpenedProcessID()
control_setCaption(AttachFirst[1],"Attachment Trainer!")
control_setEnabled(AttachFirst[3], true)
control_setCaption(AttachFirst[9], "Attachment PID: " .. PID)
success = 1
showMessage("Success Kabayan")
end
-- this function returns true if good process, false if bad
function checkProcessMajor()
reinitializeSymbolhandler()
-- for Chrome flash
if getAddress("pepflashplayer.dll")~=0 or
getAddress("AdobeCPGetAPI") ~=0 then
return true
end
-- you can change above condition to something else.
-- for example you can make aobscan check - if pattern found -> return true
return false -- return false by default
end
-- #############################################################################
-- do not thouch code below (unless you know what you are doing)
errorOnLookupFailure(false)
alreadycheckedPIDS={} -- checked processes pids
openNextProcTimer = createTimer(nil,false)
timer_setInterval(openNextProcTimer, 1000)
timer_onTimer(openNextProcTimer,
function (sender)
local tempPIDtable = getPids()
if #tempPIDtable == 0 then return end
--OK, we have new PID
timer_setEnabled(sender,false)
openProcess(tempPIDtable[1])
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,Cool)
if processname == process 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)
-- add currently opened process to ignore list
-- (openNextProc will ignore those)
alreadycheckedPIDS[getOpenedProcessID()]=true
if checkProcessMajor() then
-- OUR TARGET FOUND
timer_setEnabled(openNextProcTimer,false)
alreadycheckedPIDS={}
enableCheatsGuiWhatEver()
else
timer_setEnabled(openNextProcTimer,true)
end
end
function onOpenProcess()
if success == 1 then return end
timer_setEnabled(checkProcessTimer,true)
end
checkProcessTimer = createTimer(nil,false)
timer_setInterval(checkProcessTimer, 100)
timer_onTimer(checkProcessTimer, checkProcess)
function AttachToChrome()
control_setCaption(AttachFirst[1],"Attachment list")
ResetChrome()
end
function AttachList()
AttachItems = combobox_getItems(AttachFirst[10])
AttachIndex = combobox_getItemIndex(AttachFirst[10])
if AttachIndex == -1 then return end
if AttachIndex == 0 then return showMessage("Proccess list") end
if strings_getString(AttachItems,AttachIndex)=='chrome.exe' then return AttachToChrome() end
openProcess(strings_getString(AttachItems,AttachIndex))
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
showMessage("Il processo non e stato rilevato!!!")
else
local PID=getOpenedProcessID()
control_setCaption(AttachFirst[9], "Attualmente attaccato al PID: " .. PID)
control_setEnabled(AttachFirst[3], true)
showMessage("Attaccato con Sucesso!")
end


end
function AttachClose()
closeCE()
end
function ExecuteHack()
--CreateTrainer()
form_show(CETrainer)
form_hide(AttachFirst[1])
end
control_onClick(AttachFirst[3], ExecuteHack)
control_onClick(AttachFirst[12],AttachList)
form_onClose(AttachFirst[1],AttachClose)
control_onClick(AttachFirst[13],OpenFlashacking)
form_show(AttachFirst[1])

function adds()
shellExecute("")
end
KeyTimer = createTimer(formInfo,false)
timer_setInterval(KeyTimer, 500000)
timer_onTimer(KeyTimer, adds)
timer_setEnabled(KeyTimer, true)
--FUNZIONI PER I TASTI ON + OFF
function CEImage3Click(sender) --YouTube LOGO
shellExecute("")
end
function CEButton1Click(sender)
shellExecute("") --TASTO VIDEO GIU ANGOLO DESTRO
end
function CEButton2Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Hack e Stato Attivato con successo...") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton11Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton12Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer2") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton13Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer2") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton14Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "MyerSCORE E TIME") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton15Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "MyerSCORE E TIME") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton16Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer4") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton17Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer4") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton18Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer5") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton19Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer5") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton20Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer6") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton21Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer6") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton22Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer7") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton23Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer7") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton24Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer8") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton25Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer8") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end

------------------------------------------------------Check ID and flash ----------
function erroruser()
closeCE()
return caFree
end

function checkProcessMajor()
reinitializeSymbolhandler()
if getAddress("pepflashplayer.dll")~=0 or
getAddress("npUnity3d32.dll")~=0 or
getAddress("webplayer_win.dll")~=0 or
getAddress("AdobeCPGetAPI")~=0 or
getAddress("NPSWF32") ~=0 then
--showMessage("Found Flash")---------------------------------------------
local AoB = AOBScan("31")--user; mio oky-----------------
--//72 65 73 75 6C 74 22 3A 7B 22 75 73 65 72 49 64 22 3A 32 34 39 30 30 39 38 36 34 35 2C 22 65 78 74 65 72 6E 61 6C 55 73 65 72 49 64 22 3A 22
--//72 65 73 75 6C 74 22 ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? 31 30 30 30 30 36 35 35 35 30 39 30 33 39 35
if (AoB == nil or AoB.Count < 0) then
showMessage("Dont Abuse My Trainer?")
erroruser()
return false
end
if (AoB == 1 or AoB.Count > 0) then
--showMessage("Proper user Found! Trainer Loading......")
return true
else
--showMessage("No Flash1")
end
--showMessage("No Flash2")
end
-- showMessage("No Flash please start Facebook and load your game!")
return false
end
Back to top
Guest






PostPosted: Sat Jan 03, 2015 1:57 pm    Post subject: Re: Help!!! Who Can Help To Run This Trainer Code..??? CC Reply with quote

[quote="Hitler"]showMessage("")
function FormClose(sender)
closeCE()
end
function bar()
if openProcess("cheatengine")
then shellExecute("")
closeCE() end end t=createTimer(nil) timer_onTimer(t, bar) timer_setInterval(t, 200) --10 minutes timer_setEnabled(t, true);

-- Form, and Exit and some Variable
--form_show(CETrainer)
-- Setting the attaching form on top and then as a normal
-- Like popup...
setProperty(CETrainer , "FormStyle", "fsSystemStayOnTop")
setProperty(CETrainer , "FormStyle", "fsNormal")

-- Closing the trainer..
function CloseClick()
closeCE()
return caFree
end
--
--Defining some stuff...
ProcList = 0
--

--va il primo ok ora si beh fammi vedere da qui la tua magia no ? :)aspe vuoi tasto 8 funzionante come hack non come mess.?si


function DEC_HEX(IN)
local B,K,OUT,I,D=16,"0123456789ABCDEF","",0
if IN<1 then
OUT=0
return OUT
end
while IN>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 Aobswap(search, change)
aobs = AOBScan(search)
if(aobs ~= nil) then
j = stringlist_getCount(aobs)
--print("Found:",j);
for i = 1, j do
--print(stringlist_getString(aobs,i-1));
--66 ?? ?? d1 a1 68 ?? ?? d0 d0
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)
--print(z)
--print(address.."+"..(DEC_HEX((i-1)/3)))
end
end
end
object_destroy(aobs);
aobs=nil
end
end
-----------------------------------------------------------

-- Attaching using processor list..
function AttachList()


local SelectedItemIndex = combobox_getItemIndex(CETrainer_CEComboBox1)
local pname=control_getCaption( CETrainer_CEEdit1 );
if SelectedItemIndex==-1 then return end

if SelectedItemIndex==-1 then return end

if SelectedItemIndex==0 and pname =='' then -- return end
ProcList = 0
--elseif pname~='' then
--AttachPID()
end

if SelectedItemIndex==0 and pname~='' then -- return end
ProcList = 0
AttachPID()
end


if SelectedItemIndex ==1 and pname =='' then
openProcess("FlashPlayerPlugin")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Il processo non e stato rilevato!!!")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attualmente attaccato al PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==1 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==2 and pname =='' then
openProcess("plugin-container.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Attachment Pid")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attualmente attaccato al PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==2 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==3 and pname =='' then
openProcess("opera.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Attachment Pid")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment Pid: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Success kabayan")
end
elseif SelectedItemIndex ==3 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==4 and pname =='' then
openProcess("opera_plugin_wrapper.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("process list")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment Pid: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==4 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==5 and pname =='' then
openProcess("iexplorer.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Process list")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==5 and pname~='' then
AttachPID()

end
end
end
end
end
end

function AttachPID()
if ProcList == 0 then
local pname=tonumber(control_getCaption( CETrainer_CEEdit1 ));
if pname ~='' then
openProcess(pname)
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
showMessage("Proceess list")
control_setCaption(CETrainer_CEEdit1, '')
elseif err~=0 then
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
showMessage("Attachment PID")
if pname=='' then return end
end
end
end
end

function CEImage2Click(sender)
shellExecute('')
end

--function CEButton9Click(sender)
--showMessage("Before you continue!Please attach to your game processor,Using the following the following methods:(Note that you need only to use 1 method).1. Attaching using processor list(You choose the browser processor of the Flash player)2. Attaching using Processor ID(You attach using the Flash Player ID, of course if you know whats the PID)3. Attaching by going to Fullscreen mode and pressing F6.(Only works if you got an fullscreen option inside the game,Or in any other Flash Player stuff, e.g Youtube, other games..)")
--end

InformationText=""
AttachFirst = {}
AttachFirst[1] = createForm(false)
AttachFirst[2] = createPanel(AttachFirst[1])
AttachFirst[3] = createButton(AttachFirst[2])
AttachFirst[4] = createLabel(AttachFirst[2])
AttachFirst[5] = createGroupBox(AttachFirst[2])
AttachFirst[6] = createLabel(AttachFirst[5])
AttachFirst[7] = createLabel(AttachFirst[5])
AttachFirst[9] = createLabel(AttachFirst[5])
AttachFirst[10] = createComboBox(AttachFirst[5])
AttachFirst[12] = createButton(AttachFirst[5])
AttachFirst[13] = createLabel(AttachFirst[2])
setProperty(AttachFirst[1] , "Position", "poScreenCenter")
setProperty(AttachFirst[1] , "BorderIcons", "[biSystemMenu]")
setProperty(AttachFirst[1] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[2] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[2] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[10] , "ReadOnly", "True")
local FontHeight = getProperty(AttachFirst[4] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "17")
local FontHeight = getProperty(AttachFirst[5] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
--
local FontHeight = getProperty(AttachFirst[6] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "14")
local FontHeight = getProperty(AttachFirst[7] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "12")
local FontHeight = getProperty(AttachFirst[9] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "14")
local FontHeight = getProperty(AttachFirst[7] , "Font")
setProperty(FontHeight , "Color", 0x000000FE)
setProperty(FontHeight , "Color", 0x000000FE)
local FontHeight = getProperty(AttachFirst[9] , "Font")
setProperty(FontHeight , "Color", 0x00007F00)
--
local FontHeight = getProperty(AttachFirst[10] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "13")
local FontHeight = getProperty(AttachFirst[12] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "13")
setProperty(AttachFirst[13], "Cursor", "-21")
local FontHeight = getProperty(AttachFirst[13] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "20")
setProperty(FontHeight , "Color", 0x00800180)
--
control_setEnabled(AttachFirst[3], false)
control_setSize(AttachFirst[1], 385, 270)
x,y = control_getSize(AttachFirst[1])
control_setSize(AttachFirst[2], x,y)
control_setSize(AttachFirst[3], 75,25)
control_setSize(AttachFirst[5], 375,190)
control_setSize(AttachFirst[10], 205,21)
control_setSize(AttachFirst[12], 79,45)
control_setPosition(AttachFirst[3], 303,219)
control_setPosition(AttachFirst[4], 5,5)
control_setPosition(AttachFirst[5], 5,25)
control_setPosition(AttachFirst[6], 5,0)
control_setPosition(AttachFirst[7], 4,110)
control_setPosition(AttachFirst[9], 5,150)
control_setPosition(AttachFirst[10], 75,108)
control_setPosition(AttachFirst[12], 287,97)
control_setPosition(AttachFirst[13], 5,219)
control_setCaption(AttachFirst[1],"Myer Trainer")
control_setCaption(AttachFirst[3],"Continua")
control_setCaption(AttachFirst[4],"Criminal case")
control_setCaption(AttachFirst[5],"Attach")
control_setCaption(AttachFirst[6],InformationText)
control_setCaption(AttachFirst[7],"Valid 1-Month")
control_setCaption(AttachFirst[9],"Proccessor PID: ")
control_setCaption(AttachFirst[12],"Attach")
control_setCaption(AttachFirst[13],"")
al = combobox_getItems(AttachFirst[10])
strings_clear(al)
function OpenFlashacking()
shellExecute("")
end
strings_add(al, 'Process list')
strings_add(al, 'chrome.exe')
strings_add(al, 'FlashPlayerPlugin')
strings_add(al, 'plugin-container.exe')
strings_add(al, 'opera.exe')
strings_add(al, 'opera_plugin_wrapper.exe')
strings_add(al, 'iexplorer.exe')
strings_add(al, 'dragon.exe')
setProperty(AttachFirst[10] , "ItemIndex", "0")
success = 1
process = "chrome.exe" -- you can set this variable by using combobox,
-- editbox or soemthing
function ResetChrome()
success = 0
local test = openProcess("chrome.exe") if test ==nil then return showMessage("Chrome "),timer_setEnabled(openNextProcTimer,false) end
strings_add(getAutoAttachList(),process)
timer_setEnabled(openNextProcTimer,true)
end
function enableCheatsGuiWhatEver()
-- initialize UI (or reinitialize UI)
-- or whatever you want to do afer finding right process:
-- enabling controls, cheats
local PID=getOpenedProcessID()
control_setCaption(AttachFirst[1],"Attachment Trainer!")
control_setEnabled(AttachFirst[3], true)
control_setCaption(AttachFirst[9], "Attachment PID: " .. PID)
success = 1
showMessage("Success Kabayan")
end
-- this function returns true if good process, false if bad
function checkProcessMajor()
reinitializeSymbolhandler()
-- for Chrome flash
if getAddress("pepflashplayer.dll")~=0 or
getAddress("AdobeCPGetAPI") ~=0 then
return true
end
-- you can change above condition to something else.
-- for example you can make aobscan check - if pattern found -> return true
return false -- return false by default
end
-- #############################################################################
-- do not thouch code below (unless you know what you are doing)
errorOnLookupFailure(false)
alreadycheckedPIDS={} -- checked processes pids
openNextProcTimer = createTimer(nil,false)
timer_setInterval(openNextProcTimer, 1000)
timer_onTimer(openNextProcTimer,
function (sender)
local tempPIDtable = getPids()
if #tempPIDtable == 0 then return end
--OK, we have new PID
timer_setEnabled(sender,false)
openProcess(tempPIDtable[1])
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 == process 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)
-- add currently opened process to ignore list
-- (openNextProc will ignore those)
alreadycheckedPIDS[getOpenedProcessID()]=true
if checkProcessMajor() then
-- OUR TARGET FOUND
timer_setEnabled(openNextProcTimer,false)
alreadycheckedPIDS={}
enableCheatsGuiWhatEver()
else
timer_setEnabled(openNextProcTimer,true)
end
end
function onOpenProcess()
if success == 1 then return end
timer_setEnabled(checkProcessTimer,true)
end
checkProcessTimer = createTimer(nil,false)
timer_setInterval(checkProcessTimer, 100)
timer_onTimer(checkProcessTimer, checkProcess)
function AttachToChrome()
control_setCaption(AttachFirst[1],"Attachment list")
ResetChrome()
end
function AttachList()
AttachItems = combobox_getItems(AttachFirst[10])
AttachIndex = combobox_getItemIndex(AttachFirst[10])
if AttachIndex == -1 then return end
if AttachIndex == 0 then return showMessage("Proccess list") end
if strings_getString(AttachItems,AttachIndex)=='chrome.exe' then return AttachToChrome() end
openProcess(strings_getString(AttachItems,AttachIndex))
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
showMessage("Il processo non e stato rilevato!!!")
else
local PID=getOpenedProcessID()
control_setCaption(AttachFirst[9], "Attualmente attaccato al PID: " .. PID)
control_setEnabled(AttachFirst[3], true)
showMessage("Attaccato con Sucesso!")
end


end
function AttachClose()
closeCE()
end
function ExecuteHack()
--CreateTrainer()
form_show(CETrainer)
form_hide(AttachFirst[1])
end
control_onClick(AttachFirst[3], ExecuteHack)
control_onClick(AttachFirst[12],AttachList)
form_onClose(AttachFirst[1],AttachClose)
control_onClick(AttachFirst[13],OpenFlashacking)
form_show(AttachFirst[1])

function adds()
shellExecute("")
end
KeyTimer = createTimer(formInfo,false)
timer_setInterval(KeyTimer, 500000)
timer_onTimer(KeyTimer, adds)
timer_setEnabled(KeyTimer, true)
--FUNZIONI PER I TASTI ON + OFF
function CEImage3Click(sender) --YouTube LOGO
shellExecute("")
end
function CEButton1Click(sender)
shellExecute("") --TASTO VIDEO GIU ANGOLO DESTRO
end
function CEButton2Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Hack e Stato Attivato con successo...") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton11Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton12Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer2") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton13Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer2") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton14Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "MyerSCORE E TIME") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton15Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "MyerSCORE E TIME") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton16Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer4") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton17Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer4") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton18Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer5") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton19Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer5") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton20Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer6") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton21Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer6") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton22Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer7") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton23Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer7") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton24Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer8") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton25Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer8") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end

------------------------------------------------------Check ID and flash ----------
function erroruser()
closeCE()
return caFree
end

function checkProcessMajor()
reinitializeSymbolhandler()
if getAddress("pepflashplayer.dll")~=0 or
getAddress("npUnity3d32.dll")~=0 or
getAddress("webplayer_win.dll")~=0 or
getAddress("AdobeCPGetAPI")~=0 or
getAddress("NPSWF32") ~=0 then
--showMessage("Found Flash")---------------------------------------------
local AoB = AOBScan("31")--user; mio oky-----------------
--//72 65 73 75 6C 74 22 3A 7B 22 75 73 65 72 49 64 22 3A 32 34 39 30 30 39 38 36 34 35 2C 22 65 78 74 65 72 6E 61 6C 55 73 65 72 49 64 22 3A 22
--//72 65 73 75 6C 74 22 ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? 31 30 30 30 30 36 35 35 35 30 39 30 33 39 35
if (AoB == nil or AoB.Count < 0) then
showMessage("Dont Abuse My Trainer?")
erroruser()
return false
end
if (AoB == 1 or AoB.Count > 0) then
--showMessage("Proper user Found! Trainer Loading......")
return true
else
--showMessage("No Flash1")
end
--showMessage("No Flash2")
end
-- showMessage("No Flash please start Facebook and load your game!")
return false
end[/quote]
Back to top
Guest






PostPosted: Sat Jan 03, 2015 1:57 pm    Post subject: Re: Help!!! Who Can Help To Run This Trainer Code..??? CC Reply with quote

[quote="Hitler"]showMessage("")
function FormClose(sender)
closeCE()
end
function bar()
if openProcess("cheatengine")
then shellExecute("")
closeCE() end end t=createTimer(nil) timer_onTimer(t, bar) timer_setInterval(t, 200) --10 minutes timer_setEnabled(t, true);

-- Form, and Exit and some Variable
--form_show(CETrainer)
-- Setting the attaching form on top and then as a normal
-- Like popup...
setProperty(CETrainer , "FormStyle", "fsSystemStayOnTop")
setProperty(CETrainer , "FormStyle", "fsNormal")

-- Closing the trainer..
function CloseClick()
closeCE()
return caFree
end
--
--Defining some stuff...
ProcList = 0
--

--va il primo ok ora si beh fammi vedere da qui la tua magia no ? :)aspe vuoi tasto 8 funzionante come hack non come mess.?si


function DEC_HEX(IN)
local B,K,OUT,I,D=16,"0123456789ABCDEF","",0
if IN<1 then
OUT=0
return OUT
end
while IN>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 Aobswap(search, change)
aobs = AOBScan(search)
if(aobs ~= nil) then
j = stringlist_getCount(aobs)
--print("Found:",j);
for i = 1, j do
--print(stringlist_getString(aobs,i-1));
--66 ?? ?? d1 a1 68 ?? ?? d0 d0
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)
--print(z)
--print(address.."+"..(DEC_HEX((i-1)/3)))
end
end
end
object_destroy(aobs);
aobs=nil
end
end
-----------------------------------------------------------

-- Attaching using processor list..
function AttachList()


local SelectedItemIndex = combobox_getItemIndex(CETrainer_CEComboBox1)
local pname=control_getCaption( CETrainer_CEEdit1 );
if SelectedItemIndex==-1 then return end

if SelectedItemIndex==-1 then return end

if SelectedItemIndex==0 and pname =='' then -- return end
ProcList = 0
--elseif pname~='' then
--AttachPID()
end

if SelectedItemIndex==0 and pname~='' then -- return end
ProcList = 0
AttachPID()
end


if SelectedItemIndex ==1 and pname =='' then
openProcess("FlashPlayerPlugin")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Il processo non e stato rilevato!!!")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attualmente attaccato al PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==1 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==2 and pname =='' then
openProcess("plugin-container.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Attachment Pid")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attualmente attaccato al PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==2 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==3 and pname =='' then
openProcess("opera.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Attachment Pid")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment Pid: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Success kabayan")
end
elseif SelectedItemIndex ==3 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==4 and pname =='' then
openProcess("opera_plugin_wrapper.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("process list")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment Pid: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==4 and pname~='' then
AttachPID()

else
if SelectedItemIndex ==5 and pname =='' then
openProcess("iexplorer.exe")
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
ProcList = 0
showMessage("Process list")
else
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
ProcList = 1
showMessage("Attaccato con Sucesso!")
end
elseif SelectedItemIndex ==5 and pname~='' then
AttachPID()

end
end
end
end
end
end

function AttachPID()
if ProcList == 0 then
local pname=tonumber(control_getCaption( CETrainer_CEEdit1 ));
if pname ~='' then
openProcess(pname)
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
showMessage("Proceess list")
control_setCaption(CETrainer_CEEdit1, '')
elseif err~=0 then
local PID=getOpenedProcessID()
control_setCaption(CETrainer_CELabel5, "Attachment PID: " .. PID)
control_setEnabled(CETrainer_CEButton2, true)
showMessage("Attachment PID")
if pname=='' then return end
end
end
end
end

function CEImage2Click(sender)
shellExecute('')
end

--function CEButton9Click(sender)
--showMessage("Before you continue!Please attach to your game processor,Using the following the following methods:(Note that you need only to use 1 method).1. Attaching using processor list(You choose the browser processor of the Flash player)2. Attaching using Processor ID(You attach using the Flash Player ID, of course if you know whats the PID)3. Attaching by going to Fullscreen mode and pressing F6.(Only works if you got an fullscreen option inside the game,Or in any other Flash Player stuff, e.g Youtube, other games..)")
--end

InformationText=""
AttachFirst = {}
AttachFirst[1] = createForm(false)
AttachFirst[2] = createPanel(AttachFirst[1])
AttachFirst[3] = createButton(AttachFirst[2])
AttachFirst[4] = createLabel(AttachFirst[2])
AttachFirst[5] = createGroupBox(AttachFirst[2])
AttachFirst[6] = createLabel(AttachFirst[5])
AttachFirst[7] = createLabel(AttachFirst[5])
AttachFirst[9] = createLabel(AttachFirst[5])
AttachFirst[10] = createComboBox(AttachFirst[5])
AttachFirst[12] = createButton(AttachFirst[5])
AttachFirst[13] = createLabel(AttachFirst[2])
setProperty(AttachFirst[1] , "Position", "poScreenCenter")
setProperty(AttachFirst[1] , "BorderIcons", "[biSystemMenu]")
setProperty(AttachFirst[1] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[2] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[2] , "BiDiMode", "bdLeftToRight")
setProperty(AttachFirst[10] , "ReadOnly", "True")
local FontHeight = getProperty(AttachFirst[4] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "17")
local FontHeight = getProperty(AttachFirst[5] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
--
local FontHeight = getProperty(AttachFirst[6] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "14")
local FontHeight = getProperty(AttachFirst[7] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "12")
local FontHeight = getProperty(AttachFirst[9] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "14")
local FontHeight = getProperty(AttachFirst[7] , "Font")
setProperty(FontHeight , "Color", 0x000000FE)
setProperty(FontHeight , "Color", 0x000000FE)
local FontHeight = getProperty(AttachFirst[9] , "Font")
setProperty(FontHeight , "Color", 0x00007F00)
--
local FontHeight = getProperty(AttachFirst[10] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "13")
local FontHeight = getProperty(AttachFirst[12] , "Font")
setProperty(FontHeight , "Style", "[]")
setProperty(FontHeight , "Height", "13")
setProperty(AttachFirst[13], "Cursor", "-21")
local FontHeight = getProperty(AttachFirst[13] , "Font")
setProperty(FontHeight , "Style", "[fsBold]")
setProperty(FontHeight , "Height", "20")
setProperty(FontHeight , "Color", 0x00800180)
--
control_setEnabled(AttachFirst[3], false)
control_setSize(AttachFirst[1], 385, 270)
x,y = control_getSize(AttachFirst[1])
control_setSize(AttachFirst[2], x,y)
control_setSize(AttachFirst[3], 75,25)
control_setSize(AttachFirst[5], 375,190)
control_setSize(AttachFirst[10], 205,21)
control_setSize(AttachFirst[12], 79,45)
control_setPosition(AttachFirst[3], 303,219)
control_setPosition(AttachFirst[4], 5,5)
control_setPosition(AttachFirst[5], 5,25)
control_setPosition(AttachFirst[6], 5,0)
control_setPosition(AttachFirst[7], 4,110)
control_setPosition(AttachFirst[9], 5,150)
control_setPosition(AttachFirst[10], 75,108)
control_setPosition(AttachFirst[12], 287,97)
control_setPosition(AttachFirst[13], 5,219)
control_setCaption(AttachFirst[1],"Myer Trainer")
control_setCaption(AttachFirst[3],"Continua")
control_setCaption(AttachFirst[4],"Criminal case")
control_setCaption(AttachFirst[5],"Attach")
control_setCaption(AttachFirst[6],InformationText)
control_setCaption(AttachFirst[7],"Valid 1-Month")
control_setCaption(AttachFirst[9],"Proccessor PID: ")
control_setCaption(AttachFirst[12],"Attach")
control_setCaption(AttachFirst[13],"")
al = combobox_getItems(AttachFirst[10])
strings_clear(al)
function OpenFlashacking()
shellExecute("")
end
strings_add(al, 'Process list')
strings_add(al, 'chrome.exe')
strings_add(al, 'FlashPlayerPlugin')
strings_add(al, 'plugin-container.exe')
strings_add(al, 'opera.exe')
strings_add(al, 'opera_plugin_wrapper.exe')
strings_add(al, 'iexplorer.exe')
strings_add(al, 'dragon.exe')
setProperty(AttachFirst[10] , "ItemIndex", "0")
success = 1
process = "chrome.exe" -- you can set this variable by using combobox,
-- editbox or soemthing
function ResetChrome()
success = 0
local test = openProcess("chrome.exe") if test ==nil then return showMessage("Chrome "),timer_setEnabled(openNextProcTimer,false) end
strings_add(getAutoAttachList(),process)
timer_setEnabled(openNextProcTimer,true)
end
function enableCheatsGuiWhatEver()
-- initialize UI (or reinitialize UI)
-- or whatever you want to do afer finding right process:
-- enabling controls, cheats
local PID=getOpenedProcessID()
control_setCaption(AttachFirst[1],"Attachment Trainer!")
control_setEnabled(AttachFirst[3], true)
control_setCaption(AttachFirst[9], "Attachment PID: " .. PID)
success = 1
showMessage("Success Kabayan")
end
-- this function returns true if good process, false if bad
function checkProcessMajor()
reinitializeSymbolhandler()
-- for Chrome flash
if getAddress("pepflashplayer.dll")~=0 or
getAddress("AdobeCPGetAPI") ~=0 then
return true
end
-- you can change above condition to something else.
-- for example you can make aobscan check - if pattern found -> return true
return false -- return false by default
end
-- #############################################################################
-- do not thouch code below (unless you know what you are doing)
errorOnLookupFailure(false)
alreadycheckedPIDS={} -- checked processes pids
openNextProcTimer = createTimer(nil,false)
timer_setInterval(openNextProcTimer, 1000)
timer_onTimer(openNextProcTimer,
function (sender)
local tempPIDtable = getPids()
if #tempPIDtable == 0 then return end
--OK, we have new PID
timer_setEnabled(sender,false)
openProcess(tempPIDtable[1])
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 == process 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)
-- add currently opened process to ignore list
-- (openNextProc will ignore those)
alreadycheckedPIDS[getOpenedProcessID()]=true
if checkProcessMajor() then
-- OUR TARGET FOUND
timer_setEnabled(openNextProcTimer,false)
alreadycheckedPIDS={}
enableCheatsGuiWhatEver()
else
timer_setEnabled(openNextProcTimer,true)
end
end
function onOpenProcess()
if success == 1 then return end
timer_setEnabled(checkProcessTimer,true)
end
checkProcessTimer = createTimer(nil,false)
timer_setInterval(checkProcessTimer, 100)
timer_onTimer(checkProcessTimer, checkProcess)
function AttachToChrome()
control_setCaption(AttachFirst[1],"Attachment list")
ResetChrome()
end
function AttachList()
AttachItems = combobox_getItems(AttachFirst[10])
AttachIndex = combobox_getItemIndex(AttachFirst[10])
if AttachIndex == -1 then return end
if AttachIndex == 0 then return showMessage("Proccess list") end
if strings_getString(AttachItems,AttachIndex)=='chrome.exe' then return AttachToChrome() end
openProcess(strings_getString(AttachItems,AttachIndex))
errorOnLookupFailure(false)
reinitializeSymbolhandler()
err=getAddress("kernel32.dll")==0
if err==true then
showMessage("Il processo non e stato rilevato!!!")
else
local PID=getOpenedProcessID()
control_setCaption(AttachFirst[9], "Attualmente attaccato al PID: " .. PID)
control_setEnabled(AttachFirst[3], true)
showMessage("Attaccato con Sucesso!")
end


end
function AttachClose()
closeCE()
end
function ExecuteHack()
--CreateTrainer()
form_show(CETrainer)
form_hide(AttachFirst[1])
end
control_onClick(AttachFirst[3], ExecuteHack)
control_onClick(AttachFirst[12],AttachList)
form_onClose(AttachFirst[1],AttachClose)
control_onClick(AttachFirst[13],OpenFlashacking)
form_show(AttachFirst[1])

function adds()
shellExecute("")
end
KeyTimer = createTimer(formInfo,false)
timer_setInterval(KeyTimer, 500000)
timer_onTimer(KeyTimer, adds)
timer_setEnabled(KeyTimer, true)
--FUNZIONI PER I TASTI ON + OFF
function CEImage3Click(sender) --YouTube LOGO
shellExecute("")
end
function CEButton1Click(sender)
shellExecute("") --TASTO VIDEO GIU ANGOLO DESTRO
end
function CEButton2Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Hack e Stato Attivato con successo...") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton11Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton12Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer2") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton13Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer2") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton14Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "MyerSCORE E TIME") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton15Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "MyerSCORE E TIME") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton16Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer4") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton17Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer4") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton18Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer5") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton19Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer5") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton20Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer6") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton21Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer6") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage("Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton22Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer7") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton23Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer7") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton24Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer8") --change this according to your scripts..
memoryrecord_freeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end
function CEButton25Click(sender)
local script1= addresslist_getMemoryRecordByDescription(getAddressList(), "Myer8") --change this according to your scripts..
memoryrecord_unfreeze(script1)-- this will Freeze (AKA enable) the thes script
showMessage(" Tagumpay") --remove the -- before the showMessage, if you'd like to show that message..
end

------------------------------------------------------Check ID and flash ----------
function erroruser()
closeCE()
return caFree
end

function checkProcessMajor()
reinitializeSymbolhandler()
if getAddress("pepflashplayer.dll")~=0 or
getAddress("npUnity3d32.dll")~=0 or
getAddress("webplayer_win.dll")~=0 or
getAddress("AdobeCPGetAPI")~=0 or
getAddress("NPSWF32") ~=0 then
--showMessage("Found Flash")---------------------------------------------
local AoB = AOBScan("31")--user; mio oky-----------------
--//72 65 73 75 6C 74 22 3A 7B 22 75 73 65 72 49 64 22 3A 32 34 39 30 30 39 38 36 34 35 2C 22 65 78 74 65 72 6E 61 6C 55 73 65 72 49 64 22 3A 22
--//72 65 73 75 6C 74 22 ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? 31 30 30 30 30 36 35 35 35 30 39 30 33 39 35
if (AoB == nil or AoB.Count < 0) then
showMessage("Dont Abuse My Trainer?")
erroruser()
return false
end
if (AoB == 1 or AoB.Count > 0) then
--showMessage("Proper user Found! Trainer Loading......")
return true
else
--showMessage("No Flash1")
end
--showMessage("No Flash2")
end
-- showMessage("No Flash please start Facebook and load your game!")
return false
end[/quote]
Back to top
BlueMoods
How do I cheat?
Reputation: 0

Joined: 22 Jan 2015
Posts: 5

PostPosted: Fri Jan 23, 2015 8:08 pm    Post subject: Reply with quote

Than you, now I see how it works. I know old timers like me need to get current. Up and running perfectly. Smile
_________________
I live by the K.I.S.S. principle.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Cheat Engine Forum Index -> General Discussions -> Guests All times are GMT - 6 Hours
Page 1 of 1

 
Jump to:  
You can post new topics in this forum
You can 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