From 9d85a79f651fd56470cc11d2e60ee6b51f8d6c96 Mon Sep 17 00:00:00 2001 From: darkfire006 Date: Tue, 23 Aug 2022 01:01:59 -0500 Subject: [PATCH] leech seed drains even if other pokemon is full --- P3D/Battle/BattleSystemV2/Battle.vb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/P3D/Battle/BattleSystemV2/Battle.vb b/P3D/Battle/BattleSystemV2/Battle.vb index c50fff927..add047afa 100644 --- a/P3D/Battle/BattleSystemV2/Battle.vb +++ b/P3D/Battle/BattleSystemV2/Battle.vb @@ -5720,7 +5720,7 @@ End If End If If .FieldEffects.OppLeechSeed > 0 Then 'LeechSeed (opponent seeded) - If .OppPokemon.HP > 0 And .OwnPokemon.HP > 0 And .OwnPokemon.HP < .OwnPokemon.MaxHP Then + If .OppPokemon.HP > 0 And .OwnPokemon.HP > 0 Then Dim loseHP As Integer = CInt(Math.Ceiling(.OppPokemon.MaxHP / 8)) Dim currHP As Integer = .OppPokemon.HP @@ -6598,7 +6598,7 @@ End If End If If .FieldEffects.OwnLeechSeed > 0 Then 'LeechSeed (Own pokemon seeded) - If .OwnPokemon.HP > 0 And .OppPokemon.HP > 0 And .OppPokemon.HP < .OppPokemon.MaxHP Then + If .OwnPokemon.HP > 0 And .OppPokemon.HP > 0 Then Dim loseHP As Integer = CInt(Math.Ceiling(.OwnPokemon.MaxHP / 8)) Dim currHP As Integer = .OwnPokemon.HP