
' ---------------------------------------- INIT VARS
Array1 = 0, 111, 222, 333
Array1(6) = 666
Array1(9) = 999
Numeric Num1 = 111
Numeric Num2 = 222
String  Str1 = "s111"
String  Str2 = "s222"
' ---------------------------------------- SAVE VARS TO FILE
String SavedVarsFile = SavedVars.txt
SaveVars
' ---------------------------------------- CLEAR VARS
ArrayClear(1)
Num1 = 0
Num2 = 0
Str1 = 0
Str2 = 0
' ---------------------------------------- LOAD VARS FROM FILE
VarsFromFile SavedVarsFile
' ---------------------------------------- PRINT AND STOP
VarsToS1
Print s1
Stop

Label VarsToS1
	s1 = ""
	s1 = s1 + ArrayToString(1) + CRLF
	s1 = s1 + Num1 + " "
	s1 = s1 + Num2 + " "
	s1 = s1 + Str1 + " "
	s1 = s1 + Str2
Return

Label VarsWithNamesToS1
	s1 = ""
	s1 = s1 + "Array1 = " + Replace( ArrayToString(1), " " , ",") + CRLF
	s1 = s1 + "Num1 = " + Num1 + CRLF
	s1 = s1 + "Num2 = " + Num2 + CRLF
	s1 = s1 + "Str1 = " + Str1 + CRLF
	s1 = s1 + "Str2 = " + Str2
Return

Label SaveVars
	VarsWithNamesToS1
	Save DeleteFile SavedVarsFile
	Save StringToFile s1 SavedVarsFile
Return


'BOOKMARKS 

'EDITEDLINES 1 1 9 2 12 3 18 4 20 6 36 10 2 10 

