Sub Process_Globals
Dim usocket As UDPSocket
End Sub
Sub Globals
End Sub
Sub Activity_Create(FirstTime As Boolean)
If FirstTime Then
usocket.Initialize("usocket", 0, 0)
End If
End Sub
Sub SendString(ip As String, port As Int, s As String)
Dim u As UDPPacket
u.Initialize(s.GetBytes("UTF8"), ip, port)
usocket.Send(u)
End Sub