pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2025-04-09 05:44:44 -07:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #450 from roukaour/master

Browse Source 
Constants for TextBoxFlags
This commit is contained in:
yenatch
2017-12-30 21:32:45 -05:00
committed by GitHub
parent 93916b5536 b40181db41
commit 92fba8821c
12 changed files with 68 additions and 59 deletions
Download Patch File Download Diff File Expand all files Collapse all files

47
macros/coords.asm
View File

@@ -1,51 +1,52 @@
hlcoord EQUS "coord hl,"
bccoord EQUS "coord bc,"
decoord EQUS "coord de,"
hlcoord EQUS "coord hl,"
coord: MACRO
; register, x, y[, origin]
if _NARG < 4
ld \1, TileMap + SCREEN_WIDTH * (\3) + (\2)
ld \1, (\3) * SCREEN_WIDTH + (\2) + TileMap
else
ld \1, \4 + SCREEN_WIDTH * (\3) + (\2)
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
endc
ENDM
dwcoord: MACRO
; x, y
rept _NARG / 2
dw TileMap + SCREEN_WIDTH * (\2) + (\1)
dw (\2) * SCREEN_WIDTH + (\1) + TileMap
shift
shift
endr
ENDM
ldcoord_a: MACRO
; x, y[, origin]
if _NARG < 3
ld [TileMap + SCREEN_WIDTH * (\2) + (\1)], a
ld [(\2) * SCREEN_WIDTH + (\1) + TileMap], a
else
ld [\3 + SCREEN_WIDTH * (\2) + (\1)], a
ld [(\2) * SCREEN_WIDTH + (\1) + \3], a
endc
ENDM
lda_coord: MACRO
; x, y[, origin]
if _NARG < 3
ld a, [TileMap + SCREEN_WIDTH * (\2) + (\1)]
ld a, [(\2) * SCREEN_WIDTH + (\1) + TileMap]
else
ld a, [\3 + SCREEN_WIDTH * (\2) + (\1)]
endc
ENDM
bgrows EQUS "* $20" ; SCREEN_WIDTH
hlbgcoord EQUS "bgcoord hl,"
debgcoord EQUS "bgcoord de,"
bcbgcoord EQUS "bgcoord bc,"
bgcoord: MACRO
if _NARG >= 4
ld \1, \3 bgrows + \2 + \4
else
ld \1, \3 bgrows + \2 + vBGMap0
ld a, [(\2) * SCREEN_WIDTH + (\1) + \3]
endc
ENDM