:.87
10 ’ Demo of
20 LPRINT CHR$(27) ;“l”;
30 FOR I=1 TO 10
40 LPRINT IIt, ,I
50NEXT I
60 LPRINT :LPRINT
70 LPRINT CHR$(27) ; “Ul”;
80 FOR I=1 TO 10
90 LPRINT I, I, ,I
100 NEXT I
110 LPRINT CHR$(12);CHR$t271;“@”
Here is what you will get. The top line is printed
Let’s analyze the program. Line 20 sets the line spacing to 7/72 of an inch so that the characters that we print will touch top to bottom. Lines 30- 50 print 10 vertical line characters.
Then line 70 sets
You can also set the printer to print in one direction for
one line only by using the < ESC > “ <” command. This