pokecrystal-board/engine/battle/move_effects/sandstorm.asm
2018-06-24 16:13:22 +02:00

19 lines
319 B
NASM

BattleCommand_StartSandstorm:
; startsandstorm
ld a, [wBattleWeather]
cp WEATHER_SANDSTORM
jr z, .failed
ld a, WEATHER_SANDSTORM
ld [wBattleWeather], a
ld a, 5
ld [wWeatherCount], a
call AnimateCurrentMove
ld hl, SandstormBrewedText
jp StdBattleTextBox
.failed
call AnimateFailedMove
jp PrintButItFailed