pokered/engine/items/tmhm.asm

; checks if the mon in [wWhichPokemon] already knows the move in [wMoveNum]
CheckIfMoveIsKnown:
	ld a, [wWhichPokemon]
	ld hl, wPartyMon1Moves
	ld bc, wPartyMon2 - wPartyMon1
	call AddNTimes
	ld a, [wMoveNum]
	ld b, a
	ld c, NUM_MOVES
.loop
	ld a, [hli]
	cp b
	jr z, .alreadyKnown ; found a match
	dec c
	jr nz, .loop
	and a
	ret
.alreadyKnown
	ld hl, AlreadyKnowsText
	call PrintText
	scf
	ret

AlreadyKnowsText:
	TX_FAR _AlreadyKnowsText
	db "@"
move-related things 2015-02-08 08:17:03 +00:00			`; checks if the mon in [wWhichPokemon] already knows the move in [wMoveNum]`
remove address comments 2016-06-12 00:24:04 +00:00			`CheckIfMoveIsKnown:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, [wWhichPokemon]`
Use monster struct macros in wram. Rename related labels for consistency. 2014-06-14 11:12:40 +00:00			`ld hl, wPartyMon1Moves`
move-related things 2015-02-08 08:17:03 +00:00			`ld bc, wPartyMon2 - wPartyMon1`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call AddNTimes`
move-related things 2015-02-08 08:17:03 +00:00			`ld a, [wMoveNum]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld b, a`
move-related things 2015-02-08 08:17:03 +00:00			`ld c, NUM_MOVES`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`.loop`
			`ld a, [hli]`
			`cp b`
			`jr z, .alreadyKnown ; found a match`
			`dec c`
			`jr nz, .loop`
			`and a`
			`ret`
			`.alreadyKnown`
			`ld hl, AlreadyKnowsText`
			`call PrintText`
			`scf`
			`ret`

remove address comments 2016-06-12 00:24:04 +00:00			`AlreadyKnowsText:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _AlreadyKnowsText`
			`db "@"`