
Gosub Sub1
Stop

Label Sub1
	For v2 = 1 To 9e99
		For v3 = 1 To 2
			For v4 = 1 To 2
				For v5 = 1 To 2
					Gosub sub2
				Next
			Next
		Next
	Next
Return

Label Sub2
	For v6 = 1 To 2
		For v7 = 1 To 2
			For v8 = 1 To 2
				For v9 = 1 To 2
					Return
				Next
			Next
		Next
	Next
Return


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