yUxJC5E9@Kz#ii4;Xu*W%M$A1X2^{]npVPG#mMH7nwg$a!n{ZiIV8V.Ih(C,JTs+v1ITB0PAn,N%,F(3tLJgf$xO^Ffve[+?ZpNXGK)^la#A?NIDxh{m6nv]:W*Uq5X,cYVRlUe,r]8RwQ3r_Dufnx_2(]#$:U3Da3L[CBP21(zbGZOhzaN]1@?
--[[
AOB Swap Function
--]]
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, "+W*X")
if(aobs == nil) then
AobSwapCheck=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
AobSwapCheck=true
end
end
--[[
Button Press
--]]
function CEButton1Click(sender)
Aobswap("28 ?? ?? ?? ?? 7B 24 1C 00 04 0A 06 2A","2 00 40 42 44 2A 12 1C 00 04 0A 06 2A")
end