The following program demonstrates how to use the NLQ download characters with the Standard mode:

1000 LPRINT CHR$(27);"xl"

1010 LPRINT CHR$(27);"&";CHR$(O);

1020 LPRINT CHR$(60);CHR$(62);

1030 FOR N=60 TO 62

1040 LPRINT CHR$(O);CHR$(23);CHR$(O);

1050 FOR M=l TO 69

1060 READ MM

1070 LPRINT CHR$(MM);

1080 NEXT M

1090 NEXT N

1100 LPRINT

1110 LPRINT CHR$(27);"D";CHR$(ll);CHR$tO);

1120 LPRINT CHR$(27);"h";CHR$(l);

1130 LPRINT u U.S. EXPORTS"

1140 LPRINT CHR$(27);"h";CHR$(O);

1150 LPRINT CHR$(27);"%";CHR$(l);

1160 LPRINT "AUTOS";CHR$(9);

1170 FOR I=.4 TO 9.3 STEP .4

1180 LPRINT CHR$(61);

1190 NEXT I

1200 LPRINT

1210 LPRINT "CHEMICALS";CHR$(9);

1220 FOR I=.4 TO 8.7 STEP .4

1230 LPRINT CHR$(60);

1240 NEXT I

1250 LPRINT

1260 LPRINT "GUNS";CHR$(9);

1270 FOR I=.4 TO 1.4 STEP .4

1280 LPRINT CHR$(62);

1290 NEXT I

1300 LPRINT

1310 LPRINT CHR$/9);"+--'I:

1320 SCALE$="--+--'I

1330 FOR I=2 TO 8 STEP 2

1340 LPRINT SCALE$;

1350 NEXT I

1360 LPRINT "--+"

1370 LPRINT CHR$(9);" ";

1380 FOR I=2 TO 8 STEP 2

1390 LPRINT u ";I;

-

-

88

Page 96
Image 96
Star Micronics NX-1020 user manual Lprint Lprint CHEMICALSCHR$9