Olivetti 900X Operating Instructions Manual page 54

Sample Print ing
0 1 2 3 45 6 7 8 9 0 1 2 3 45 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 34 5 6 7 8 9 0 1 2 3 4 5 6 7 89
A - Tab
6) Set Horizontal tab ( E SC 1)
LPR I NT CHR$(27); " 1 '· ; or L P R I NT CHR$(&H18); " 1 " ;
For mat .
Function • This escape sequ ence sets a horizontal tab at the current carrier
position. A maximum of 24 tabs can be set.
Sample Program
1 0 0 REM H o r i z on t a l Tab S e t ( E S C 1 )
1 1 0 LPRINT CHR $ ( 2 7 ) ; CHR$ ( 2 6 ) ; " I " ; : REM RESET
1 2 0 LPRINT " 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 34 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 "
1 3 0 LPR INT SPC ( l O ) ; CHR
1 4 0 FOR 1 = 1 TO 2
1 5 0 LPR INT CHR$ ( 9 ) ; "HT" ;
1 6 0 NEXT I
1 7 0 END
Sample Printing
0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 45 6 7 8 9 0 1 2 3 4 5 6 7 89
HT
7) Clear all tabs ( E SC 2)
Format • LPR I NT CHR$(27) ; 2 ' , or LPR I NT C H R $ ( & H 18); "2·· ;
Function This escape sequ ence clears all tabs. Many computers do not
correctly send CHR$ (9) data, in which case print out will differ
from the sample below.
Sample Program and Sample Printing R efe r to Item 8) Clear tab.
8) Clear tab ( ESC 8)
Format • LPR I NT C H R $(27 ) ; " 8 " ; or L P R I NT C H R $ ( & H 18); " 8 "
Function • This escape sequence clears the tab at the current carrier
position.
A - Tab
1
$ ( 2 7 ) ; " 1 " ; SP C ( 5 ) ; CHR$ ( 2 7 ) " 1 "
HT
j
48