<?xml version="1.0" encoding="utf-8"?>
<CheatTable>
  <CheatEntries>
    <CheatEntry>
      <ID>198</ID>
      <Description>"Generate step 2 aob record"</Description>
      <LastState/>
      <VariableType>Auto Assembler Script</VariableType>
      <AssemblerScript>[ENABLE]
{$lua}
if syntaxcheck then return end
results = AOBScan("29 D0 89 83 80 04 00 00")
if not results then
  return nil, "failed to find aob"
end

al = getAddressList()
for i=0, results.Count-1 do
  -- AA script didn't like parsing [ENALBE] and [DISABLE] so... format to the rescue lol
  local script = [[
  // nop step 2 sub instruction
  [%s]
  define(INJECT, %s)
  INJECT:
    db 90 90
  registersymbol(INJECT)
  [%s]
  INJECT:
    db 29 D0
  unregistersymbol(INJECT)
  ]]
  script = string.format(script, "ENABLE", results[i], "DISABLE")

  mr = al.createMemoryRecord()
  mr.Type = vtAutoAssembler
  mr.Script = script
  mr.Description = "Autogenerated aob script"
  if memrec then -- if in CE 6.7 then nest generated scripts
    mr.appendToEntry(memrec)
  end
end
results.destroy()

-- auto disable this script if in CE 6.7+
if memrec then
  local timer = createTimer()
  timer.Interval = 100
  timer.OnTimer = function(timer)
    memrec.Active = false
    timer.destroy()
  end
end

[DISABLE]

</AssemblerScript>
    </CheatEntry>
  </CheatEntries>
</CheatTable>