dsforth: added "(TR-CAT)"

[urasm.git] / samples / disasm / main.zas

DISASM_DO_ALIGN equ 1

  DEFFMT runtap

  ORG  #8000
  include <open-main-screen.zas>

  ld   hl,Disasm.Disasm
  ld   b,16
  call Disasm.Disasm
  ret

  include "disasm.zas"