mirror of https://github.com/pret/pokecrystal.git
25 lines
519 B
NASM
25 lines
519 B
NASM
RGB: MACRO
|
|
rept _NARG / 3
|
|
dw palred (\1) + palgreen (\2) + palblue (\3)
|
|
shift
|
|
shift
|
|
shift
|
|
endr
|
|
ENDM
|
|
|
|
palred EQUS "(1 << 0) *"
|
|
palgreen EQUS "(1 << 5) *"
|
|
palblue EQUS "(1 << 10) *"
|
|
|
|
palettes EQUS "* PALETTE_SIZE"
|
|
palette EQUS "+ PALETTE_SIZE *"
|
|
color EQUS "+ PAL_COLOR_SIZE *"
|
|
|
|
tiles EQUS "* LEN_2BPP_TILE"
|
|
tile EQUS "+ LEN_2BPP_TILE *"
|
|
|
|
; extracts the middle two colors from a 2bpp binary palette
|
|
; example usage:
|
|
; INCBIN "foo.gbcpal", middle_colors
|
|
middle_colors EQUS "PAL_COLOR_SIZE, PAL_COLOR_SIZE * 2"
|