Example 10 REM code aera expansion
15 LPRINT CHR$(27);"t1";
20 LPRINT CHR$(27);"6";
30 GOSUB 70
40 LPRINT CHR$(27);"7";
50 GOSUB 70
60 END
70 RESTORE
80 FOR I = 1 TO 12
90 READ D
100 LPRINT CHR$(D);
110 NEXT I
120 LPRINT
130 RETURN
140 DATA 65,66,67,68,69,128,129,130,131,132,133,134
Miscellaneous
111