78
| Table |
Vertical | tab channel commands |
Function | Control code |
Setverticaltabsatnl, n2, etc. < ESC > “b”CHR$(nO)CHR$(nl)
aschanneln0CHR$(n2).....CHR$(O)
Selectverticalchanneln0 <ESC> “/”CHR$(nO)
You can store up to eight channels of tab stops. They are numbered from 0 to 7. If you have already stored a set using
<ESC > “B” command, your printer has labelled it as channel
0.
Try this program how to see the vertical tab channels work.
10 ’ Demo of vertical tab channels
20 LPRINT CHR$(27);“b”;CHR$(l~;CHR$(lO);CHR$(20); CHR$(O);
30 LPRINT CHR$(27);“b”;CHR$(2);CHR$(15);CHR$(25); CHR$(O);
40 LPRINT CHR$(27);“b”;CHR$(3);CHR$(17);CHR$(28); CHR$(O);
50’ Use vertical tab channels
60FOR I=1 TO 3
70LPRINT “TOP OF FORM”
80LPRINT CHR$(27);“/“;CHR$(I);
90LPRINT CHR$(ll);
100 LPRINT “1ST TAB OF CHANNEL“;I
110 LPRINT CHR$(ll);
12O’LPRINT “2ND TAB OF CHANNEL”;I 130 LPRIN’TCHR$(12);
140 NEXT I
150 LPRINT CHR$(27);“@”
160 END
In this program we set tabs at 10 and 20 in channel 1 in line
20.In line 30 we set tabs 15 and 25 in channel 2, and in line
40we set tabs 17 and 28 in channel 3.
Because the channels are stored, you must make the printer to recall one before you use it, so we used < ESC > “I” CHR$(nO) in line 80.
When you run this program the printout should look like this.
