I
1250
1260
1270
1280
1290
1300
1310
1320
1330
1340
1350
1360
1370
1380
1390
1400
1410
1420
1430
1440
1450
1460
1470
1480
1490
LPRINT “CHEMICALS’’;U-IF?$(9) ;
FOR 1=.4 TO 8.7 STEP .4
LPRINT CHR$(60) ;
NEXT I
LPRINT
LPRINT “GUNS’’;CHR$(9) ;
FOR 1=.4 TO 1.4 STEP .4
LPRINT CHR$(62);
NEXT I
LPRINT
LPRINT CHR$(9); ’’+–-”;
SCALE$=’’–-+–-”
FOR 1=2 TO 8 STEP 2
LPRINT SCALE$;
NEXT I
LpRINT II––+11
LPRINT CHR$(9); ” “;
FOR 1=2 TO 8 STEP 2
LPRINT “
“;1;
NEXT I
LPRINT CHR$(27) ;“%’’;CHR$(O)
LPRINT CHR$(27) ;’’S’’;CHR$(O) ;
LPRINT CHR$(9);
“MILLIONS OF DOLLARS”
LPRINT CHR$(27); ”T”
END