' For X and Y, split it up or it will go so fuckin crazy :P
Dim X As Long
Dim X1 As Long
Dim Y As Long
Dim Y1 As Long
Call ReadALong("Warrock", &H8B5288, X)
Call ReadALong("Warrock", &H8B5288, Y)
X1 = X + &H17C
Y1 = Y + &H184
X1 = X1 + "20"
Y1 = Y1 + "20"
' For X and Y, split it up or it will go so fuckin crazy :P
Dim TeleJump As Long
Dim X As Long
Dim X1 As Long
Dim Y As Long
Dim Y1 As Long
Call ReadALong("Warrock", &H8B5288, X)
Call ReadALong("Warrock", &H8B5288, Y)
X1 = X + &H17C
Y1 = Y + &H184
X1 = X1 + TeleJump
Y1 = Y1 + TeleJump
Dim X As Long
Dim X1 As Long
Dim Y As Long
Dim Y1 As Long
Call ReadALong("Warrock", &H8B5288, X)
Call ReadALong("Warrock", &H8B5288, Y)
X1 = X + &H17C
Y1 = Y + &H184
X1 = X1 + "20"
Y1 = Y1 + "20"
Call WriteALong("Warrock", X1)
Call WriteALong("Warrock", Y1)