mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
28 lines
388 B
NASM
28 lines
388 B
NASM
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 Function37354
|
|
; 376a0
|