Star Micronics MULTI-FONT NX-1000II User Manual page 51

1""
1'
i
1000 ' Set
control codes
1010 E$=CHR$(27)
'Escape code
1020 D$=E$+''xO" 'Draft quality
1030 N$-E$+''x1°
'Near letterquality
1040 C$=E$+''kO''+N$
'Couriercharacters
1050 S$=E$+''kl''+N$
'Sanserifcharacters
1060 Ol$==E$+''k2''+N$ 'Orator with small capital
1070 02$=E$+''k3''+N$
'Orator with lower case
1080 H$=CHR$(9) 'Horizontal tab
1090 P$=E$+"P"
'Pica pitch
1100 ' Start printing
1110 WIDTH "LPT1:'',255
1120 LPRINT E$;''D'';CHR$(3) ;CHR$( 13);CHR$(0)'SetHT
1130 LPRINT C$;''Type styles are:"
1140 LPRIN'T H$;D$;''Draft c haracters."
1150 LPRINT H$;C$; ''Courier c haracters,"
1160 LPRINT H$;S$;''Sanserif characters, "
1170 LPRINT H$;Ol$;''Orator with small caPitals,or "
1180 LPRINT H$;02$; "
with lower case characters, "
1190 LPRINT E$;"4";
'Selectitalics
1200 LPRINT H$;02$;''and " ;Ol$;''italics ";S$;''for " ;
1210 LPRINT C$;''all ";D$;''styles."
1220 LPRINT E$;"5"
'Cancelitalics
1230 LPRINT C$;''Print p itches are:"
1240 LPRINT H$;P$;''Pica p itch,"
1250 LPRINT H$;E$; ''M'';"Elite pitch,"
1260 LPRINT H$;CHR$(15);'Condensed pitch
1270 LPRINT P$;''Condensed pica pitch,"
1280 LPRINT H$;E$;''M";
"Condensedelite pitch,";
1290 LPRINT P$; 'Picapitch
1300 LPRINT CHR$(18)
'Cancelcondensedprint
1310 LPRINT H$;E$;''P1";
'Select proportional spacing
1320 LPRINT "proportional spacing for all pitches, "
133o LPRINT E$;''PO" 'Cancel proportional spacing
1340 LPRINT H$;E$; ''Wl''Expanded,ed, ";E$;''WO";
1350 LPRINT E$; ''wl''D oublebheightght, ";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
1400 LPRINT E$;''Q'';CHR$(47) 'Set right margin
1410 LPRINT C$;''Various line and character Spacings:"
1420 LPRINT E$;''al"
'Center text
1430 FOR 1=1 TO 10
1440 LPRINT E$;''A'';CHR$(I); 'Set line Spacing
1450 LPRINT E$;" ';CHR$(I); 'Increase character Space
1460 LPRINT "THE SPACINGSARE CHANGED"
1470 NEXT I
1480 FOR 1=10 TO 1 STEP –1
41