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
End Function
'Temporary
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)
Else If BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Sunny Or BattleScreen.FieldEffects.Weather = BattleWeather.WeatherTypes.Rain Then
Return CInt(Me.Power * 3)
Else
Return Me.Power
End If
@ -81,4 +84,4 @@ Namespace BattleSystem.Moves.Normal
End Class
End Namespace
End Namespace