pokecrystal/engine/battle/move_effects/spikes.asm

28 lines
385 B
NASM
Raw Normal View History

BattleCommand_Spikes: ; 37683
; spikes
2018-01-23 22:39:09 +00:00
ld hl, wEnemyScreens
ld a, [hBattleTurn]
and a
jr z, .asm_3768e
2018-01-23 22:39:09 +00:00
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 FailMove
; 376a0