Citizen CBM-292 Bedienungsanleitung Seite 79

[Sample Program]
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
NEXT J
RETURN
FOR I=1 TO n2
LPRINT CHR$ (J) ;
NEXT I
[Print Results]
78
CBM-292/293 User's Manual
CITIZEN