tyler.durden/P3D-Legacy
1
0
Fork 0
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git synced 2025-07-27 07:44:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fixed GameMode evolution items crash

Browse Source
This commit is contained in:
JappaWakka 2023-05-30 15:23:18 +02:00
parent 451115d7aa
commit 2d0ad05048
1 changed files with 22 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
P3D/Pokemon/Monster/EvolutionCondition.vb
View File

@ -173,6 +173,13 @@ Public Class EvolutionCondition
'ElseIf c.Trigger = EvolutionTrigger.Trading Then
'REMOVE HELD ITEM CHECK
End If
Else
If Item.GetItemByID(c.Argument).IsGameModeItem Then
If p.Item.ID.ToString <> c.Argument Then
canEvolve = False
'ElseIf c.Trigger = EvolutionTrigger.Trading Then
'REMOVE HELD ITEM CHECK
End If
Else
If p.Item.ID <> CInt(c.Argument) Then
canEvolve = False
@ -180,6 +187,8 @@ Public Class EvolutionCondition
'REMOVE HELD ITEM CHECK
End If
End If
End If
End If
Case ConditionTypes.InParty
Dim isInParty As Boolean = False
@ -204,7 +213,12 @@ Public Class EvolutionCondition
canEvolve = False
End If
Case ConditionTypes.Item
If p.Item.IsGameModeItem = True Then
If Item.GetItemByID(arg).IsGameModeItem = True Then
If arg <> c.Argument Then
canEvolve = False
End If
Else
If Item.GetItemByID(c.Argument).IsGameModeItem = True Then
If arg <> c.Argument Then
canEvolve = False
End If
@ -213,6 +227,7 @@ Public Class EvolutionCondition
canEvolve = False
End If
End If
End If
Case ConditionTypes.Level
If p.Level < CInt(c.Argument) Then
canEvolve = False