
Gosub Sub1
Stop

Label Sub1
	For v1 = 1 To 9e99
		Gosub Sub2
	Next
Return

Label Sub2
	For v2 = 1 To 2
		'Exit
		'Return
		For v3 = 1 To 2
		Next
	Next
	Return
	For v3 = 1 To 2
		Beep
	Next
Return


'WATCH SequenceCmd
'WATCH s1
'WATCH UCase(SequenceCmd)
