blob: 47b698f8609c2aed1234a7ed0e856e97ea2fd5f3 (
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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
INCROM: MACRO
INCBIN "baserom.gbc", \1, \2 - \1
ENDM
const_def: MACRO
if _NARG > 0
const_value = \1
else
const_value = 0
endc
ENDM
const: MACRO
\1 EQU const_value
const_value = const_value + 1
ENDM
lb: MACRO ; r, hi, lo
ld \1, (\2) << 8 + ((\3) & $ff)
ENDM
ldtx: MACRO
ld \1, \2_
ENDM
bank1call: MACRO
rst $18
dw \1
ENDM
farcall: MACRO
rst $28
db BANK(\1)
dw \1
ENDM
; used when the specified bank does not match the bank of the specified function
; otherwise, farcall is preferred
farcallx: MACRO
rst $28
db \1
dw \2
ENDM
emptybank: MACRO
rept $4000
db $ff
endr
ENDM
textpointer: MACRO
dw ((\1 + ($4000 * (BANK(\1) - 1))) - (TextOffsets + ($4000 * (BANK(TextOffsets) - 1)))) & $ffff
db ((\1 + ($4000 * (BANK(\1) - 1))) - (TextOffsets + ($4000 * (BANK(TextOffsets) - 1)))) >> 16
const \1_
GLOBAL \1_
ENDM
|