Example

10

REM

input data control

 

20

LPRINT CHR$(27);"[7z";

 

30

GOSUB

90

 

40

LPRINT CHR$(27);"[9z";

 

50

GOSUB

90

 

60

LPRINT CHR$(27);"[8z";

 

70

GOSUB

90

 

80

END

 

 

90

FOR I=97 TO 103:LPRINT CHR$(I);:NEXT I

 

100

FOR I=161 TO 167:LPRINT CHR$(I);:NEXT I

 

110

LPRINT:LPRINT

 

120

RETURN

 

Miscellaneous 75

Page 311
Image 311
Tally Genicom Matrix Printer manual Gosub END For I=97 to 103LPRINT CHR$INEXT