mirror of https://github.com/pret/pokecrystal.git
18 lines
338 B
NASM
18 lines
338 B
NASM
BattleCommand_FocusEnergy: ; 36c98
|
|
; focusenergy
|
|
|
|
ld a, BATTLE_VARS_SUBSTATUS4
|
|
call GetBattleVarAddr
|
|
bit SUBSTATUS_FOCUS_ENERGY, [hl]
|
|
jr nz, .already_pumped
|
|
set SUBSTATUS_FOCUS_ENERGY, [hl]
|
|
call AnimateCurrentMove
|
|
ld hl, GettingPumpedText
|
|
jp StdBattleTextBox
|
|
|
|
.already_pumped
|
|
call AnimateFailedMove
|
|
jp PrintButItFailed
|
|
|
|
; 36cb2
|