jep-hack/home/hm_moves.asm
2025-07-25 17:31:12 +01:00

29 lines
291 B
NASM

; HM moves can't be forgotten
IsHM::
cp HM01
jr c, .NotHM
scf
ret
.NotHM:
and a
ret
IsHMMove::
call GetMoveIndexFromID
ld b, h
ld c, l
ld hl, .HMMoves
ld de, 2
jp IsInWordArray
.HMMoves:
dw CUT
dw FLY
dw SURF
dw STRENGTH
dw FLASH
dw WATERFALL
dw WHIRLPOOL
dw -1 ; end