From 91e89a29a20d075ffbdd3a2f75b507c8202b1dce Mon Sep 17 00:00:00 2001
From: yenatch <yenatch@gmail.com>
Date: Mon, 9 Sep 2013 22:01:24 -0400
Subject: [PATCH] comment spikes move effect

---
 battle/effect_commands.asm | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/battle/effect_commands.asm b/battle/effect_commands.asm
index 996634376..dc6ca521c 100644
--- a/battle/effect_commands.asm
+++ b/battle/effect_commands.asm
@@ -9557,13 +9557,19 @@ BattleCommand56: ; 37683
 	and a
 	jr z, .asm_3768e
 	ld hl, PlayerScreens
-
 .asm_3768e
-	bit 0, [hl]
+
+; Fails if spikes are already down!
+
+	bit SCREENS_SPIKES, [hl]
 	jr nz, .failed
 
-	set 0, [hl]
+; Nothing else stops it from working.
+
+	set SCREENS_SPIKES, [hl]
+
 	call Function0x37e01
+
 	ld hl, SpikesText
 	jp StdBattleTextBox