mirror of
https://github.com/pret/pokepinball.git
synced 2026-09-26 21:24:43 -04:00
PikalaxALT
125 lines
2.4 KiB
NASM
Executable File
125 lines
2.4 KiB
NASM
Executable File
INCLUDE "macros/sound.asm"
|
|
|
|
dex_text EQUS "db " ; Start beginning of pokedex description
|
|
dex_line EQUS "db $0d," ; Start new line in pokedex description
|
|
dex_end EQUS "db $00" ; Terminate the pokedex description
|
|
|
|
dbw: MACRO
|
|
db \1
|
|
dw \2
|
|
ENDM
|
|
|
|
dwb: MACRO
|
|
dw \1
|
|
db \2
|
|
ENDM
|
|
|
|
dn: MACRO
|
|
rept _NARG / 2
|
|
db (\1) << 4 + (\2)
|
|
shift
|
|
shift
|
|
endr
|
|
ENDM
|
|
|
|
dr: MACRO
|
|
INCBIN "baserom.gbc", \1, \2 - \1
|
|
ENDM
|
|
|
|
dx: MACRO
|
|
x = 8 * ((\1) - 1)
|
|
rept \1
|
|
db ((\2) >> x) & $ff
|
|
x = x + -8
|
|
endr
|
|
ENDM
|
|
|
|
bigdw: MACRO ; big-endian word
|
|
dx 2, \1
|
|
ENDM
|
|
|
|
bigBCD6: MACRO
|
|
; There is probably a better name for this macro.
|
|
; It write a BCD in big-endian form.
|
|
dn ((\1) / 10) % 10, (\1) % 10
|
|
dn ((\1) / 1000) % 10, ((\1) / 100) % 10
|
|
dn ((\1) / 100000) % 10, ((\1) / 10000) % 10
|
|
dn ((\1) / 10000000) % 10, ((\1) / 1000000) % 10
|
|
dn ((\1) / 1000000000) % 10, ((\1) / 100000000) % 10
|
|
dn ((\1) / 100000000000) % 10, ((\1) / 10000000000) % 10
|
|
ENDM
|
|
|
|
; Constant enumeration is useful for mons, maps, etc.
|
|
const_def: MACRO
|
|
const_value = 0
|
|
ENDM
|
|
|
|
const: MACRO
|
|
\1 EQU const_value
|
|
const_value = const_value + 1
|
|
ENDM
|
|
|
|
;\1 = X
|
|
;\2 = Y
|
|
;\3 = Reference Background Map (e.g. vBGMap0 or vBGMap1)
|
|
hlCoord: MACRO
|
|
ld hl, \3 + $20 * \2 + \1
|
|
ENDM
|
|
|
|
;\1 = 5-bit Blue value
|
|
;\2 = 5-bit Green value
|
|
;\3 = 5-bit Red value
|
|
RGB: MACRO
|
|
dw (\3 << 10 | \2 << 5 | \1)
|
|
ENDM
|
|
|
|
;\1 = pointer to 2bpp tile data
|
|
;\2 = destination for tile data in VRAM
|
|
;\3 = size of 2bpp tile data to copy
|
|
VIDEO_DATA_TILES: MACRO
|
|
dw \1
|
|
db Bank(\1)
|
|
dw \2
|
|
dw (\3 << 2)
|
|
ENDM
|
|
|
|
;\1 = pointer to 2bpp tile data
|
|
;\2 = destination for tile data in VRAM
|
|
;\3 = size of 2bpp tile data to copy
|
|
VIDEO_DATA_TILES_BANK2: MACRO
|
|
dw \1
|
|
db Bank(\1)
|
|
dw \2
|
|
dw (\3 << 2) | $2
|
|
ENDM
|
|
|
|
;\1 = pointer to tilemap data
|
|
;\2 = destination for tilemap data in VRAM
|
|
;\3 = size of tilemap to copy
|
|
VIDEO_DATA_TILEMAP: MACRO
|
|
VIDEO_DATA_TILES \1, \2, \3
|
|
ENDM
|
|
|
|
;\1 = pointer to tilemap data
|
|
;\2 = destination for tilemap data in VRAM
|
|
;\3 = size of tilemap to copy
|
|
VIDEO_DATA_TILEMAP_BANK2: MACRO
|
|
VIDEO_DATA_TILES_BANK2 \1, \2, \3
|
|
ENDM
|
|
|
|
;\1 = pointer to background attribute data
|
|
;\2 = destination for background attribute data in VRAM
|
|
;\3 = size of background attribute data to copy
|
|
VIDEO_DATA_BGATTR: MACRO
|
|
VIDEO_DATA_TILES_BANK2 \1, \2, \3
|
|
ENDM
|
|
|
|
;\1 = pointer to palette data
|
|
;\2 = size of palette data
|
|
VIDEO_DATA_PALETTES: MACRO
|
|
dw \1
|
|
db Bank(\1)
|
|
dw $0000
|
|
dw (\2 << 1) | $1
|
|
ENDM
|