Here is what I have so far. The wait timer works perfectly if you put the message box after the wait for but in the new game sub it immediately says "cool" "yay" without waiting. Any help would be appreciated.
Sub WaitSecs(secs As Int)
Dim WaitTimer As Timer
WaitTimer.Initialize("WaitTimer",0)
WaitTimer.Interval = secs * DateTime.TicksPerSecond
WaitTimer.Enabled = True
Wait For WaitTimer_Tick
WaitTimer.Enabled = False
End Sub
Sub NewGameBtn_Click
WaitSecs(10)
Msgbox("Cool","YAY")
End Sub
Sub WaitSecs(secs As Int)
Dim WaitTimer As Timer
WaitTimer.Initialize("WaitTimer",0)
WaitTimer.Interval = secs * DateTime.TicksPerSecond
WaitTimer.Enabled = True
Wait For WaitTimer_Tick
WaitTimer.Enabled = False
End Sub
Sub NewGameBtn_Click
WaitSecs(10)
Msgbox("Cool","YAY")
End Sub