Citizen Systems Model CMP-10 User Manual

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