Sub Process_Globals
Dim monitor As Boolean
Dim tmr As Timer
End Sub
Sub Globals
Dim bClass As myclass
End Sub
Sub Activity_Create(FirstTime As Boolean)
tmr.Initialize("tmr",500)
tmr.Enabled = True
bClass.Initialize("")
Activity.AddView(bClass.View,40%x,40%y,20%x,20%y)
End Sub
Sub tmr_tick
Log("Tick!") ' it is indeed ticking!
If monitor Then ' this section is not executed
Log("Caught")
ToastMessageShow("Clicked",False)
monitor = False
End If
End Sub