diff --git a/P3D/Battle/Trainer.vb b/P3D/Battle/Trainer.vb
index f1d075181..c6eeec33c 100644
--- a/P3D/Battle/Trainer.vb
+++ b/P3D/Battle/Trainer.vb
@@ -263,7 +263,7 @@ Public Class Trainer
                     Dim PK As String = ScriptCommander.Parse(firstPart).ToString()
                     Dim Level As Integer = ScriptConversion.ToInteger(ScriptCommander.Parse(secondPart))
 
-                    Dim ID As Integer = CInt(PK.Split(CChar("_"))(0))
+                    Dim ID As Integer = ScriptConversion.ToInteger(PK.Split(CChar("_"))(0))
                     Dim AD As String = ""
 
                     If PK.Contains(CChar("_")) Then