User`s manual

BD2-2860 User’s Manual

CITIZEN

[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); LPRINTCHR$ (&H80) ;

GOSUB IMG2 LPRINTCHR$ (&H00) ;

LPRINT CHR& (&HA); LPRINTCHR$ (&H05) ;

END NEXT I

LPRINT CHR$ (&HFF) ;

RETURN

[Print Results]