option base Example
10 DATA 0, 1, 2, 3, 4, 5
20 CLEAR SCREEN
30 OPTION BASE 0
40 PRINT "Option base is 0"
50 REAL A(5)
60 PRINT "Declared array 5 elements."
70 READ A(*)
80 PRINT A(*)
90 PRINT "Printed 6 items."
100 PRINT
110 New
120 END
130 SUB New
140 DATA 1, 2, 3
150 OPTION BASE 1
160 PRINT "Option base is 1"
170 REAL A(3)
180 PRINT "Declared array of 3."
190 READ A(*)
200 PRINT A(*)
210 SUBEND