BattleCommand59: ; 376f8
; startsandstorm

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

	ld a, WEATHER_SANDSTORM
	ld [Weather], a
	ld a, 5
	ld [WeatherCount], a
	call Function37e01
	ld hl, SandstormBrewedText
	jp StdBattleTextBox

.failed
	call Function37e77
	jp PrintButItFailed
; 37718