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

BattleCommand_Spikes: ; 37683
; spikes

	ld hl, EnemyScreens
	ld a, [hBattleTurn]
	and a
	jr z, .asm_3768e
	ld hl, PlayerScreens
.asm_3768e

; Fails if spikes are already down!

	bit SCREENS_SPIKES, [hl]
	jr nz, .failed

; Nothing else stops it from working.

	set SCREENS_SPIKES, [hl]

	call AnimateCurrentMove

	ld hl, SpikesText
	jp StdBattleTextBox

.failed
	jp FailSpikes
; 376a0
BattleCommand labels copied from macros 2015-11-06 11:45:10 -08:00			`BattleCommand_Spikes: ; 37683`
split spikes effect into effects/spikes.asm 2013-09-09 19:02:26 -07:00			`; spikes`

			`ld hl, EnemyScreens`
			`ld a, [hBattleTurn]`
			`and a`
			`jr z, .asm_3768e`
			`ld hl, PlayerScreens`
			`.asm_3768e`

			`; Fails if spikes are already down!`

			`bit SCREENS_SPIKES, [hl]`
			`jr nz, .failed`

			`; Nothing else stops it from working.`

			`set SCREENS_SPIKES, [hl]`

comment and relabel more battle functions 2014-01-01 05:09:15 -08:00			`call AnimateCurrentMove`
split spikes effect into effects/spikes.asm 2013-09-09 19:02:26 -07:00
			`ld hl, SpikesText`
			`jp StdBattleTextBox`

			`.failed`
Some work on battle animations 2015-11-09 13:41:09 -08:00			`jp FailSpikes`
split spikes effect into effects/spikes.asm 2013-09-09 19:02:26 -07:00			`; 376a0`