
Controls OpenTextBox
Gosub Loop
Stop

Label EventTimer
	v1 = v1 + 1
	If v1 > 10
		v1 = 0
	EndIf
	Print "=================================" + CRLF
Return

Label Loop
	v2 = v2 + 1
	Print Rnd + CRLF
Goto Loop


'WATCH v1
'WATCH v2
'EXEC Gosub 3
