

Variable String Str1
Str1 = "Pippo"
Controls OpenTextBox
Controls ClearTextBox 

For v1 = Len(Str1) - 3 To Len(Str1) + 5 Step 1
	Print v1 + " "
Next

'For v1 = Len(Str1) - 3 To Len(Str1) + Len(Str1) ' Comment
'	Print v1
'Next

'For v1 = 2 + 4 To 2 + 10 ' Comment
'	Print v1
'Next

Stop


'WATCH s1
