pokecrystal/engine/tmhm.asm

50 lines
563 B
NASM
Raw Normal View History

CanLearnTMHMMove: ; 11639
2018-01-23 22:39:09 +00:00
ld a, [wCurPartySpecies]
ld [wCurSpecies], a
2015-11-11 21:11:08 +00:00
call GetBaseData
2018-01-23 22:39:09 +00:00
ld hl, wBaseTMHM
2015-11-11 21:11:08 +00:00
push hl
ld a, [wPutativeTMHMMove]
2015-11-11 21:11:08 +00:00
ld b, a
ld c, 0
ld hl, TMHMMoves
.loop
ld a, [hli]
and a
jr z, .end
cp b
jr z, .asm_11659
inc c
jr .loop
.asm_11659
pop hl
ld b, CHECK_FLAG
push de
ld d, 0
predef SmallFarFlagAction
2015-11-11 21:11:08 +00:00
pop de
ret
.end
pop hl
ld c, 0
ret
; 1166a
GetTMHMMove: ; 1166a
2015-11-11 21:11:08 +00:00
ld a, [wd265]
dec a
ld hl, TMHMMoves
ld b, 0
ld c, a
add hl, bc
ld a, [hl]
ld [wd265], a
ret
; 1167a
INCLUDE "data/moves/tmhm_moves.asm"