Filter
Top Products
1500 SCALE$=’’+-+-”
1510 FOR 1=1 TO 7
:LPRINT SCALE$; :NEXT I
1520 LPRINT “+-+”
1530 LPRINT CHR$(9);”0 “;
1540 FOR 1=1 TO 8
1550 LPRINT “ “;1;
1560 NEXT 1
1570 LPRINT CHR$(27
1580 LPRINT CHR$(27
1590 LPRINT CHR$(9)
1600 LPRINT CHR$(27
1610 LPRINT cHR$(27
1620 END
2000 ‘ DATA
.!!,!!
~“s’’;cHR$(o);
“(1OO UNITS/1000 PERSONS)”
;“T”;
;“@”
2010 ‘
Index Table Data
2020 DATA 137, 17, 25,227, 96,
4,242, 0> 96
2030 DATA 137, 92, 28,227, 96,
0, 80, 64, 96
2040 ‘ Dot Pattern Data
2050 ‘
Telephone symbol
2060 DATA O, 0, 0, 7, 0,
0, 15, 0, 0, 31, 0,
0, 59, 0, 0
2070 DATA 59, 15,192, 56, 31,192,112, 63,192,112,127,192,112 ,255,192
2080 DATA 127,255,192,127,243, 192,113,227,192, 127,243,192,127,255, 192
2090 DATA 112,255,192,112,127,192 ,112, 63,192, 56, 31,192, 59, 15,192
2100 DATA 59, 0,
0, 31, 0, 0, 15, 0, 0, 7, 0, 0, 0, 0, 0
2110 ‘
Car Symbol
2120 DATA O, 0, 0, 0, 30, 0, 0, 28, 0,
0, 60, 0,
0, 63, 0
2130 DATA 0,255,128, 0,255,192,
1,255,192, 3,255,192,
7,127,128
2140 DATA 14,127,
0, 28,124,
0, 56,124, 0,112,126, 0, 96,124, 0
2150 DATA 127,254,
0,127,252, 0, 96,124, 0, 96,127, 0, 96,127,128
2160 DATA 96,127,192,112,127,192 ,124,127,128, 63,127,
0, 15,124, 0
2170 DATA 3,124, 0, 0,254, 0, 0, 0, 0