Example

10

REM

top

and bottom margin

 

20

LPRINT

CHR$(27);"[6t";:REM form length

 

30

LPRINT

CHR$(27);"[2;5r":REM set margins

 

40

FOR F=1 TO

2

 

 

50

FOR L=2 TO

5

 

 

60

LPRINT

"form";F;"

line ";L

 

70

NEXT L:NEXT F

 

 

80

LPRINT

 

 

 

 

90

LPRINT

CHR$(27);"[0;0r";:REM clear margins

 

100

FOR F=1 TO

2

 

 

110

FOR L=1 TO

6

 

 

120

LPRINT

"form";F;"

line ";L

 

130

NEXT L:NEXT F

 

 

140

END

 

 

 

10Paper and Text Formatting

Page 246
Image 246
Tally Genicom Matrix Printer manual For F=1 to For L=2 to Lprint