Star Micronics LC-15 user manual Lprint SCALE$, Lprint CHR$9 Millions of Dollars

I

1250 LPRINT “CHEMICALS’’;U-IF?$(9) ;

1260 FOR 1=.4 TO 8.7 STEP .4

1270 LPRINT CHR$ (60) ;

1280 NEXT I

1290 LPRINT

1300 LPRINT “GUNS’’;CHR$(9) ;

1310 FOR 1=.4 TO 1.4 STEP .4

1320 LPRINT CHR$(62);

1330 NEXT I

1340 LPRINT

1350 LPRINT CHR$(9); ’’+–-”;

1360 SCALE$=’’–-+–-”

1370 FOR 1=2 TO 8 STEP 2

1380 LPRINT SCALE$;

1390 NEXT I

1400 LpRINT II––+11

1410 LPRINT CHR$(9); ” “;

1420 FOR 1=2 TO 8 STEP 2

1430 LPRINT “ “;1;

1440 NEXT I

1450 LPRINT CHR$(27) ;“%’’;CHR$(O)

1460 LPRINT CHR$(27) ;’’S’’;CHR$(O) ;

1470 LPRINT CHR$(9); “MILLIONS OF DOLLARS”

1480 LPRINT CHR$(27); ”T”

1490 END