mirror of https://github.com/pret/pokecrystal.git
26 lines
321 B
NASM
26 lines
321 B
NASM
KnowsMove:
|
|
ld a, MON_MOVES
|
|
call GetPartyParamLocation
|
|
ld a, [wPutativeTMHMMove]
|
|
ld b, a
|
|
ld c, NUM_MOVES
|
|
.loop
|
|
ld a, [hli]
|
|
cp b
|
|
jr z, .knows_move
|
|
dec c
|
|
jr nz, .loop
|
|
and a
|
|
ret
|
|
|
|
.knows_move
|
|
ld hl, .Text_knows
|
|
call PrintText
|
|
scf
|
|
ret
|
|
|
|
.Text_knows: ; 0xfa06
|
|
; knows @ .
|
|
text_jump UnknownText_0x1c5ea8
|
|
db "@"
|