pokecrystal-board/engine/battle/move_effects/metronome.asm

BattleCommand_Metronome:
; metronome

	call ClearLastMove
	call CheckUserIsCharging
	jr nz, .charging

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

.charging
	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 07:09:41 -07:00			`BattleCommand_Metronome:`
split out some more move effects 2013-12-01 11:19:57 -08:00			`; metronome`

Some work on battle animations 2015-11-09 13:41:09 -08:00			`call ClearLastMove`
			`call CheckUserIsCharging`
Identify some more unnamed labels 2020-10-04 16:43:28 -07:00			`jr nz, .charging`
split out some more move effects 2013-12-01 11:19:57 -08:00
Remove wKickCounter and wPresentPower aliases for wBattleAnimParam 2020-08-29 17:35:49 -07:00			`ld a, [wBattleAnimParam]`
split out some more move effects 2013-12-01 11:19:57 -08:00			`push af`
Sprite movement function labels 2015-11-06 13:42:38 -08:00			`call BattleCommand_LowerSub`
split out some more move effects 2013-12-01 11:19:57 -08:00			`pop af`
Remove wKickCounter and wPresentPower aliases for wBattleAnimParam 2020-08-29 17:35:49 -07:00			`ld [wBattleAnimParam], a`
split out some more move effects 2013-12-01 11:19:57 -08:00
Identify some more unnamed labels 2020-10-04 16:43:28 -07:00			`.charging`
Some work on battle animations 2015-11-09 13:41:09 -08:00			`call LoadMoveAnim`
split out some more move effects 2013-12-01 11:19:57 -08: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 11:42:14 -07:00			`.GetMove:`
split out some more move effects 2013-12-01 11:19:57 -08: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 00:34:57 -07:00			`call GetBattleVarAddr`
split out some more move effects 2013-12-01 11:19:57 -08:00			`ld [hl], b`
			`call UpdateMoveData`
			`jp ResetTurn`

Miscellaneous reorganization fixes 2018-07-03 23:42:11 -07:00			`INCLUDE "data/moves/metronome_exception_moves.asm"`