— 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