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

BattleCommand_Metronome: ; 37418
; 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
; 37454


MetronomeExcepts: ; 37454
	db NO_MOVE
	db METRONOME
	db STRUGGLE
	db SKETCH
	db MIMIC
	db COUNTER
	db MIRROR_COAT
	db PROTECT
	db DETECT
	db ENDURE
	db DESTINY_BOND
	db SLEEP_TALK
	db THIEF
	db -1
; 37462
BattleCommand labels copied from macros 2015-11-06 11:45:10 -08:00			`BattleCommand_Metronome: ; 37418`
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`
split out some more move effects 2013-12-01 11:19:57 -08:00			`jr nz, .asm_3742b`

More battle command labels 2015-11-06 17:55:16 -08:00			`ld a, [wKickCounter]`
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`
More battle command labels 2015-11-06 17:55:16 -08:00			`ld [wKickCounter], a`
split out some more move effects 2013-12-01 11:19:57 -08:00
			`.asm_3742b`
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`
			`; 37454`


			`MetronomeExcepts: ; 37454`
			`db NO_MOVE`
			`db METRONOME`
			`db STRUGGLE`
			`db SKETCH`
			`db MIMIC`
			`db COUNTER`
			`db MIRROR_COAT`
			`db PROTECT`
			`db DETECT`
			`db ENDURE`
			`db DESTINY_BOND`
			`db SLEEP_TALK`
			`db THIEF`
			`db -1`
			`; 37462`