ref: a4bf94e1d770cadb9a52b94142fd7eb517e4b1df
dir: /engine/battle/move_effects/leech_seed.asm/
BattleCommand_LeechSeed: ; 36f9d ; leechseed ld a, [wAttackMissed] and a jr nz, .evaded call CheckSubstituteOpp jr nz, .evaded ld de, wEnemyMonType1 ld a, [hBattleTurn] and a jr z, .ok ld de, wBattleMonType1 .ok ld a, [de] cp GRASS jr z, .grass inc de ld a, [de] cp GRASS jr z, .grass ld a, BATTLE_VARS_SUBSTATUS4_OPP call GetBattleVarAddr bit SUBSTATUS_LEECH_SEED, [hl] jr nz, .evaded set SUBSTATUS_LEECH_SEED, [hl] call AnimateCurrentMove ld hl, WasSeededText jp StdBattleTextBox .grass call AnimateFailedMove jp PrintDoesntAffect .evaded call AnimateFailedMove ld hl, EvadedText jp StdBattleTextBox ; 36fe1