pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2024-11-16 11:27:33 -08:00
Code Issues Packages Projects Releases Wiki Activity

Minor rgbasm macro cleanup

Browse Source
This commit is contained in:
yenatch 2013-02-15 22:01:48 -05:00
parent 5447792dd5
commit b850636534
1 changed files with 28 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

51
constants.asm
View File

@ -17,16 +17,19 @@ dn: MACRO
db \1 << 4 + \2
ENDM
; big-endian word
bigdw: MACRO
dw ((\1)/$100) + (((\1)&$ff)*$100)
ENDM
; address, bank
callab: MACRO
ld hl, \1
ld a, BANK(\1)
rst FarCall
ENDM
; bank, address
callba: MACRO
ld a, BANK(\1)
ld hl, \1
@ -48,7 +51,6 @@ RGB: MACRO
dw ((\3 << 10) | (\2 << 5) | (\1))
ENDM
; eventually replace with python macro
note: MACRO
db \1
ENDM
@ -59,20 +61,39 @@ Coord = $c4a0 + 20 * \2 + \1
ENDM
bccoord: MACRO
FuncCoord \1, \2
ld bc, Coord
FuncCoord \1, \2
ld bc, Coord
ENDM
decoord: MACRO
FuncCoord \1, \2
ld de, Coord
FuncCoord \1, \2
ld de, Coord
ENDM
hlcoord: MACRO
FuncCoord \1, \2
ld hl, Coord
FuncCoord \1, \2
ld hl, Coord
ENDM
; pic animations
frame: MACRO
db \1
db \2
ENDM
setrepeat: MACRO
db $fe
db \1
ENDM
dorepeat: MACRO
db $fd
db \1
ENDM
endanim: MACRO
db $ff
ENDM
NONE EQU 0
BULBASAUR EQU 1
@ -3415,19 +3436,3 @@ Unkn2Pals EQU $d040 ; 8 4-color palettes little endian)
BGPals EQU $d080 ; 8 4-color palettes little endian)
OBPals EQU $d0c0 ; 8 4-color palettes little endian)
; oh my god this is hacky stop being so hacky
frame: MACRO
db \1
db \2
ENDM
setrepeat: MACRO
db $fe
db \1
ENDM
dorepeat: MACRO
db $fd
db \1
ENDM
endanim: MACRO
db $ff
ENDM