73
Table 5-10
Vertical tab commands
Function Control code
Advancepaperto nexttabposition
CHR$(ll)
Set verticaltabs at nl, n2, etc.
(ESC)“B”CHR$(nl)CHR$(n2).....
CHR$(0)
Set verticaltabs every n lines (ESC) “e” 1 CHR$(n)
One-timeverticaltab
(ESC) ‘<f>’1 CHR$(n)
H Vertical tab channels
Vertical tab channels are especially hefpful in two situations.
The first occurs when you are writing a program to accompany
a preprinted form that can accommodate verious types of
responses. The second occurs when you create a multipage
form or report with different vertical tabs on each page.
Table 5-11
Vertical tab channel commands
Function
Control code
Set verticaltabs at nl, n2, etc. as
(ESC) “b” CHR$(nO)CHR$(nO
channelnO
CHR$(n2)..... CHR$(0)
SelectverticalchannelnO
<ESC)“/” CHR$(nO)
You can store up to eight channels of tab stops. They are
‘numbered from O to 7. If you have already stored a set using
(ESC) “B” command, your printer has labelled it as channel O.
Try this program how to see the vertical tab channels work.
10 ‘
Democjf \’ert ical tab channels
20 LPRINTCHR$(27);“b” ;CHR$(1) ;CllR$(10) ;CHR$(20);
CHR$(0 ) ;
:ja I,PRINT CHR$(27) ; “k,”;CHR$(2!) ;CHR$(IT) ;CHR$(25 ) ;
CHR$(O) ;
40 LPRINTCHR$(27) ; “b”; CHR$(3 ) ;CHRS(17) ;CHR$(28) ;
CHRS(O) ;
.50
‘ IJSP i,~r~ i~a 1 t,~k)chanrl~~ls
60 FOR 1=1 TO 3
70 IPRI NT “TOP OF FORM”
80 LPRINTCHR$(27); “/” ;CHR$(I) ;
90 i.PRINT CHR$(11) ;
1(]0 LPRINT “1ST TABOF CHANNEL”;I
L1O[-PRINTCHR$(] 1) ;
120 LPR1NT “2NDTAB(>FCliANNEI”II
