Filter
Top Products
3120
3130
3140
3150
3160
3170
3180
3190
3200
3210
3220
3230
3240
3250
3260
4000
4010
4020
4030
4040
4050
4060
4070
4080
4090
4100
4110
4120
4130
4140
4150
4160
4170
4180
4190
4200
4210
4220
4230
4240
4250
4260
4270
4280
4290
4300
4310
4320
4330
4340
4350
4360
4370
NEXT M
RETURN
' Define LQ pica download character
LPRINT C$;
LPRINT E$;"&";CHR$(O);CHR$(6O):CHR$(60);
RESTORE 4100
READ LS :LPRINT CHR$(LS);
READ CW :LPRINT CHR$(CW);
READ RS :LPRINT CHR$(RS);
FOR M=l TO CW*3
READ MM
LPRINT CHR$(MM);
NEXT M
RETURN
' DATA
t Super/subscript download character data
DATA- 7, 23, 6
DATA 12. 0.
64;128,
16. 0. 44, 0,
80, 0, 44,120
DATA 33,120; 94,128,
33,120, 94,128
DATA 33, 24, 66, 0, 33, 24,
94,128, 33,120
;A";; ;;,128, , 0, 33,120, 16, 0, 64,128, 12, 0
44,120, 80, 0
' LO pica download characer data
DATA -
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
4. 29, 3
7. 0. 0. 8. 0,
0, 23, 0, 0
40; 0;
o; 19; 15,192, 40, 16, 0
80, 47,192, 32, 80,
0, 80,175,192
47, 80,
0, 80,175,192, 47, 80, 0
80,163,192, 33, 64,
0, 80,163,192
33, 64,
0, 80,163,192, 47, 80, 0
80,175,192, 47, 80,
0, 80,175,192
32, 80,
0, 80, 47,192, 40, 16, 0
19, 15,192, 40, 0,
0, 23, 0, 0
8, 0, 0, 7, 0, 0
' Dot araphics data
' ROW i -
DATA 0, 0, 0, 0, 1, 3,
7, 7, 7, 15
DATA 14, 14, 14, 14, 14, 7,
7, 3, 3, 15
DATA 15, 15,
0, 0, 0, 0,
6, 7, 7, 7
DATA 7, 7,
7, 7, 7, 6,
6, 0, 0, 7
DATA 7, 7,
7, 7, 7, 7,
7, 7, 7, 7
DATA 0, 0,
7, 7,. 7, 7,
7, 7, 7, 7
DATA 7. 7.
0. 0. 0
'ROW2'
DATA 0, 0, 60,255,255,255,255,255,143, 15
DATA 7, 7, 7, 7, 3, 3, 3,131,193,241
DATA 240,240, 0, 0, 0, 0, 0, 0,224,255
DATA 255,255,255,255, 31, 0, 0, 0, 1, 3
DATA 31,255,255,255,255,255,255, 1, 0, 0
4380
DATA
0, 1, 7, 31,255,252.240,192,128. 0
4390 DATA
0, 0,
0, 0, 0
4400 ' ROW 3
4410 DATA
0, 31, 31, 3,129,128,192,192,192,192
99