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 3F55D560,,{ printf \"STORE src120=%08X\n\", d@(a7+0x120) ; g }")
dbg:command("bpset 3F55D750,,{ printf \"EA a11=%08X star11=%08X argA0=%08X arg40=%08X\n\", a11, d@(a11), d@(a13+0xffa0), d@(a13+0xff40) ; g }")
dbg:command("bpset 3F55D790,,{ printf \"F2 a7=%08X star7=%08X\n\", a7, d@(a7) ; g }")
dbg:command("bpset 3F55D7A0,,{ printf \"GATE a7=%08X a11=%08X\n\", a7, a11 ; g }")
dbg:command("bpset 3F553DA0,,{ printf \"S19RET a8=%08X\n\", a8 ; g }")
print("XIE-GATEOP armed 6 breakpoints")
emu.register_frame_done(function()
  frames = frames + 1
  if frames >= 2000000 then machine:exit() end
end, "gateop")