1090 P$=E$+”P”

‘Pica pitch

1100 ‘ Start printing

———————————-————-—.—-.———.———- .—-.-———

1110 WIDTH “LPT1:“,255

1120 LPRINT E$;’’D’’;CHR$(3);CHR$(25);CHR$(0) ‘Set HT

1130 LPRINT c$; “Type styles are: “

1140 LPRINT H$;D$;’’Draftcharacters,”

1150 LPRINT H$;C$;“Courier characters,”

1160 LPRINT H$;S$;”Sanserif characters,”

1170 LPRINT H$;Ol$;’’Oratorwith small caPitals, or”

1180 LPRINT H$;02$;”

with lower case characters,”

1190 LPRINT E$;’’4”;

‘Select italics

1200 LPRINT

H$;02$;’’and“;Ol$;’’italics “;S$;’’for “;

1210 LPRINT

C$;’’all“;D$:’’styles.”

1220 LPRINT

E$;”5°

‘Cancel italics

1230 LPRINT

C$;“Print pitches are:“

1240

LPRINT

H$;P$;“Pica pitch (10 CPI),”;

1250

LPRINT

H$;E$;’’Fl’’Eliteitepitch (12 CpI),“

1260

LPRINT

H$;CHR$(15); ‘Condensedpitch

1270

LPRINT

P$;’’Condensedpica pitch (17 CPI).”;

1280

LPRINT

H$;E$;’’M’’Condensedsedelite pitch (20 CpI),”;

1290 LPRINT

P$;

‘Pica pitch

1300

LPRINT

CHR$(18)

‘Cancelcondensed print

131o

LPRINT

H$;E$;”P1”;

‘Select proportionalspacing

1320

LPRINT “proportionalspacing for all pitches,”

1330

LPRINT E$;’’PO”

‘Cancel proportionalspacing

1340

LPRINT H$;E$;”W1’’;’’Expanded,“;E$;’’WCI”;

1350

LPRINT H$;E$;’’wl’’Doublebhei9ht9ht,“;E$;’’wO”

1360

LPRINT H$;E$;’’h’’;CHR$(l)“Double-sized,“

1370

LPRINT H$;E$;“h’’;CHR$(2)“Quad–sized. “;

1380

LPRINT E$;’’h”;CHR$(O)

 

1390

LPRINT :LPRINT

‘Set right margin

1400

LPRINT E$;UQ”;CHR$(49)

1410

LPRINT C$;UVarious line and character spacings:”

1420

LPRINT E$;’’al” ~

‘Center text

1430

FOR 1=1 TO 7

 

1440

LPRINT E$;’’A’’;CHR$(I) ‘Set line spacing

1450

LPRINT E$;” “;CHR$(I);

‘Increasecharacter space

1460

LPRINT “THE SPACINGS ARE CHANGED”

1470

NEXT I

 

 

1480

FOR 1=7 TO 1 STEP –1

 

149o

LPRINT E$;’’A’’;CHR$(I)

 

1500

LPRINT E$;” “;CHR$(I);

 

1510 LPRINT “THE SPACINGS,ARE CHANGED”

1520 NEXT I

 

‘Left justify

1530 LPRINT E$;’’aO”

1540 LPRINT E$;’’3’’;CHR$(36);‘Set 1/6” line sPacin9

1550 LPRINT E$;” “;CHR$(0);

‘Normalcharacter space

1560 LPRINT :LPRINT

 

1570 LPRINT C$;“Other features:“

1580 LPRINT H$;E$;’’E’’Emphasized”ed”;E$;’’F’’;”,“;

1590 LPRINT E$;’’G’’Doublebstrikeuke”;E$;’’H’’;”,“;

1600 LPRINT E$;”–l”;“Underlining’’;E$; “–O”;“,“ 1610 LPRINT H$;E$;”–l’’;’’0verlinin9”;E$;’’-;”,;”,“; 1620 LPRINT E$;’’SO’’SUPERSCRIPT”PT”;E$;’’T”;”and “; 1630 LPRINT E$;”SI”;”SUBSCRIPT”;E$;”T”

Page 92
Image 92
Star Micronics LC-15 user manual Lprint