Filter
Top Products
1330
1340
1350
1360
1370
1380
1390
1400
1410
1420
1430
.1440
1450
1460
1470
1480
1490
1500
1510
1520
1530
2000
2010
2020
2030
2040
2050
2060
2070
2080
2090
2100
2110
2120
2130
2140
2150
2160
2170
2180
LPRINT “JAPAN” ;CHR$ (9) ;
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
LPRINT CHR$(9) :”+-”;
SCALE$=”+–+-”
FOR 1=2 TO 8 :LPRINT SCALE$;
LPRINT “+-+”
LPRINT CHR$(9):”0 “:
FOR 1=1 TO 8
LPRINT H “;1;
NEXT I
LPRINT CHR$(27) ;”%” :CHR$(0)
LPRINT CHR$(27); ”M”;
LPRINT CHR$(27) ;”S’’;CHR$(O);
LPRINT CHR$(9); ”(1OO UNITS/1000 PERSONS)”
LPRINT CHR$(27); ”T”;
LPRINT CHR$(27) ;”@”
END
DATA
‘ Telephone Symbol
DATA 3,31, 2
DATA O, 0, 0, 7, 0, 0, 8, 0, 0.
DATA 19, 15,192, 40, 16, 0, 80, 47,192,
DATA 47, 80,
0, 80,175,192, 47, 80, 0,
DATA 80,163,192, 33, 64, 0, 80,163,192,
DATA 47, 80, 0, 80,175,192, 32, 80. 0,
DATA 19, 15,192, 40, 0, 0, 23, 0, 0,
DATA O, 0, 0
‘ Car Symbol
DATA 3,31, 2
DATA O, 0, 0, 0, 30, 0, 0, 0, 0,
DATA 0,252,128, 0, 3, 64, 1,252,128,
DATA 10, 3, 0, 20,124, 0, 40, 0, 0,
DATA 64,126,
0, 63,128,
0, 64,126, 0,
DATA 32, 3,
0, 64,124,128, 32,
3, 64,
DATA 76,124,128, 51, 3, 0, 12,252, 0,
DATA O, 0, 0
:NEXT I
23, 0, 0, 40, 0, 0
32, 80, 0, 80,175,192
80,163,192, 33, 64, 0
47, 80, 0, 80,175,192
80, 47,192, 40, 16, 0
8, 0, 0, 7, 0, 0
0, 60, 0, 0, 3, 0
2, 3, 64,
5,124,128
80,126, 0, 32, 0, 0
63,128, 0, 64,124, 0
64,124,128, 48, 3, 64
3, 0, 0,
0,254, 0
DIFFUSION RANGES OF
CARS & TELEPHONES
121