User`s manual

ManualsBrandsCitizen ManualsComputer equipmentCBM-202 Series

CBM-202PC-04 User’s Manual

81 CITIZEN

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

GS / m