WeatherBall Power Temporary Fix

It did not use to get the x1.5 boost in rain or sun
This commit is contained in:
Capt_Segis 2016-09-14 05:27:23 -05:00 committed by GitHub
parent 47b54173f3
commit bc2ec28b4c

View File

@ -71,9 +71,12 @@ Namespace BattleSystem.Moves.Normal
Return Me.Type Return Me.Type
End Function End Function
'Temporary
Public Overrides Function GetBasePower(own As Boolean, BattleScreen As BattleScreen) As Integer Public Overrides Function GetBasePower(own As Boolean, BattleScreen As BattleScreen) As Integer
If BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Sunny Or BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Rain Or BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Sandstorm Or BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Hailstorm Then If BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Sandstorm Or BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Hailstorm Then
Return CInt(Me.Power * 2) Return CInt(Me.Power * 2)
Else If BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Sunny Or BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Rain Then
Return CInt(Me.Power * 3)
Else Else
Return Me.Power Return Me.Power
End If End If
@ -81,4 +84,4 @@ Namespace BattleSystem.Moves.Normal
End Class End Class
End Namespace End Namespace