Table of Contents
Advertisement
1410
1420
1430
1440
1450
1460
1470
1480
1490
1500
1,510
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
CHR$ (27) ; "I" :CHR$(6)
:
FOR 1=0
TO 347
STEP
25
:LPRINT
CHR$(60);
:NEXT I
LPRINT
LPRINT
CHR$(9):
FOR 1=0
TO 493
STEP
25
:LPRINT
CHR$(61):
:NEXT I
LPRINT
CHR$(2'
LPRINT
CHR$(9
ScALE$="+–+-u
FOR 1=0
TO 2
LPRINT
'+-+"
LPRINT
CHR$(9
FOR 1=1
TO 8
LPRINT
" ";1;
); ''I'' ;CHR$(2)
; "+-" ;
:LPRItiT
SCALE$;
:NEXT I
;"0
";
NEXT I
LPRINT
CHR$(27)
;'':";
LPRINT
cHR$(27)
:"S";CHR$(0)
:
LPRINT
CHR$(9);
''(IOO
UNITS/1000
PERSONS)"
LPRINT
CHR$(27);
''T";
LPRINT
CHR$(27);"@M
END
' l)ATA
' 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,
0,
59,
0,
0
DATA
59,
15,192,
56,
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,
0,
31,
0,
0,
15,
0,
0,
7!
o,
0,
0,
0,
0
Car
symbol
DATA
O,
0,
0,
0,
30,
0,
0,
28,
0,
0,
60,
0,
0,
63,
0
DATA
0,255,128,
0,255,192,
1,255,192,
3,255,192,
DATA
7,127,128
14,127,
0,
28,124,
0,
56,124,
0,112,126,
0,
96,124,
0
DATA 127,254,
0,127,252,
0,
96,124,
0,
96,127,
0,
96,127,128
DATA
96,127,192,112,127,192
,124,127,128,
63,127,
0,
15,124,
0
DATA
3,124,
0,
0,2S4,
O,
0,
0,
0
131
Advertisement
Table of Contents
