
SetVars
Save Vars

'PrintVars

ClearVars
Load Vars

Controls OpenTextBox 
PrintVars

Stop

Label SetVars
	v1 = 1111111111111
	s1 = "ssss1" + CRLF + "ssss1"
	Array1 = 000.1, 111, 222, 333
	Array1(6) = 666
	Array1(9) = 999
	Array2(99) = 222222
	Numeric num1 = 111
	Numeric num2 = 222
	Numeric num3 = 333
	String  str1 = "aaa"
	String  str2 = "bbb" + LF + "bbb"
	String  str3 = "ccc" + CRLF + "ccc"
Return

Label ClearVars
	v1 = 0
	s1 = ""
	ArrayClear(1)
	ArrayClear(2)
	num1 = 0
	num2 = 0
	num3 = 0
	str1 = ""
	str2 = ""
	str3 = ""
Return

Label PrintVars
	s99 = ""
	s99 = s99 + v1 + " " + s1 + " " + CRLF
	s99 = s99 + num1 + " " + num2 + " " + num3
	s99 = s99 + " " + str1 + " " + str2 + " " + str3
	s99 = s99 + CRLF + ArrayToString(1)
	Print s99
Return


'BOOKMARKS 

'EDITEDLINES 4 6 10 6 45 7 46 3 47 3 48 4 16 6 31 6 44 8 43 8 -1 9 9 10 

