Tally Genicom Matrix Printer manual For X=1 to 60REM

Example 10 REM Reassigns graphics sequence

20LPRINT CHR$(27);"K";CHR$(60);CHR$(0);

30REM Standard ESC K graphics sequence

40	FOR X=1 TO 60:REM	60 Columns
50	LPRINT CHR$(255);:REM	one byte per columns
60	NEXT X:LPRINT
70	LPRINT CHR$(27)"?K";CHR$(3)

80REM Reassigns ESC K to quadruple density

90LPRINT CHR$(27)"K";CHR$(60);CHR$(0);

100	FOR Z=1 TO 60:REM	60 Columns
110	LPRINT CHR$(255);CHR$(255);CHR$(255);
130	NEXT Z
140	END

70Graphics