beautypg.com

Citizen Systems CBM-253 User Manual

Page 107

background image

CBM-253 User’s Manual

95

CITIZEN

[Program example]

LPRINT CHR$ (&H1D) + "C0" ;

LPRINT CHR$ (3) + CHR$ (0) ;

LPRINT CHR$ (&H1D) + "C;" ;

LPRINT "50;0;5:2;50;" ;

GOSUB CNT

LPRINT CHR$(&H1D) + "C;";

LPRINT "*50;0;5;2;5;" ;

GOSUB CNT

END

CNT :

FOR I=1 TO 6

LPRINT CHR$(&H1D) + "c" ;

NEXT I

LPRINT CHR$ (&HA) ;

RETURN

[Printing result]

GS

∗∗∗∗

n1 n2 [d] n1 x n2 x 8

[Name]

Definition of the downloading/bit image

[Code]

<1D>H <2A>H [] n1

×

n2 x 8

[Defined ranges]

0

n1

255

0

n2

48

n1

×

n2

1311