pokecrystal/engine/battle/move_effects/metronome.asm

BattleCommand_Metronome:
; metronome

	call ClearLastMove
	call CheckUserIsCharging
	jr nz, .asm_3742b

	ld a, [wKickCounter]
	push af
	call BattleCommand_LowerSub
	pop af
	ld [wKickCounter], a

.asm_3742b
	call LoadMoveAnim

.GetMove:
	call BattleRandom

; No invalid moves.
	cp NUM_ATTACKS + 1
	jr nc, .GetMove

; None of the moves in MetronomeExcepts.
	push af
	ld de, 1
	ld hl, MetronomeExcepts
	call IsInArray
	pop bc
	jr c, .GetMove

; No moves the user already has.
	ld a, b
	call CheckUserMove
	jr z, .GetMove

	ld a, BATTLE_VARS_MOVE
	call GetBattleVarAddr
	ld [hl], b
	call UpdateMoveData
	jp ResetTurn

INCLUDE "data/moves/metronome_exception_moves.asm"
Remove all address comments 2018-06-24 14:09:41 +00:00			`BattleCommand_Metronome:`
split out some more move effects 2013-12-01 19:19:57 +00:00			`; metronome`

Some work on battle animations 2015-11-09 21:41:09 +00:00			`call ClearLastMove`
			`call CheckUserIsCharging`
split out some more move effects 2013-12-01 19:19:57 +00:00			`jr nz, .asm_3742b`

More battle command labels 2015-11-07 01:55:16 +00:00			`ld a, [wKickCounter]`
split out some more move effects 2013-12-01 19:19:57 +00:00			`push af`
Sprite movement function labels 2015-11-06 21:42:38 +00:00			`call BattleCommand_LowerSub`
split out some more move effects 2013-12-01 19:19:57 +00:00			`pop af`
More battle command labels 2015-11-07 01:55:16 +00:00			`ld [wKickCounter], a`
split out some more move effects 2013-12-01 19:19:57 +00:00
			`.asm_3742b`
Some work on battle animations 2015-11-09 21:41:09 +00:00			`call LoadMoveAnim`
split out some more move effects 2013-12-01 19:19:57 +00:00
Local labels starting with capital letters are now decorated with a trailing colon; remove trailing whitespace; globally correct line endings to UNIX style 2016-04-10 18:42:14 +00:00			`.GetMove:`
split out some more move effects 2013-12-01 19:19:57 +00:00			`call BattleRandom`

			`; No invalid moves.`
			`cp NUM_ATTACKS + 1`
			`jr nc, .GetMove`

			`; None of the moves in MetronomeExcepts.`
			`push af`
			`ld de, 1`
			`ld hl, MetronomeExcepts`
			`call IsInArray`
			`pop bc`
			`jr c, .GetMove`

			`; No moves the user already has.`
			`ld a, b`
			`call CheckUserMove`
			`jr z, .GetMove`

			`ld a, BATTLE_VARS_MOVE`
Rename _GetBattleVar -> GetBattleVarAddr. Functions prefixed with _ imply they're private. The real purpose of this function is to use an address, rather than saving a few cycles on push/pop. 2014-06-14 07:34:57 +00:00			`call GetBattleVarAddr`
split out some more move effects 2013-12-01 19:19:57 +00:00			`ld [hl], b`
			`call UpdateMoveData`
			`jp ResetTurn`

Miscellaneous reorganization fixes 2018-07-04 06:42:11 +00:00			`INCLUDE "data/moves/metronome_exception_moves.asm"`