shithub: pokecrystal

ref: f2ae74079fc917cbf7e1f640eb8beda0d4740887
dir: /engine/battle/effect_commands/sandstorm.asm/

View raw version
BattleCommand_StartSandstorm: ; 376f8
; startsandstorm

	ld a, [wBattleWeather]
	cp WEATHER_SANDSTORM
	jr z, .failed

	ld a, WEATHER_SANDSTORM
	ld [wBattleWeather], a
	ld a, 5
	ld [WeatherCount], a
	call AnimateCurrentMove
	ld hl, SandstormBrewedText
	jp StdBattleTextBox

.failed
	call AnimateFailedMove
	jp PrintButItFailed
; 37718