'Static code module
Sub Process_Globals
Private fx As JFX
Private GameTimer As Timer
End Sub
Sub EnterGame
GameTimer.Initialize("GameTimer", 500)
GameTimer.Enabled = True
End Sub
Sub GameTimer_Tick
Dim j As HttpJob
j.Initialize("", Me)
'j.Download("http://localhost/getviews.php")
j.PostString("http://localhost/getviews.php","")
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
Log(j.GetString)
End If
j.Release
End Sub