Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
pret
GitHub Repository: pret/pokered
 Path: blob/master/engine/items/tms.asm
1271 views
1
; tests if mon [wCurPartySpecies] can learn move [wMoveNum]

2
CanLearnTM:

3
	ld a, [wCurPartySpecies]

4
	ld [wCurSpecies], a

5
	call GetMonHeader

6
	ld hl, wMonHLearnset

7
	push hl

8
	ld a, [wMoveNum]

9
	ld b, a

10
	ld c, $0

11
	ld hl, TechnicalMachines

12
.findTMloop

13
	ld a, [hli]

14
	cp b

15
	jr z, .TMfoundLoop

16
	inc c

17
	jr .findTMloop

18
.TMfoundLoop

19
	pop hl

20
	ld b, FLAG_TEST

21
	predef_jump FlagActionPredef

22


23
; converts TM/HM number in [wTempTMHM] into move number

24
; HMs start at 51

25
TMToMove:

26
	ld a, [wTempTMHM]

27
	dec a

28
	ld hl, TechnicalMachines

29
	ld b, $0

30
	ld c, a

31
	add hl, bc

32
	ld a, [hl]

33
	ld [wTempTMHM], a

34
	ret

35


36
INCLUDE "data/moves/tmhm_moves.asm"

37


38