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