local frames = 0
local dbg = manager.machine.debugger
dbg:command("bpset 3F53D820,,{ printf \"CTRL_REGIDSTORE id=%08X obj=%08X\\n\", d@(a9+0x40), a11 ; g }")
dbg:command("bpset 3F553DA0,,{ printf \"CTRL_S19RET a8=%08X\\n\", a8 ; g }")
dbg:command("bpset 3F55CB30,,{ printf \"T_ENTRY\\n\" ; g }")
dbg:command("bpset 3F55D460,,{ printf \"T_DISP\\n\" ; g }")
dbg:command("bpset 3F55D0F0,,{ printf \"T_C2 arg1=%%08X\\n\", d@(a13+0xffc0) ; g }")
dbg:command("bpset 3F55D110,,{ printf \"T_J1\\n\" ; g }")
dbg:command("bpset 3F55D120,,{ printf \"T_B24_copyout\\n\" ; g }")
dbg:command("bpset 3F55D190,,{ printf \"T_B32_zerochk\\n\" ; g }")
dbg:command("bpset 3F55D510,,{ printf \"T_MERGE\\n\" ; g }")
dbg:command("bpset 3F55D7A0,,{ printf \"T_GATE a7=%%08X a11=%%08X\\n\", a7, a11 ; g }")
print("XIE-VAL armed 10")
emu.register_frame_done(function()
  frames = frames + 1
  if frames >= 2000000 then machine:exit() end
end, "val")