
Slot 2 = Infinity

For v1 = 1 To Infinity
	If v1 > 100000
		v1 = Infinity
	EndIf
Next

Stop



Label SWEEP
	Controls OpenTextBox
	For v1 = 100 To 1000
		Slot 40 = v1
		Wait Seconds 0.01
		
		Print Slot(40) + " "
	Next
Return



'
'
'Slot 40 = 1000
'
'Wait Seconds 0.2
'
'
'Slot 40 = 100
'
'Wait Seconds 0.2
'
'
'Slot 40 = 200
'
'Wait Seconds 0.2
'
'
'Slot 40 = 300
'
'Wait Seconds 0.2


'WATCH v1
'EXEC DestX = 12
