pokecrystal-board/macros/coords.asm

53 lines
892 B
NASM
Raw Normal View History

hlcoord EQUS "coord hl,"
bccoord EQUS "coord bc,"
decoord EQUS "coord de,"
2017-12-13 21:36:24 -08:00
coord: MACRO
; register, x, y[, origin]
if _NARG < 4
2018-01-23 14:39:09 -08:00
ld \1, (\3) * SCREEN_WIDTH + (\2) + wTileMap
2017-12-13 21:36:24 -08:00
else
ld \1, (\3) * SCREEN_WIDTH + (\2) + \4
endc
ENDM
hlbgcoord EQUS "bgcoord hl,"
bcbgcoord EQUS "bgcoord bc,"
debgcoord EQUS "bgcoord de,"
bgcoord: MACRO
; register, x, y[, origin]
if _NARG < 4
ld \1, (\3) * BG_MAP_WIDTH + (\2) + vBGMap0
else
ld \1, (\3) * BG_MAP_WIDTH + (\2) + \4
2017-12-13 21:36:24 -08:00
endc
2017-12-28 13:31:16 -08:00
ENDM
2017-12-13 21:36:24 -08:00
dwcoord: MACRO
; x, y
2018-05-06 09:16:57 -07:00
rept _NARG / 2
2018-01-23 14:39:09 -08:00
dw (\2) * SCREEN_WIDTH + (\1) + wTileMap
2017-12-13 21:36:24 -08:00
shift
shift
2018-05-06 09:16:57 -07:00
endr
2017-12-28 13:31:16 -08:00
ENDM
2017-12-13 21:36:24 -08:00
ldcoord_a: MACRO
; x, y[, origin]
2017-12-13 21:36:24 -08:00
if _NARG < 3
2018-01-23 14:39:09 -08:00
ld [(\2) * SCREEN_WIDTH + (\1) + wTileMap], a
2017-12-13 21:36:24 -08:00
else
ld [(\2) * SCREEN_WIDTH + (\1) + \3], a
2017-12-13 21:36:24 -08:00
endc
2017-12-28 13:31:16 -08:00
ENDM
2017-12-13 21:36:24 -08:00
lda_coord: MACRO
; x, y[, origin]
2017-12-13 21:36:24 -08:00
if _NARG < 3
2018-01-23 14:39:09 -08:00
ld a, [(\2) * SCREEN_WIDTH + (\1) + wTileMap]
else
ld a, [(\2) * SCREEN_WIDTH + (\1) + \3]
endc
2017-12-13 21:36:24 -08:00
ENDM