unim.s 354 B

123456789101112131415161718192021222324252627282930
  1. .define unimpld, e.mon, e.rck, .trp.z, .unimpld
  2. .sect .text
  3. .sect .rom
  4. .sect .data
  5. .sect .bss
  6. .sect .text
  7. .unimpld:
  8. unimpld: ! used in dispatch table to
  9. ! catch unimplemented instructions
  10. ld hl,EILLINS
  11. 9: push hl
  12. call .trp.z
  13. ret
  14. e.mon:
  15. ld hl,EMON
  16. jr 9b
  17. e.rck:
  18. push af
  19. ld a,(ignmask)
  20. bit 1,a
  21. jr nz,8f
  22. ld hl,ERANGE
  23. jr 9b
  24. 8:
  25. pop af
  26. ret