05-06-2009, 12:04 PM
To fix the warp issue, replace the "WarpTo" sub with this:
Updated the download.
Code:
Public Sub WarpTo(ByVal MapNum As Long)
Dim Buffer As clsBuffer
Set Buffer = New clsBuffer
Buffer.PreAllocate 6
Buffer.WriteInteger CWarpTo
Buffer.WriteLong MapNum
Call SendData(Buffer.ToArray())
End Sub
Updated the download.