Also,

That compiled fils is using the following 'dash' of GetTickCount() :

Code:
Private Const UpdateSpeed As Long = 60

Private Sub RunGameLoop()
    Do While doloop
        CurrentTick = GetTickCount()
        DoEvents
        If ((CurrentTick - LastTick) >= UpdateSpeed) Then
            LastTick = GetTickCount()
So obviously it could be sped up, but on this P-III its a tad difficult to control

- jamie