Fix WarpBlock

This commit is contained in:
JappaWakka 2024-07-05 11:16:49 +02:00
parent 5c9faa6710
commit fef6ff28df
1 changed files with 10 additions and 8 deletions

View File

@ -27,6 +27,7 @@
End If
Next
If c >= 5 Then
If link.GetSplit(5, ",") <> "" Then
Dim validRotations As New List(Of Integer)
Dim rotationData() As String = link.GetSplit(5, ",").Split(CChar("|"))
@ -37,6 +38,7 @@
Return True
End If
End If
End If
Dim WarpSoundName As String = "Warp_Exit"
If c >= 6 Then
Dim WarpSoundData As Integer = CInt(link.GetSplit(6))
@ -44,7 +46,7 @@
Case 0
WarpSoundName = "Warp_Exit"
Case 1
WarpSoundName = "Warp_RegularDoor"
WarpSoundName = "Warp_Door"
Case 2
WarpSoundName = "Warp_Ladder"
Case 3