Table of Contents
Advertisement
1430
1440
14s0
1460
1470
1480
1490
1500
1510
1520
1530
1540
1550
1560
1570
1580
1590
1600
2000
2010
2020
2030
2040
2050
2060
2070
2080
2090
2100
2110
2120
2130
2140
2150
2160
2170
LPRINT
LPRINT CHR$ (9) :
FOR 1=0 TO 493
STEP 25
:LPRINT
CHR$(61):
:NEXT I
LPRINT CHR$(27) ;"1";CHR$(2)
LPRINT CHR$(9) ;"+-";
SCALE$="+-+-"
FOR 1=1 TO 7
LPRINT "+-+-
LPRINT CHR$(9
FOR 1=1 TO 8
LPRINT " ":1;
NEXT I
LPRINT CHR$(2
LPRINT CHR$(2
LPRINT CHR$(9
LPRINT CHR$(2
LPRINT CHR$(2
:LPRINT
SCALE$:
:NEXT I
;"0
";
);.:.
): ''S'' ;CHR$(O);
."(100
UNITS/1000
PERSONS)"
;:"T":
.
END
DATA
Index
Table
Data
DATA 137,
17,
25,227,
96,
4,242,
0,
96
DATA 137,
92,
28,227,
96,
0,
80,
64,
96
' Dot Pattern
Data
Telephone
symbol
DATA
O,
0,
0,
7,
0,
0,
15,
0,
0,
31,
0,
o!
59,
0,
0
DATA 59,
15,192,
S6,
31,192,112,
63,192,112,127,192,112
,255,192
DATA 127,255,192,127,243,
192,113,227,192,
127,243,192,127,255,
192
DATA 112,255,192,112,127,
192,112,
63,192,
56,
31,192,
59,
15,192
DATA
59,
0,
Car symbol
DATA
O,
0,
DATA
0,255,
DATA
14,127,
DATA 127,254,
DATA
96,127,
DATA
3,124,
0,
31,
0,
0,
15,
0,
0,
7,
0,
0,
0,
0,
0
0,
0,
30,
0,
0,
28,
0,
0,
60,
0,
0,
63,
0
28,
0,255,192,
1,2S5,192,
3,255,192,
7,127,128
0,
28,124,
0,
56,124,
0,112,126,
0,
96,124,
0
0,127,252,
0,
96,124,
0,
96,127,
0,
96,127,128
92,112,127,192,124,127
,128,
63,127,
0,
15,124,
0
0,
0,254,
0,
0,
0,
0
127
Advertisement
Table of Contents
