local frames = 0
local dbg = manager.machine.debugger
dbg:command("bpset 3F53D820,,{ printf \"REGIDSTORE id=%08X obj=%08X\n\", d@(a9+0x40), a11 ; g }")
dbg:command("bpset 3F2DCF90,,{ printf \"r9F2 a8=%08X\n\", a8 ; g }")
dbg:command("bpset 3F2DD000,,{ printf \"rA00 a8=%08X\n\", a8 ; g }")
dbg:command("bpset 3F2DD0C0,,{ printf \"rA18 a8=%08X\n\", a8 ; g }")
dbg:command("bpset 3F2DD150,,{ printf \"rA2A a8=%08X\n\", a8 ; g }")
dbg:command("bpset 3F2DD180,,{ printf \"ERRCHAIN_1BA30\n\" ; g }")
dbg:command("bpset 3F2DD530,,{ printf \"ERR_1BAA6\n\" ; g }")
dbg:command("bpset 3F2DD630,,{ printf \"ERR_1BAC6\n\" ; g }")
dbg:command("bpset 3F2DDCB0,,{ printf \"ERR_1BB96\n\" ; g }")
dbg:command("bpset 3F2DDE00,,{ printf \"DRIVER_RET a8=%08X\n\", a8 ; g }")
print("XIE-CMP armed 10")
emu.register_frame_done(function()
  frames = frames + 1
  if frames >= 2000000 then machine:exit() end
end, "cmp")