Citizen Systems CBM-253 - Manual (Page 99)

CBM-253 User’s Manual
87 CITIZEN
[Program example]
LPRINT CHR$ (&H1D) + "C0" ;
LPRINT CHR$(0) + CHR$(0) ;
GOSUB CNT
LPRINT CHR$ (&H1D) + "C0" ;
LPRINT CHR$ (1) + CHR$ (0) ;
GOSUB CNT
LPRINT CHR$ (&H1D) + "C0" ;
LPRINT CHR$ (3) + CHR$ (0) :
GOSUB CNT
LPRINT CHR$ (&H1D) + "C0" ;
LPRINT CHR$(3) + CHR$(1) ;
GOSUB CNT
LPRINT CHR$(&H1D) + "C0" ;
LPRINT CHR$(3) + CHR$(2) ;
GOSUB CNT
END
[Printing result]
GS C O m n
[Name] Setting of the numbering printing mode
[Code] <1D>H <43>H <30>H
[Defined ranges] 0
≤
m
≤
5
0
≤
n
≤
2
CNT :
FOR I=1 TO 5
LPRINT CHR$(&H1D) + "c" ;
NEXT I
LPRINT CHR$ (&HA) ;
RETURN