Table of Contents
Advertisement
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
Advertisement
Table of Contents
