Skip to content

Instantly share code, notes, and snippets.

@rcg4u
Last active November 2, 2017 00:09
Show Gist options
  • Save rcg4u/52c71d6ba0836701ebdfb0743d86c0ef to your computer and use it in GitHub Desktop.
Save rcg4u/52c71d6ba0836701ebdfb0743d86c0ef to your computer and use it in GitHub Desktop.
Module scan on cheat engine provided by darkbyte
c=createComboBox(MainForm.gbScanOptions)
c.Style='csDropDownList'
c.Items.add('All')
c.ItemIndex=0
c.Align=alTop
c.BorderSpacing.Left=6
c.BorderSpacing.Right=6
c.BorderSpacing.Bottom=2
local modulelist
c.OnDropDown=function(d)
--fill the list
while c.Items.Count>1 do
c.Items.delete(1)
end
modulelist=enumModules()
local i
for i=1, #modulelist do
c.Items.Add(modulelist[i].Name)
end
end
c.OnSelect=function(d)
if c.ItemIndex>=1 then
MainForm.FromAddress.Text=string.format("%.16x",modulelist[c.ItemIndex].Address)
if modulelist[c.ItemIndex].Size==nil then
modulelist[c.ItemIndex].Size=getModuleSize(modulelist[c.ItemIndex].Name)
end
MainForm.ToAddress.Text=string.format("%.16x",modulelist[c.ItemIndex].Address+modulelist[c.ItemIndex].Size)
else
MainForm.FromAddress.Text="0000000000000000"
MainForm.ToAddress.Text="7fffffffffffffff"
end
end
c.Enabled=false
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment