Filter
Top Products
1650
1660
1670
1680
1690
1700
1710
1720
1730
1740
1750
1760
1770
1780
1790
1800
1810
1820
1830
1840
1850
1860
1870
1880
1890
1900
1910
1920
1930
1940
1950
1960
1970
1980
1990
2000
2010
2020
2030
2040
2050
2060
2070
2080
2090
2100
2110
2120
LPRI~ H$;C$; ‘Tbwnload
characters: “;
LPRI~ D$;E$; “%1”;
‘Select download character
FOR1==1ITI 5
LPRI~ CliR$(60) :
‘Print downltid character
NEXTI
LPRIm E$; “%0”;
‘Select normal character
GC@JB2200
IYRINTC$;E$; “%1”;
‘Select download character
FOR1=1 TU 5
LPRINTCHR$(60); ‘Print download character
NEXTI
LPRI~ E$; “%0”
‘Select normal character
LPRINTH$;C$;“Varioue dot graphic densltles:”
DIMKKQ$(4)
RE3P3RE2390
m Row=l To 4
FCRCOL=l TO65
RADrKi
LX130$(RQW)”LIXO$(RW +CliR$(D3)
NEXTCOL
~N!!!!; “A”;CHR$(8) ; ‘Set8/72”
line .spacirq
m ROW-lm
4
LPRINTH$;“ “;
mB-o To4
IF 8=2 TIiD41940
LPRINTE$;
“*’’;CHR$(B);
‘Select dot gra~ica mode
LPRINTCHR$(65);CHR$(0);I.CX33$(Ii0W);
LPRIIW“ “;
NEXTB
~INT
mm
LPRI~
m ROW”lm 4
~1~ H$;“ “;
m B-5 m 7
tYRINTE$; ““” ;CliR$(B); ‘Select dot
gra@ics rode
LPRI~ CIiR$(65) ;CJ-IR$(0);LCGO$(ROW);
LPRI~ “ “;
NEXTB
LPRINT
mm
LPRINTE$; “@” ‘Initialize printer
m
‘ SUBR3WINE5
‘ Define draft download character
LPRINTD$;E$; “&’’;CHR$(O);CHR$(60);CHR$(60);
2130 REEKK!E2300
2140 FORM=EOIU 11
2150 READMM
2160 LPRINI’CHR$(MM);
2170 NEXTM
M