Hopefully this'll prevent animatedblock crash

This commit is contained in:
JappaWakka 2022-07-21 10:11:24 +02:00
parent f65f0e4f11
commit 31a1c3b6d5
1 changed files with 4 additions and 2 deletions

View File

@ -148,8 +148,8 @@
If canSurf = True Then If canSurf = True Then
Dim message As String = "Do you want to Surf?%Yes|No%" Dim message As String = "Do you want to Surf?%Yes|No%"
Screen.TextBox.Show(message, {Me}, True, True)
SoundManager.PlaySound("select") SoundManager.PlaySound("select")
Screen.TextBox.Show(message, {Me}, True, True)
End If End If
End If End If
End If End If
@ -185,7 +185,9 @@
End If End If
Dim i = Animations(n).CurrentRow Dim i = Animations(n).CurrentRow
Dim j = Animations(n).CurrentColumn Dim j = Animations(n).CurrentColumn
If BlockTexturesTemp.ContainsKey(AnimationNames(n) & "_" & (j + columns(n) * i)) = True Then
Me.Textures(n) = BlockTexturesTemp(AnimationNames(n) & "_" & (j + columns(n) * i)) Me.Textures(n) = BlockTexturesTemp(AnimationNames(n) & "_" & (j + columns(n) * i))
End If
'End If 'End If
End Sub End Sub