1985-03-29 21:44:50 +00:00
|
|
|
.define unimpld, e.mon, e.rck, .trp.z, .unimpld
|
1987-02-02 13:30:20 +00:00
|
|
|
.sect .text
|
|
|
|
.sect .rom
|
|
|
|
.sect .data
|
|
|
|
.sect .bss
|
|
|
|
.sect .text
|
1985-03-29 21:44:50 +00:00
|
|
|
|
|
|
|
.unimpld:
|
|
|
|
unimpld: ! used in dispatch table to
|
|
|
|
! catch unimplemented instructions
|
|
|
|
ld hl,EILLINS
|
|
|
|
9: push hl
|
|
|
|
call .trp.z
|
1991-08-29 15:08:24 +00:00
|
|
|
ret
|
1985-03-29 21:44:50 +00:00
|
|
|
|
|
|
|
e.mon:
|
|
|
|
ld hl,EMON
|
|
|
|
jr 9b
|
|
|
|
e.rck:
|
|
|
|
push af
|
|
|
|
ld a,(ignmask)
|
|
|
|
bit 1,a
|
|
|
|
jr nz,8f
|
|
|
|
ld hl,ERANGE
|
|
|
|
jr 9b
|
|
|
|
8:
|
|
|
|
pop af
|
|
|
|
ret
|
|
|
|
|
|
|
|
|