1180 LPRINT "AUTOS";CHR$(9);
1190 FOR I=.4 TO 9.3 STEP .4
1200 LPRINT CHR$(61);
1210 NEXT I
1220 LPRINT
1230 LPRINT "CHEMICALS";CHR$(9);
1240 FOR I=.4 TO 8.7 STEP .4
1250 LPRINT CHR$(60);
1260 NEXT I
1270 LPRINT
1280 LPRINT "GUNS";CHR$(9);
1290 FOR I=.4 TO 1.4 STEP .4
1300 LPRINT CHR$(62);
1310 NEXT I
1320 LPRINT
1330 LPRINT CHR$(9) ;"+--";
1340 SCALE$="--+--I'
1350 FOR I=2 TO 8 STEP 2
1360 LPRINT SCALE$;
1370 NEXT I
1380 LPRINT "--+"
1390 LPRINT CHR$(9);" 'I;
1400 FOR I=2 TO 8 STEP 2
1410 LPRINT " ";I;
1420 NEXT I
1430 LPRINT CHR$(27);"I";CHR$(2)
1440 LPRINT CHR$(27);"S";CHR$(O)i
1450 LPRINT CHR$(9);"MILLIONS OF DOLLARS"
1460 LPRINT CHR$(27):"T"
1470 END
1500 DATA 0. 0, 0. 0, 2, 4, 4. 2. 1. 8
1510 DATA 8, 0, 1. 16,240,224, 1. 0. 0, 0
1520 DATA 1, 0, 0, 0. 1, 0, 0. 0. 1, 0
1530 DATA 240,224, 1. 16. 8. 0. 1, 8. 4, 2
1540 DATA 2. 4. 0, 0. 0. 0
1550 DATA 14, 28, 16, 32. 38. 14. 1. 64. 70, 14
1560 DATA 1, 0, 70. 14, 0. 0.126.124, 0. 0
1570 DATA 0. 0, 70, 12, 0, 64. 38, 12. 0, 32
1580 DATA 22, 14, 9. 16. 6, 14, 9. 0. 6, 14
1590 DATA 8. 0, 6. 12. 0. 0
1600 DATA 0, 0, 24. 32, 7, 16. 56. 14. 1, 48
1610 DATA 56, 14. 7, 48, 8. 14. 2. 32. 8, 0
1620 DATA 6. 32, 8. 0. 2, 40, 8. 0. 4. 36
1630 DATA 8. 0, 0, 40. 8. 0. 0, 32, 32, 0
1640 DATA 8, 32, 0, 0, 24, 48
-
-
-
92