tyler.durden
/
P3D-Legacy
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix Pokémon level not being parsed crash

This commit is contained in:
JappaWakka 2024-02-09 17:07:15 +01:00
parent dc8df01e3f
commit 3e7f2f1cd3
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
P3D/Pokemon/Monster/Pokemon.vb
View File

@ -1372,7 +1372,7 @@ Public Class Pokemon
Dim Level As Integer = 5 Dim Level As Integer = 5
If Tags.ContainsKey("Level") = True Then If Tags.ContainsKey("Level") = True Then
Level = CInt(Tags("Level")) Level = CInt(ScriptConversion.ToInteger(ScriptVersion2.ScriptCommander.Parse(Tags("Level"))))
End If End If
Dim p As Pokemon = GetPokemonByID(PokemonID, NewAdditionalData) Dim p As Pokemon = GetPokemonByID(PokemonID, NewAdditionalData)
@ -1714,7 +1714,7 @@ Public Class Pokemon
Case "nickname" Case "nickname"
Me.NickName = tagValue Me.NickName = tagValue
Case "level" Case "level"
Me.Level = CInt(tagValue).Clamp(1, CInt(GameModeManager.GetGameRuleValue("MaxLevel", "100"))) Me.Level = ScriptConversion.ToInteger(ScriptVersion2.ScriptCommander.Parse(tagValue)).Clamp(1, CInt(GameModeManager.GetGameRuleValue("MaxLevel", "100")))
Case "ot" Case "ot"
Me.OT = tagValue Me.OT = tagValue
Case "ability" Case "ability"