blob: 55f4b6339c9e17d672da338a71d243790f68001b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
lb: MACRO ; r, hi, lo
ld \1, (\2) << 8 + ((\3) & $ff)
ENDM
ldtx: MACRO
if _NARG == 2
ld \1, \2_
else
ld \1, \2_ \3
endc
ENDM
bank1call: MACRO
rst $18
dw \1
ENDM
farcall: MACRO
rst $28
if _NARG == 1
db BANK(\1)
dw \1
else
db \1
dw \2
endc
ENDM
; the rst $38 handler is a single ret instruction
; probably used for testing purposes during development
debug_ret EQUS "rst $38"
|
