Citizen Model CMP-10 - Page 17

— 15 —
[Sample Program]
PRINT #1, CHR$(&H1B) + “ * ”;
PRINT #1, CHR$(0) + CHR$(20) + CHR$(0); IMG1:
GOSUB IMG1 PRINT #1, CHR$(&HFF);
PRINT #1, CHR$(&HA); FOR I=1 TO 18
PRINT #1, CHR$(&H1B + “ * ”; PRINT #1, CHR$(&H85);
PRINT #1, CHR$(1) + CHR$(20) + CHR$(0); NEXT I
GOSUB IMG1 PRINT #1, CHR$(&HFF);
PRINT #1, CHR$(&HA); RETURN
PRINT #1, CHR$(&H1B) + “ * ”; IMG2:
PRINT #1, CHR$(32) + CHR$(20) + CHR$(0); PRINT #1, CHR$(&HFF);
GOSUB IMG2 PRINT #1, CHR$(&HFF);
PRINT #1, CHR$(&HA); PRINT #1, CHR$(&HFF);
PRINT #1, CHR$(&H1B) + “ * ”; FOR I=1 TO 18
PRINT #1, CHR$(33) + CHR$(20) + CHR$(0); PRINT #1, CHR$(&H80);
GOSUB IMG2 PRINT #1, CHR$(&H00);
PRINT #1, CHR$(&HA); PRINT #1, CHR$(&H05);
END NEXT I
PRINT #1, CHR$(&HFF);
PRINT #1, CHR$(&HFF);
PRINT #1, CHR$(&HFF);
RETURN
[Print Results]
← 8-dot single density
← 8-dot double density
← 24-dot single density
← 24-dot double density