User`s manual

ManualsBrandsCitizen ManualsComputer equipmentBD2-2860

BD2-2860 User’s Manual

CITIZEN

72

[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:

n1=10:n2=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

[Print Results]