summaryrefslogtreecommitdiff
path: root/engine/battle/effect_commands/spikes.asm
blob: a5e22a706dde38ae1f9318652c04ea5ff0791981 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
BattleCommand_Spikes: ; 37683
; spikes

	ld hl, wEnemyScreens
	ld a, [hBattleTurn]
	and a
	jr z, .asm_3768e
	ld hl, wPlayerScreens
.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