pokecrystal-board/battle/effects/spikes.asm
2014-01-01 08:09:15 -05:00

29 lines
384 B
NASM

BattleCommand56: ; 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 Function37354
; 376a0