Option GlobalKeys Enabled
Variable Numeric Timesec = 0.46
Variable Numeric TotalSeeds = 320
' --------------------------------

Wait Seconds 1
Gosub Launcher
Stop

Label Launcher
	For v1 = 1 To TotalSeeds
		Print v1 + " " + Timesec
		Wait Not Key("Space")
		PressKeys LButtonDOWN
		Wait Seconds Timesec
		PressKeys LButtonUP
		Wait Seconds 1.1
	Next
Return

Label EventTimer
	Select True
		Case Key("PAGEUP")
			Timesec = Timesec + 0.01
			Print v1 + " " + Timesec
			Wait Not Key("PAGEUP")
		Case Key("PAGEDOWN")
			Timesec = Timesec - 0.01
			Print v1 + " " + Timesec
			Wait Not Key("PAGEDOWN")
	EndSelect
Return


'WATCH SewTo_Speed
'EXEC Button 5 Text Button5
