mirror of https://github.com/pret/pokecrystal.git
19 lines
319 B
NASM
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
|