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

Fix GM move function crashes

Browse Source
This commit is contained in:
JappaWakka 2025-04-17 18:16:09 +02:00
parent be0d5f09db
commit e011432856
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
P3D/Pokemon/Attacks/AttackSpecialFunctions.vb
View File

@ -231,7 +231,9 @@
Dim FailMessage As String = ""
If f.Split(CChar(",")).Count > 2 Then
If f.GetSplit(2, ",") <> "" Then
Target = CBool(f.GetSplit(2, ","))
End If
If f.Split(CChar(",")).Count > 3 Then
Message = f.GetSplit(3, ",")
If f.Split(CChar(",")).Count > 4 Then
@ -263,12 +265,14 @@
Dim FailMessage As String = ""
If f.Split(CChar(",")).Count > 2 Then
If f.GetSplit(2, ",") <> "" Then
Target = CBool(f.GetSplit(2, ","))
End If
If f.Split(CChar(",")).Count > 3 Then
Message = f.GetSplit(3, ",")
If f.Split(CChar(",")).Count > 4 Then
If CInt(f.GetSplit(4, ",")) > 0 Then
If f.GetSplit(4, ",") <> "" Then
If CInt(f.GetSplit(4, ",")) > 0 Then
If CInt(f.GetSplit(4, ",")) > 0 Then
LowerAmount = CInt(f.GetSplit(4, ","))
End If