Leech seed (addHP) fix

Fixed addHP declaration in the EndRoundOpp subroutine
2016-09-12 18:01:53 -05:00 · 2016-09-12 18:01:53 -05:00 · 470834f38a
parent 5266ae61db
commit 470834f38a
1 changed files with 1 additions and 0 deletions
--- a/2.5DHero/2.5DHero/Battle/BattleSystemV2/Battle.vb
+++ b/2.5DHero/2.5DHero/Battle/BattleSystemV2/Battle.vb
@ -4871,6 +4871,7 @@ endthisround:
                            loseHP = currHP
                        End If
                        
+                        Dim addHP As Integer = loseHP
                        If Not .OwnPokemon.Item Is Nothing Then
                            If .OwnPokemon.Item.Name.ToLower() = "big root" And .FieldEffects.CanUseItem(True) = True And .FieldEffects.CanUseOwnItem(True, BattleScreen) = True Then
                                addHP += CInt(Math.Ceiling(addHP * (30 / 100)))