Example 2 REM Example 2 for unsecured printing OPEN "lpt1:" FOR RANDOM AS #1 WIDTH #1, 255
PRINT #1, CHR$(27); "[?11~";
PRINT #1, CHR$(27); "PSCO"; CHR$(27); "\"; PRINT #1, CHR$(16); "5"; CHR$(25);
PRINT #1, "Example for ";
PRINT #1, CHR$(15); "LCP"; CHR$(15);" unsecured mode"; PRINT #1, CHR$(10); CHR$(13);
END
Example 3 REM Example 3 for secured printing OPEN "lpt1:" FOR RANDOM AS #1 WIDTH #1, 255
PRINT #1, CHR$(27); "[?11~";
PRINT #1, CHR$(27); "PSC1"; CHR$(27); "\"; PRINT #1, CHR$(16); "5"; CHR$(25);
PRINT #1, "Example for ";
PRINT #1, CHR$(15); "LCP"; CHR$(15); PRINT #1, " secured"; CHR$(10); "mode"; PRINT #1, STRING$(5, 10);
END
