A-86
ESC D Set Bytes per Line Example
OPEN "COM1:9600,N,8,1" FOR OUTPUT AS #1
PRINT #1, CHR$(27); "*";
PRINT #1, CHR$(27); "B"; CHR$(10);
PRINT #1, CHR$(27); "D"; CHR$(12);
FORI=1TO100
PRINT #1, CHR$(23);
PRINT #1, CHR$(95);
NEXT I
PRINT #1, CHR$(12);
Example 13: ESC D Set Bytes per Line
ESC E Form Feed Example
OPEN "COM1:9600,N,8,1" FOR OUTPUT AS #1
PRINT #1, CHR$(27); "*";
PRINT #1, "ESC E Ejects a Label"; CHR$(10);
PRINT #1, CHR$(27); "E";
Example 14: ESC E Form Feed
ESC J Feed n Sublines Example
OPEN "COM1:9600,N,8,1" FOR OUTPUT AS #1
PRINT #1, CHR$(27);"*";
PRINT #1, "First Line"; CHR$(10);
PRINT #1, CHR$(27); "J"; CHR$(203);
PRINT #1, "One inch below First Line"
PRINT #1, CHR$(12);
Example 15: ESC J Feed n Sublines
ESC M Set Font to 12 cpi Example
OPEN "COM1:9600,N,8,1" FOR OUTPUT AS #1
PRINT #1, CHR$(27); "*";
PRINT #1, CHR$(27); "M"; "12 cpi"; CHR$(10);
PRINT #1, CHR$(12);
Example 16: ESC M Set Font to 12 cpi