Star Micronics NP-IO manual Next J

Page 73

L

L

L.

L

L

67

10 LPRINT CHR$(27);"0";

20 LPRINT CHR$(27);"6";

30 FOR J=3 TO 6

40 LPRINT w ";J;CHR$(J);CHR$(g);

50 NEXT J

60 LPRINT ' 20 ";CHR$(20)

70 LPRINT

80 LPRINT ' 21 ";CHR$(21);CHR$(9);

90 LPRINT ' 26 ";

100 LPRINT CHR$(26)

120 LPRINT

130 FOR J=128 TO 254 STEP 5

140 FOR I=J TO J+4

150 IF I>254 THEN 170

160 LPRINT I;CHR$(I);CHR$(9);

170 NEXT I

180 LPRINT :LPRINT

190 NEXT J

Figure 5-1 shows what this program will print. If your chart doesn’t 1001like this because it has regular letters and numbers instead of the special symbols, then your computer is only using seven bits. You can get the correct printout by changing line

160 to this:

160 LPRINT I;CHR$(27);">";CBR$(I);CHR$(27);"="; aw(9);

A note for the IBM-PC users:

When you run this program, you cannot get the right-pointed arrow (CHR$(26)) with the IBM-PC computers. This is because the IBM-PC does not send this code to the printer.

There is a solution to avoid this problem. Change lines 100 and 120 to the either set of the following lists.

100 O=INP(&H379) : IF 0<128 THEN 100

110 OUT &H378,26 : OUT &H37A,5 : OUT &H37A,4

120 LPRINT : LPRINT

100 O=INP(&H3BD) : IF 0<128 THEN 100

110 OUT &H3BC,26 : OUT &H3BE,5 : OUT &H3BE,4

120 LPRINT : LPRINT

Image 73
Contents NP-IO Self Declaration Table of Contents BIG Caring for Your Printer Functions of the Connector Signals Setting UP Your Printer Page Remove the protective tube from the carriage rail Page ‘.igure Memo Getting to Know Your Printer Pow\er cord Control panel Forward Selecting and Loading Paper Release lever To align paper that is not in straight Release lever Open the sprocket covers to expose the sprocket teeth Adjusting the Print Head Show you Printer When Want to Long Function Connecting the Printer Printing with Basic List Page Ascii Page Some Special Kinds of Text ESC Italic on Try this program to see them work Pica ESC P Elite Escm When you run this program you should get this Lprint Condensed CondensedON Here’s what you should get from this program Making Words Stand OUT Boldface on =49 Summary notes Formatting Text Line feed commands This is what you will get Run the program again. Now the results will look like this Set line spacing Inch Esco Set line snacing Lprint Line Number Form feed Lprint CHR$ ESC Top and bottom margin commands Function Control code Lprint this is LINE1 Next Page Try setting the margins with this program Here’s what you should get To begin Try this program to see how this works Lprint CHR$27xO 110 END Relative Horizontal Tab Lprint CHR$27BCHR$lOCHR$l5 Lprint CHR$25CHR$30CHR$o Lprint CHR$llFIFTH TAB CHR$n When you run this program the printout should look like this When you run this program, you should get like this Memo Special Features Printer Lprint CHR$7 Master rest Lprint Backspace does not Lprint CHRS27il Added Spaces This Lprint Next Lprint Lprint Eighth bit controls Next J Page Lprint CHR$27 Lprint CHR$27= Lieltil~l When you refer the Appendix C, you’ll find many characters When you run this program you should get like this Big character commands Function Lprint Double CHR$SO Lprint Testing Abcd ~~III.II I I,I~I~II L 1-t40 Memo Download Characters DOT Graphics Pins prints a row of dots Vertical 241 P r ESC 8~ CHR$O nl n2 m0 ml m2 m3 m4 m5 m6 m7 m8 m9 ml0 ml1 Page Lprint U.S. Exports Lprint Scales Designing Your OWN NLQ Characters Page Lprint Lprint CHEMICALSCHR$9 Lprint CHR$9i--I SCALE$=--+-I For I=2 to 8 Step Calculating Nl and n2 Umber of col- 1 Then nl is N2 is 11m2 More graphics commands Printer needs 2 bytes to fire all 9 pins in the g-pin