Created new weather evolution condition, fixed sliggoo evolution conditions.

This commit is contained in:
CaptainSegis 2016-11-21 13:10:08 -05:00
parent fbecf71f64
commit a88f62b323
2 changed files with 9 additions and 1 deletions

View File

@ -48,4 +48,5 @@ Move|32,34
Move|38,330
Move|47,406
TradeValue|60
EvolutionCondition|706,Level,50,Level
EvolutionCondition|706,level,50,level
EvolutionCondition|706,weather,rain,level

View File

@ -15,6 +15,7 @@ Public Class EvolutionCondition
DayTime
InParty
InPartyType
Weather
End Enum
Public Structure Condition
@ -63,6 +64,8 @@ Public Class EvolutionCondition
c.ConditionType = ConditionTypes.InParty
Case "inpartytype"
c.ConditionType = ConditionTypes.InPartyType
Case "weather"
c.ConditionType = ConditionTypes.Weather
End Select
Select Case trigger.ToLower()
@ -208,6 +211,10 @@ Public Class EvolutionCondition
End If
End If
End If
Case ConditionTypes.Weather
If World.GetCurrentRegionWeather().ToString.ToLower <> c.Argument.ToLower Then
canEvolve = False
End If
End Select
Next
End If