[Sample Program]

 

 

 

LPRINT CHR$(&H1B);"*";

 

 

LPRINT CHR$(0);CHR$(20);CHR$(0);

IMG1:

 

GOSUB IMG1

LPRINT CHR$(&HFF);

 

LPRINT CHR$(&HA);

FOR I = 1 TO 18

 

LPRINT CHR$(&H1B);"*";

LPRINT CHR$(&H85);

 

LPRINT CHR$(1);CHR$(20);CHR$(0);

NEXT I

 

GOSUB IMG1

LPRINT CHR$(&HFF);

 

LPRINT CHR$(&HA);

RETURN

 

LPRINT CHR$(&H1B);"*";

IMG2:

 

LPRINT CHR$(32);CHR$(20);CHR$(0);

LPRINT CHR$(&HFF);

 

GOSUB IMG2

LPRINT CHR$(&HFF);

 

LPRINT CHR$(&HA);

LPRINT CHR$(&HFF);

 

LPRINT CHR$(&H1B);"*";

FOR I = 1 TO 18

 

LPRINT CHR$(33);CHR$(20);CHR$(0);

LPRINT CHR$(&H80);

 

GOSUB IMG2

LPRINT CHR$(&H00);

 

LPRINT CHR$(&HA);

LPRINT CHR$(&H05);

 

END

NEXT I

 

 

LPRINT CHR$(&HFF);

 

 

LPRINT CHR$(&HFF);

 

 

LPRINT CHR$(&HFF);

 

 

RETURN

[Print Results]

← 8-dots single density

 

 

 

 

← 8-dots double density

 

 

← 24-dots single density

 

 

← 24-dots double density

 

— 46 —

Page 51
Image 51
Citizen CT-S300 manual IMG1