HTBasic Help
×
Menu
Index

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