mirror of
https://github.com/pret/pokeyellow.git
synced 2026-11-07 11:34:54 -06:00
33 lines
459 B
NASM
33 lines
459 B
NASM
; Syntactic sugar macros
|
|
|
|
MACRO? lb ; r, hi, lo
|
|
ld \1, ((\2) & $ff) << 8 + ((\3) & $ff)
|
|
ENDM
|
|
|
|
MACRO? ln ; r, hi, lo
|
|
ld \1, ((\2) & $f) << 4 | ((\3) & $f)
|
|
ENDM
|
|
|
|
MACRO? ldpal
|
|
ld \1, \2 << 6 | \3 << 4 | \4 << 2 | \5
|
|
ENDM
|
|
|
|
; Design patterns
|
|
|
|
MACRO ld_hli_a_string
|
|
FOR n, CHARLEN(\1) - 1
|
|
ld a, CHARVAL(STRCHAR(\1, n))
|
|
ld [hli], a
|
|
ENDR
|
|
ld [hl], CHARVAL(STRCHAR(\1, CHARLEN(\1) - 1))
|
|
ENDM
|
|
|
|
MACRO dict
|
|
IF \1 == 0
|
|
and a
|
|
ELSE
|
|
cp \1
|
|
ENDC
|
|
jp z, \2
|
|
ENDM
|