pokecrystal/engine/tmhm.asm

50 lines
581 B
NASM
Raw Normal View History

2018-01-02 17:49:25 +00:00
Predef_CanLearnTMHMMove: ; 11639
2015-11-11 21:11:08 +00:00
ld a, [CurPartySpecies]
ld [CurSpecies], a
call GetBaseData
ld hl, BaseTMHM
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 Predef_SmallFarFlagAction
2015-11-11 21:11:08 +00:00
pop de
ret
.end
pop hl
ld c, 0
ret
; 1166a
2018-01-02 17:49:25 +00:00
Predef_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"