pokecrystal-board/battle/effects/sandstorm.asm

BattleCommand_StartSandstorm: ; 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 AnimateCurrentMove
	ld hl, SandstormBrewedText
	jp StdBattleTextBox

.failed
	call AnimateFailedMove
	jp PrintButItFailed
; 37718
BattleCommand labels copied from macros 2015-11-06 11:45:10 -08:00			`BattleCommand_StartSandstorm: ; 376f8`
split out some more move effects 2013-12-01 11:19:57 -08:00			`; startsandstorm`

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

			`ld a, WEATHER_SANDSTORM`
			`ld [Weather], a`
			`ld a, 5`
			`ld [WeatherCount], a`
comment and relabel more battle functions 2014-01-01 05:09:15 -08:00			`call AnimateCurrentMove`
split out some more move effects 2013-12-01 11:19:57 -08:00			`ld hl, SandstormBrewedText`
			`jp StdBattleTextBox`

			`.failed`
comment and relabel more battle functions 2014-01-01 05:09:15 -08:00			`call AnimateFailedMove`
split out some more move effects 2013-12-01 11:19:57 -08:00			`jp PrintButItFailed`
			`; 37718`