12
"define comboPtrLookup"
80000008
Auto Assembler Script
{$lua}
if syntaxcheck ~= true then
function parseComboPtr(s)
local function safeGetAddress(s)
if type(s)=='number' then return s end
if type(s)~='string' then return nil end
local hexform = tonumber(s,16)
if hexform ~= nil then return hexform end
local e = errorOnLookupFailure(false)
local addy = getAddress(s)
errorOnLookupFailure(e)
return addy>0 and addy or nil
end
local function sep(self,SEP)
SEP = type(SEP)=='string' and SEP or ','
local r,s,i,a,b = {},{},1,1,-1
a,b = self:find(SEP,i)
while a~=nil do
r[1+#r]= self:sub(i,a-1)
s[1+#s]= self:sub(a,b)
i = b + 1
a,b = self:find(SEP,i)
end
r[1+#r] = self:sub(i)
return r,s
end
-- if s:match('^:[^"]+:$') then s = s:sub(2,-2) else return nil end
if s:sub(1,1)==':' and s:sub(-1,-1)==':' and s:len()>2 then s = s:sub(2,-2) else return nil end
local bit64 = targetIs64Bit()
local parts,ptype = sep(s,"[|/]")
if #parts>0 and parts[1]:len()>0 then
local addy,offset = safeGetAddress(parts[1])
if addy~= nil then
if #parts<2 then return addy end
for i=2,#parts-1 do
offset = safeGetAddress(parts[i])
if offset~=nil then
if bit64 and ptype[i-1]=='|' then
addy = readQword(addy+offset)
else
addy = readInteger(addy+offset)
end
else
addy = nil
end
if addy==nil then break end
end
if addy ~= nil then
if parts[#parts]:len()==0 then return addy end --
offset = safeGetAddress(parts[#parts])
if offset~=nil then
return addy+offset
end
end
end
end
end
if ComboPtrID~=nil then unregisterSymbolLookupCallback(ComboPtrID) end
ComboPtrID=registerSymbolLookupCallback(parseComboPtr,slFailure)
end
[ENABLE]
[DISABLE]
1
"test comboPtrLookup , setup"
80000008
Auto Assembler Script
[ENABLE]
globalalloc(__,$4000)
__:
dq __
__+10:
dq __+20
__+28:
dq __+30
__+38:
dq __+40
__+48:
dq __+50
__+50:
dq #999999
[DISABLE]
// http://forum.cheatengine.org/viewtopic.php?t=530003
3
"normal ptr offset"
80000008
4 Bytes
__
0
8
8
8
10
9
"use comboPtrLookup, all qword ptr"
80000008
4 Bytes
":__|10|8|8|8:"
0
11
"use comboPtrLookup, some dword ptr"
80000008
4 Bytes
":__|10|8/8|8:"
0
5
"toggle broken dword ptr at __+38"
80000008
Auto Assembler Script
__+80:
dq ":__|10|8/8|8|0|0:"
[ENABLE]
__+3c:
dd 1
[DISABLE]
__+3c:
dd 0
13
"open cheatengine-x86_64.exe"
80000008
Auto Assembler Script
{$lua}
if syntaxcheck~=true then openProcess('cheatengine-x86_64.exe') end
[ENABLE]
[DISABLE]
__
0B7D0000
__luacave
06070000