User`s manual

ManualsBrandsCitizen ManualsComputer equipmentCBM-292

CBM-292/293 User’s Manual

78 CITIZEN

[Sample Program] [Print Results]

GOSUB IMG

LPRINT CHR$ (&H1D) + "/" + CHR$ (0) ;

LPRINT CHR$ (&H1D) + "/" + CHR$ (1) ;

LPRINT CHR$ (&H1D) + "/" + CHR$ (2) ;

LPRINT CHR$ (&H1D) + "/" + CHR$ (3) ;

END

IMG :

n 1 = 10 : n 2= 5

LPRINT CHR$ (&H1D) + "

∗

" ;

LPRINT CHR$ (n1) + CHR$ (n2) ;

FOR J=1 TO n1

∗

8

FOR I=1 TO n2

LPRINT CHR$ (J) ;

NEXT I

NEXT J

RETURN