Option GlobalKeys Enabled
Variable Numeric Timesec = 0.46
Variable Numeric TotalSeeds = 320
' --------------------------------
Key Up   Gosub ExecKeys
Key Down Gosub ExecKeys
' --------------------------------
Wait Seconds 1
Gosub Launcher
Stop

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

Label ExecKeys
	Select True
		Case Key("Up")
			Timesec = Timesec + 0.01
		Case Key("Down")
			Timesec = Timesec - 0.01
	EndSelect
	Print v1 + " " + Timesec
Return


'WATCH SewTo_Speed
'EXEC Button 5 Text Button5
