POWER INSTR.
FILE INFORMATION
FILENAME(S): POWER INSTR.
FILE TYPE(S): PRG
FILE SIZE: 5.1K
FIRST SEEN: 2025-11-30 01:08:19
APPEARS ON: 4 disk(s)
FILE HASH
370e6eccd28e2db77e831159322ff958e4d9c99fdd5891ea1b24fe11f85e8f04
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPIELE | POWER INSTR. | PRG | Treasure Chest - Wolfgang Rauprich | 6 | 0 | DOWNLOAD FILE |
| S PIELE | POWER INSTR. | PRG | Treasure Chest - Wolfgang Rauprich | 6 | 0 | DOWNLOAD FILE |
| FREESOFT DISK NR | POWER INSTR. | PRG | Treasure Chest - Wolfgang Rauprich | 12 | 1 | DOWNLOAD FILE |
| S PIELE | POWER INSTR. | PRG | Treasure Chest - Wolfgang Rauprich | 12 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 32 00 86 46 24 28 32 30 2C 32 30 29 |....2..F$(20,20)|
00000010: 2C 47 28 34 29 2C 4D 28 34 29 00 4E 08 5F 00 99 |,G(4),M(4).N._..|
00000020: 22 93 11 11 11 57 45 4C 43 4F 4D 45 20 54 4F 20 |"....WELCOME TO |
00000030: 54 48 45 20 45 4C 45 43 54 52 49 43 20 55 54 49 |THE ELECTRIC UTI|
00000040: 4C 49 54 59 20 50 52 4F 47 52 41 4D 2E 22 00 76 |LITY PROGRAM.".v|
00000050: 08 64 00 99 22 11 11 20 20 20 20 20 20 20 20 20 |.d..".. |
00000060: 20 20 4D 49 4E 49 20 45 44 49 53 4F 4E 20 43 4F | MINI EDISON CO|
00000070: 4D 50 41 4E 59 22 00 A7 08 65 00 99 22 11 11 20 |MPANY"...e..".. |
00000080: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 52 45 | THIS PROGRAM RE|
00000090: 56 49 45 57 53 20 54 48 45 20 49 4E 53 54 52 55 |VIEWS THE INSTRU|
000000A0: 43 54 49 4F 4E 53 22 00 D4 08 66 00 99 22 46 4F |CTIONS"...f.."FO|
000000B0: 52 20 54 48 45 20 53 49 4D 55 4C 41 54 49 4F 4E |R THE SIMULATION|
000000C0: 20 12 50 4F 57 45 52 20 47 45 4E 45 52 41 54 49 | .POWER GENERATI|
000000D0: 4F 4E 92 2E 00 04 09 68 00 99 22 11 49 46 20 59 |ON.....h..".IF Y|
000000E0: 4F 55 20 41 52 45 20 41 4C 4C 20 52 45 41 44 59 |OU ARE ALL READY|
000000F0: 20 46 41 4D 49 4C 49 41 52 20 57 49 54 48 20 54 | FAMILIAR WITH T|
00000100: 48 45 20 22 00 32 09 69 00 99 22 42 41 53 49 43 |HE ".2.i.."BASIC|
00000110: 20 43 4F 4E 43 45 50 54 20 12 20 50 52 45 53 53 | CONCEPT . PRESS|
00000120: 20 52 20 92 20 54 4F 20 43 4F 4E 54 49 4E 55 45 | R . TO CONTINUE|
00000130: 2E 22 00 5E 09 6C 00 99 22 11 11 11 20 20 20 20 |.".^.l.."... |
00000140: 20 20 20 50 52 45 53 53 20 20 12 53 50 41 43 45 | PRESS .SPACE|
00000150: 92 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 72 |. TO CONTINUE".r|
00000160: 09 6E 00 A1 42 24 3A 8B 42 24 B2 22 22 20 A7 31 |.n..B$:.B$."" .1|
00000170: 31 30 00 89 09 6F 00 8B 42 24 B2 22 52 22 20 A7 |10...o..B$."R" .|
00000180: 99 22 93 22 3A 89 31 38 30 00 B8 09 73 00 99 22 |.".":.180...s.."|
00000190: 93 59 4F 55 20 48 41 56 45 20 4A 55 53 54 20 42 |.YOU HAVE JUST B|
000001A0: 45 45 4E 20 4D 41 44 45 20 53 59 53 54 45 4D 20 |EEN MADE SYSTEM |
000001B0: 50 4C 41 4E 4E 45 52 22 00 E2 09 74 00 99 22 46 |PLANNER"...t.."F|
000001C0: 4F 52 20 54 48 45 20 4D 49 4E 49 2D 45 44 49 53 |OR THE MINI-EDIS|
000001D0: 4F 4E 20 50 4F 57 45 52 20 43 4F 4D 50 41 4E 59 |ON POWER COMPANY|
000001E0: 2E 22 00 0C 0A 75 00 99 22 59 4F 55 20 41 52 45 |."...u.."YOU ARE|
000001F0: 20 54 4F 20 50 4C 41 4E 20 54 48 45 20 45 4C 45 | TO PLAN THE ELE|
00000200: 43 54 52 49 43 20 4E 45 45 44 53 22 00 39 0A 76 |CTRIC NEEDS".9.v|
00000210: 00 99 22 46 4F 52 20 59 4F 55 52 20 53 45 52 56 |.."FOR YOUR SERV|
00000220: 49 43 45 20 41 52 45 41 20 46 4F 52 20 45 41 43 |ICE AREA FOR EAC|
00000230: 48 20 35 2D 59 45 41 52 22 00 5E 0A 77 00 99 22 |H 5-YEAR".^.w.."|
00000240: 50 45 52 49 4F 44 20 46 52 4F 4D 20 31 39 38 30 |PERIOD FROM 1980|
00000250: 20 54 48 52 55 20 32 30 30 35 2E 22 3A 99 00 8A | THRU 2005.":...|
00000260: 0A 78 00 99 22 46 4F 52 20 45 41 43 48 20 50 45 |.x.."FOR EACH PE|
00000270: 52 49 4F 44 20 59 4F 55 20 57 49 4C 4C 20 42 45 |RIOD YOU WILL BE|
00000280: 20 54 4F 4C 44 20 54 48 45 22 00 B8 0A 79 00 99 | TOLD THE"...y..|
00000290: 22 50 4F 57 45 52 20 4E 45 45 44 53 20 46 4F 52 |"POWER NEEDS FOR|
000002A0: 20 59 4F 55 52 20 41 52 45 41 20 41 4E 44 20 59 | YOUR AREA AND Y|
000002B0: 4F 55 20 57 49 4C 4C 22 00 E6 0A 7A 00 99 22 42 |OU WILL"...z.."B|
000002C0: 45 20 47 49 56 45 4E 20 41 54 20 4C 45 41 53 54 |E GIVEN AT LEAST|
000002D0: 20 24 31 30 20 4D 49 4C 4C 49 4F 4E 20 54 4F 20 | $10 MILLION TO |
000002E0: 53 50 45 4E 44 22 00 0E 0B 7B 00 99 22 4F 4E 20 |SPEND"...{.."ON |
000002F0: 50 4F 57 45 52 20 50 4C 41 4E 54 20 43 4F 4E 53 |POWER PLANT CONS|
00000300: 54 52 55 43 54 49 4F 4E 20 41 4E 44 20 22 00 35 |TRUCTION AND ".5|
00000310: 0B 7C 00 99 22 45 4E 56 49 52 4F 4E 4D 45 4E 54 |.|.."ENVIRONMENT|
00000320: 41 4C 20 43 4F 4E 53 49 44 45 52 41 54 49 4F 4E |AL CONSIDERATION|
00000330: 53 2E 22 3A 99 00 5A 0B 7D 00 99 22 20 48 4F 57 |S.":..Z.}.." HOW|
00000340: 20 59 4F 55 20 55 53 45 20 59 4F 55 52 20 24 31 | YOU USE YOUR $1|
00000350: 30 20 4D 49 4C 4C 49 4F 4E 22 00 82 0B 7E 00 99 |0 MILLION"...~..|
00000360: 22 28 4F 52 20 4D 4F 52 45 29 20 49 53 20 55 50 |"(OR MORE) IS UP|
00000370: 20 54 4F 20 59 4F 55 2E 20 59 4F 55 20 48 41 56 | TO YOU. YOU HAV|
00000380: 45 22 00 AB 0B 7F 00 99 22 54 48 45 20 43 48 4F |E"......"THE CHO|
00000390: 49 43 45 20 4F 46 20 41 20 43 4F 41 4C 20 50 4C |ICE OF A COAL PL|
000003A0: 41 4E 54 2C 20 41 20 47 41 53 22 00 D7 0B 80 00 |ANT, A GAS".....|
000003B0: 99 22 50 4C 41 4E 54 2C 20 41 20 4E 55 43 4C 45 |."PLANT, A NUCLE|
000003C0: 41 52 20 50 4C 41 4E 54 2C 20 41 4E 20 4F 49 4C |AR PLANT, AN OIL|
000003D0: 20 50 4C 41 4E 54 22 00 02 0C 81 00 99 22 4F 52 | PLANT"......"OR|
000003E0: 20 41 4E 59 20 43 4F 4D 42 49 4E 41 54 49 4F 4E | ANY COMBINATION|
000003F0: 20 4F 46 20 54 48 45 53 45 20 41 53 20 4C 4F 4E | OF THESE AS LON|
00000400: 47 22 00 30 0C 82 00 99 22 41 53 20 59 4F 55 20 |G".0...."AS YOU |
00000410: 44 4F 4E 27 54 20 43 48 4F 4F 53 45 20 4D 4F 52 |DON'T CHOOSE MOR|
00000420: 45 20 54 48 41 4E 20 34 20 50 4C 41 4E 54 53 22 |E THAN 4 PLANTS"|
00000430: 00 5A 0C 83 00 99 3A 99 22 41 4E 59 20 50 41 52 |.Z....:."ANY PAR|
00000440: 54 20 4F 46 20 59 4F 55 52 20 24 31 30 20 4D 49 |T OF YOUR $10 MI|
00000450: 4C 4C 49 4F 4E 20 4E 4F 54 22 00 79 0C 84 00 99 |LLION NOT".y....|
00000460: 22 53 50 45 4E 54 20 57 49 4C 4C 20 42 45 20 4C |"SPENT WILL BE L|
00000470: 4F 53 54 2E 22 3A 99 3A 99 00 A2 0C 85 00 99 22 |OST.":.:......."|
00000480: 20 20 20 20 20 50 52 45 53 53 20 12 53 50 41 43 | PRESS .SPAC|
00000490: 45 92 A0 54 4F 20 43 4F 4E 54 49 4E 55 45 20 20 |E..TO CONTINUE |
000004A0: 20 22 00 B5 0C 86 00 A1 42 24 3A 8B 42 24 B2 22 | "......B$:.B$."|
000004B0: 22 A7 31 33 34 00 E4 0C 88 00 99 22 93 20 20 20 |".134......". |
000004C0: 20 41 54 20 54 48 45 20 53 54 41 52 54 20 4F 46 | AT THE START OF|
000004D0: 20 45 41 43 48 20 35 20 59 45 41 52 20 50 45 52 | EACH 5 YEAR PER|
000004E0: 49 4F 44 22 00 0F 0D 89 00 99 22 54 48 45 20 43 |IOD"......"THE C|
000004F0: 4F 4D 50 55 54 45 52 20 57 49 4C 4C 20 50 52 49 |OMPUTER WILL PRI|
00000500: 4E 54 20 27 50 4C 41 4E 54 2C 20 48 4F 57 22 00 |NT 'PLANT, HOW".|
00000510: 38 0D 8A 00 99 22 4D 41 4E 59 20 4D 49 4C 4C 49 |8...."MANY MILLI|
00000520: 4F 4E 2C 20 57 48 41 54 20 25 20 46 4F 52 20 45 |ON, WHAT % FOR E|
00000530: 43 4F 4C 4F 47 59 3F 22 00 69 0D 8B 00 99 3A 20 |COLOGY?".i....: |
00000540: 99 22 59 4F 55 20 41 52 45 20 54 4F 20 47 49 56 |."YOU ARE TO GIV|
00000550: 45 20 33 20 41 4E 53 57 45 52 53 20 53 45 50 41 |E 3 ANSWERS SEPA|
00000560: 52 41 54 45 44 20 42 59 22 00 96 0D 8C 00 99 22 |RATED BY"......"|
00000570: 43 4F 4D 4D 41 53 3A 20 59 4F 55 52 20 46 49 52 |COMMAS: YOUR FIR|
00000580: 53 54 20 41 4E 53 57 45 52 20 49 53 20 54 48 45 |ST ANSWER IS THE|
00000590: 20 54 59 50 45 22 00 C5 0D 8D 00 99 22 4F 46 20 | TYPE"......"OF |
000005A0: 50 4F 57 45 52 20 50 4C 41 4E 54 3A 20 43 4F 41 |POWER PLANT: COA|
000005B0: 4C 2C 20 47 41 53 2C 20 4F 49 4C 2C 20 4F 52 20 |L, GAS, OIL, OR |
000005C0: 4E 55 43 2E 22 00 F4 0D 8E 00 99 3A 99 22 59 4F |NUC."......:."YO|
000005D0: 55 52 20 53 45 43 4F 4E 44 20 41 4E 53 57 45 52 |UR SECOND ANSWER|
000005E0: 20 57 49 4C 4C 20 42 45 20 54 48 45 20 41 4D 4F | WILL BE THE AMO|
000005F0: 55 4E 54 22 00 1D 0E 8F 00 99 22 59 4F 55 20 57 |UNT"......"YOU W|
00000600: 49 53 48 20 54 4F 20 49 4E 56 45 53 54 20 49 4E |ISH TO INVEST IN|
00000610: 20 54 48 41 54 20 50 4C 41 4E 54 2E 22 00 4F 0E | THAT PLANT.".O.|
00000620: 90 00 99 3A 20 99 22 59 4F 55 52 20 54 48 49 52 |...: ."YOUR THIR|
00000630: 44 20 41 4E 53 57 45 52 20 57 49 4C 4C 20 42 45 |D ANSWER WILL BE|
00000640: 20 54 48 45 20 25 20 4F 46 20 54 48 45 20 22 00 | THE % OF THE ".|
00000650: 79 0E 91 00 99 22 53 45 43 4F 4E 44 20 41 4E 53 |y...."SECOND ANS|
00000660: 57 45 52 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 |WER YOU WANT TO |
00000670: 47 49 56 45 20 54 4F 20 22 00 9E 0E 92 00 99 22 |GIVE TO "......"|
00000680: 45 4E 56 49 52 4F 4E 4D 45 4E 54 41 4C 20 43 4F |ENVIRONMENTAL CO|
00000690: 4E 53 49 44 45 52 41 54 49 4F 4E 53 2E 22 00 B0 |NSIDERATIONS."..|
000006A0: 0E 93 00 99 3A 99 22 45 58 41 4D 50 4C 45 3A 22 |....:."EXAMPLE:"|
000006B0: 00 DB 0E 94 00 99 22 50 4C 41 4E 54 2C 20 48 4F |......"PLANT, HO|
000006C0: 57 20 4D 41 4E 59 20 4D 49 4C 4C 49 4F 4E 2C 20 |W MANY MILLION, |
000006D0: 25 20 45 43 4F 4C 4F 47 59 3F 22 00 08 0F 95 00 |% ECOLOGY?".....|
000006E0: 99 22 4E 55 43 2C 31 30 2C 32 30 22 3A 99 22 4D |."NUC,10,20":."M|
000006F0: 45 41 4E 53 20 59 4F 55 20 57 41 4E 54 20 54 4F |EANS YOU WANT TO|
00000700: 20 53 50 45 4E 44 20 22 00 32 0F 96 00 99 22 24 | SPEND ".2...."$|
00000710: 31 30 20 4D 49 4C 4C 49 4F 4E 20 4F 4E 20 41 20 |10 MILLION ON A |
00000720: 4E 55 43 4C 45 41 52 20 50 4C 41 4E 54 20 41 4E |NUCLEAR PLANT AN|
00000730: 44 22 00 5E 0F 97 00 99 22 32 30 25 20 57 49 4C |D".^...."20% WIL|
00000740: 4C 20 42 45 20 55 53 45 44 20 46 4F 52 20 54 48 |L BE USED FOR TH|
00000750: 45 20 45 4E 56 49 52 4F 4E 4D 45 4E 54 22 00 A9 |E ENVIRONMENT"..|
00000760: 0F 98 00 99 22 11 12 20 20 54 59 50 45 20 27 50 |....".. TYPE 'P|
00000770: 27 20 54 4F 20 53 45 45 20 20 92 20 20 20 50 52 |' TO SEE . PR|
00000780: 45 53 53 20 41 4E 59 20 4B 45 59 20 20 20 20 20 |ESS ANY KEY |
00000790: 12 20 54 48 45 20 50 52 45 56 49 4F 55 53 20 50 |. THE PREVIOUS P|
000007A0: 41 47 45 20 92 20 20 22 3B 00 BE 0F 99 00 99 22 |AGE . ";......"|
000007B0: 20 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 D1 | TO CONTINUE"..|
000007C0: 0F 9A 00 A1 42 24 3A 8B 42 24 B2 22 22 A7 31 35 |....B$:.B$."".15|
000007D0: 34 00 E1 0F 9B 00 8B 42 24 B2 22 50 22 A7 31 31 |4......B$."P".11|
000007E0: 35 00 10 10 9C 00 99 22 93 20 20 20 20 49 46 20 |5......". IF |
000007F0: 59 4F 55 20 44 4F 20 4E 4F 54 20 53 50 45 4E 44 |YOU DO NOT SPEND|
00000800: 20 54 48 45 20 4D 4F 4E 45 59 2C 20 54 48 45 22 | THE MONEY, THE"|
00000810: 00 3E 10 9D 00 99 22 43 4F 4D 50 55 54 45 52 20 |.>...."COMPUTER |
00000820: 57 49 4C 4C 20 54 59 50 45 20 4D 4F 52 45 20 51 |WILL TYPE MORE Q|
00000830: 55 45 53 54 49 4F 4E 20 4D 41 52 4B 53 22 00 7D |UESTION MARKS".}|
00000840: 10 9E 00 99 22 54 48 55 53 20 41 4C 4C 4F 57 49 |...."THUS ALLOWI|
00000850: 4E 47 20 59 4F 55 20 54 4F 20 49 4E 56 45 53 54 |NG YOU TO INVEST|
00000860: 20 49 4E 20 55 50 20 54 4F 20 34 20 20 4B 49 4E | IN UP TO 4 KIN|
00000870: 44 53 20 4F 46 20 50 4C 41 4E 54 53 22 00 8E 10 |DS OF PLANTS"...|
00000880: 9F 00 99 22 45 58 41 4D 50 4C 45 3A 11 22 00 B9 |..."EXAMPLE:."..|
00000890: 10 A0 00 99 22 50 4C 41 4E 54 2C 20 48 4F 57 20 |...."PLANT, HOW |
000008A0: 4D 41 4E 59 20 4D 49 4C 4C 49 4F 4E 2C 20 25 20 |MANY MILLION, % |
000008B0: 45 43 4F 4C 4F 47 59 3F 22 00 CB 10 A1 00 99 22 |ECOLOGY?"......"|
000008C0: 3F 20 47 41 53 2C 33 2C 31 30 22 00 EC 10 A2 00 |? GAS,3,10".....|
000008D0: 99 22 3F 20 43 4F 41 4C 2C 35 2C 31 30 22 3A 99 |."? COAL,5,10":.|
000008E0: 22 3F 20 4E 55 43 2C 32 2C 32 30 22 00 1B 11 A3 |"? NUC,2,20"....|
000008F0: 00 99 22 11 4D 45 41 4E 53 20 59 4F 55 20 41 52 |..".MEANS YOU AR|
00000900: 45 20 49 4E 56 45 53 54 49 4E 47 20 24 33 20 4D |E INVESTING $3 M|
00000910: 49 4C 4C 49 4F 4E 20 49 4E 20 22 00 4B 11 A4 00 |ILLION IN ".K...|
00000920: 99 22 41 20 47 41 53 20 50 4C 41 4E 54 20 57 49 |."A GAS PLANT WI|
00000930: 54 48 20 31 30 25 20 46 4F 52 20 54 48 45 20 45 |TH 10% FOR THE E|
00000940: 4E 56 49 52 4F 4E 4D 45 4E 54 22 00 7C 11 A5 00 |NVIRONMENT".|...|
00000950: 99 22 91 24 35 20 4D 49 4C 4C 49 4F 4E 20 46 4F |.".$5 MILLION FO|
00000960: 52 20 41 20 43 4F 41 4C 20 50 4C 41 4E 54 28 31 |R A COAL PLANT(1|
00000970: 30 25 20 45 43 4F 4C 4F 47 59 29 22 00 AC 11 A6 |0% ECOLOGY)"....|
00000980: 00 99 22 91 41 4E 44 20 24 32 20 4D 49 4C 4C 49 |..".AND $2 MILLI|
00000990: 4F 4E 20 46 4F 52 20 4E 55 43 4C 45 41 52 28 32 |ON FOR NUCLEAR(2|
000009A0: 30 25 20 45 43 4F 4C 4F 47 59 29 22 00 DC 11 A7 |0% ECOLOGY)"....|
000009B0: 00 99 3A 99 22 20 20 20 41 54 20 54 48 45 20 45 |..:." AT THE E|
000009C0: 4E 44 20 4F 46 20 45 41 43 48 20 35 20 59 45 41 |ND OF EACH 5 YEA|
000009D0: 52 53 20 59 4F 55 20 57 49 4C 4C 22 00 07 12 A8 |RS YOU WILL"....|
000009E0: 00 99 22 53 45 45 20 48 4F 57 20 59 4F 55 20 44 |.."SEE HOW YOU D|
000009F0: 49 44 2E 20 49 46 20 54 48 45 20 41 4D 4F 55 4E |ID. IF THE AMOUN|
00000A00: 54 20 46 4F 52 20 22 00 34 12 A9 00 99 22 45 43 |T FOR ".4...."EC|
00000A10: 4F 4C 4F 47 59 20 46 41 4C 4C 53 20 42 45 4C 4F |OLOGY FALLS BELO|
00000A20: 57 20 38 30 20 55 4E 49 54 53 2C 20 59 4F 55 20 |W 80 UNITS, YOU |
00000A30: 41 52 45 22 00 6A 12 AA 00 99 22 41 44 44 49 4E |ARE".j...."ADDIN|
00000A40: 47 20 54 4F 4F 20 4D 55 43 48 20 50 4F 4C 55 54 |G TOO MUCH POLUT|
00000A50: 49 4F 4E 20 54 4F 20 54 48 45 20 41 49 52 20 4F |ION TO THE AIR O|
00000A60: 52 20 20 57 41 54 45 52 21 22 00 B5 12 AB 00 99 |R WATER!"......|
00000A70: 22 11 12 20 20 54 59 50 45 20 27 50 27 20 54 4F |".. TYPE 'P' TO|
00000A80: 20 53 45 45 20 20 92 20 20 20 50 52 45 53 53 20 | SEE . PRESS |
00000A90: 41 4E 59 20 4B 45 59 20 20 20 20 20 12 20 54 48 |ANY KEY . TH|
00000AA0: 45 20 50 52 45 56 49 4F 55 53 20 50 41 47 45 20 |E PREVIOUS PAGE |
00000AB0: 92 20 20 22 3B 00 CA 12 AC 00 99 22 20 20 54 4F |. ";......" TO|
00000AC0: 20 43 4F 4E 54 49 4E 55 45 22 00 DD 12 AD 00 A1 | CONTINUE"......|
00000AD0: 42 24 3A 8B 42 24 B2 22 22 A7 31 37 33 00 ED 12 |B$:.B$."".173...|
00000AE0: AE 00 8B 42 24 B2 22 50 22 A7 31 33 36 00 1F 13 |...B$."P".136...|
00000AF0: AF 00 99 22 93 11 11 11 20 20 20 20 49 46 20 59 |...".... IF Y|
00000B00: 4F 55 20 57 41 4E 54 20 54 4F 20 51 55 49 54 20 |OU WANT TO QUIT |
00000B10: 41 4E 44 20 53 54 41 52 54 20 4F 56 45 52 22 00 |AND START OVER".|
00000B20: 4D 13 B0 00 99 22 54 59 50 45 20 12 51 55 49 54 |M...."TYPE .QUIT|
00000B30: 2C 30 2C 30 92 20 20 54 4F 20 45 4E 44 20 54 59 |,0,0. TO END TY|
00000B40: 50 45 20 12 45 4E 44 2C 30 2C 30 92 22 00 80 13 |PE .END,0,0."...|
00000B50: B1 00 99 22 57 48 45 4E 20 54 48 45 20 43 4F 4D |..."WHEN THE COM|
00000B60: 50 55 54 45 52 20 50 52 49 4E 54 53 20 41 20 51 |PUTER PRINTS A Q|
00000B70: 55 45 53 54 49 4F 4E 20 4D 41 52 4B 28 3F 29 22 |UESTION MARK(?)"|
00000B80: 00 AF 13 B4 00 99 22 11 11 11 11 20 20 20 49 20 |......".... I |
00000B90: 41 4D 20 4E 4F 57 20 47 4F 49 4E 47 20 54 4F 20 |AM NOW GOING TO |
00000BA0: 4C 4F 41 44 20 54 48 45 20 4D 41 49 4E 20 22 00 |LOAD THE MAIN ".|
00000BB0: DD 13 B6 00 99 22 50 52 4F 47 52 41 4D 2E 20 20 |....."PROGRAM. |
00000BC0: 49 46 20 59 4F 55 20 57 4F 55 4C 44 20 4C 49 4B |IF YOU WOULD LIK|
00000BD0: 45 20 54 4F 20 52 45 56 49 45 57 20 22 00 06 14 |E TO REVIEW "...|
00000BE0: B8 00 99 22 54 48 45 20 49 4E 53 54 52 55 43 54 |..."THE INSTRUCT|
00000BF0: 49 4F 4E 53 20 50 52 45 53 53 20 12 20 27 50 27 |IONS PRESS . 'P'|
00000C00: 20 92 20 2E 20 22 00 14 14 BE 00 81 4A B2 31 A4 | . . "......J.1.|
00000C10: 32 30 30 30 00 28 14 C3 00 A1 47 24 3A 8B 47 24 |2000.(....G$:.G$|
00000C20: B2 22 50 22 A7 31 31 35 00 2E 14 C4 00 82 00 4D |."P".115.......M|
00000C30: 14 C8 00 99 22 11 11 11 5E 50 4F 57 45 52 20 53 |...."...^POWER S|
00000C40: 49 4D 55 4C 41 54 49 4F 4E 91 91 91 22 00 53 14 |IMULATION...".S.|
00000C50: D2 00 80 00 7D 14 99 02 99 22 54 48 45 20 4C 4F |....}...."THE LO|
00000C60: 41 44 20 4E 45 45 44 45 44 20 49 53 22 20 4C 31 |AD NEEDED IS" L1|
00000C70: 3B 22 4D 45 47 41 57 41 54 54 53 2E 22 00 83 14 |;"MEGAWATTS."...|
00000C80: 9E 02 99 00 B0 14 D0 02 99 22 59 4F 55 20 48 41 |........."YOU HA|
00000C90: 56 45 22 54 39 3B 22 4D 49 4C 4C 49 4F 4E 20 44 |VE"T9;"MILLION D|
00000CA0: 4F 4C 4C 41 52 53 20 54 4F 20 53 50 45 4E 44 22 |OLLARS TO SPEND"|
00000CB0: 00 DA 14 EE 02 99 22 50 4C 41 4E 54 2C 20 48 4F |......"PLANT, HO|
00000CC0: 57 20 4D 41 4E 59 20 4D 49 4C 4C 49 4F 4E 2C 20 |W MANY MILLION, |
00000CD0: 25 20 45 43 4F 4C 4F 47 59 22 00 E2 14 20 03 49 |% ECOLOGY"... .I|
00000CE0: B2 31 00 EB 14 52 03 54 31 B2 30 00 FD 14 84 03 |.1...R.T1.0.....|
00000CF0: 85 42 24 2C 41 28 49 29 2C 45 28 49 29 00 0E 15 |.B$,A(I),E(I)...|
00000D00: B6 03 41 28 49 29 B2 B6 28 41 28 49 29 29 00 22 |..A(I)..(A(I))."|
00000D10: 15 46 05 8B 45 28 49 29 B3 B2 31 30 30 A7 31 35 |.F..E(I)..100.15|
00000D20: 35 30 00 32 15 C2 06 46 42 24 B2 22 50 22 A7 31 |50.2...FB$."P".1|
00000D30: 33 36 00 3C 15 E0 06 49 B2 49 AA 31 00 67 15 44 |36.<...I.I.1.g.D|
00000D40: 07 99 22 4D 49 4C 4C 49 4F 4E 20 44 4F 4C 4C 41 |.."MILLION DOLLA|
00000D50: 52 53 2E 20 50 4C 45 41 53 45 20 53 54 41 52 54 |RS. PLEASE START|
00000D60: 20 4F 56 45 52 2E 22 00 82 15 2E 09 8B 50 24 28 | OVER."......P$(|
00000D70: 53 2C 53 AA 33 29 B2 22 43 4F 41 4C 22 A7 33 30 |S,S.3)."COAL".30|
00000D80: 35 30 00 9D 15 60 09 8B 50 24 28 53 2C 53 AA 33 |50...`..P$(S,S.3|
00000D90: 29 B2 22 4E 55 43 22 20 A7 33 32 35 30 00 A7 15 |)."NUC" .3250...|
00000DA0: 5A 0A 8F 20 4F 49 4C 00 B1 15 5E 0B 8D 34 33 39 |Z.. OIL...^..439|
00000DB0: 30 00 D4 15 86 0B 4D 28 49 29 B2 41 28 49 29 AD |0.....M(I).A(I).|
00000DC0: 28 31 30 AD 31 31 32 AC 28 31 AA BB 28 30 29 AD |(10.112.(1..(0).|
00000DD0: 31 30 29 29 00 00 16 36 10 99 22 52 45 50 41 49 |10))...6.."REPAI|
00000DE0: 52 53 20 41 52 45 20 4E 45 45 44 45 44 20 4F 4E |RS ARE NEEDED ON|
00000DF0: 20 54 48 45 20 54 55 52 42 49 4E 45 20 4F 46 22 | THE TURBINE OF"|
00000E00: 00 1F 16 68 10 99 22 54 48 45 20 22 3B 50 24 28 |...h.."THE ";P$(|
00000E10: 53 2C 53 AA 33 29 3B 22 20 50 4C 41 4E 54 22 00 |S,S.3);" PLANT".|
00000E20: 2F 16 72 10 81 50 B2 31 A4 32 35 30 30 3A 82 00 |/.r..P.1.2500:..|
00000E30: 63 16 9A 10 4E B2 B5 28 28 41 28 49 29 AB 41 28 |c...N..((A(I).A(|
00000E40: 49 29 AC 45 28 49 29 AD 31 30 30 29 AC 37 2E 35 |I).E(I).100).7.5|
00000E50: AC 28 31 AB BB 28 30 29 AD 31 30 29 AA 2E 35 29 |.(1..(0).10)..5)|
00000E60: AD 31 30 00 7F 16 A4 10 45 28 49 29 B2 45 28 49 |.10.....E(I).E(I|
00000E70: 29 AC 41 28 49 29 AD 28 41 28 49 29 AB 4E 29 00 |).A(I).(A(I).N).|
00000E80: 89 16 FE 10 89 33 38 35 30 00 8F 16 08 11 8E 00 |.....3850.......|
00000E90: A6 16 26 11 45 28 49 29 B2 45 28 49 29 AC 41 28 |..&.E(I).E(I).A(|
00000EA0: 49 29 AD 31 30 30 00 B9 16 30 11 41 28 49 29 B2 |I).100...0.A(I).|
00000EB0: 41 28 49 29 AB 45 28 49 29 00 D7 16 3A 11 45 28 |A(I).E(I)...:.E(|
00000EC0: 49 29 B2 45 28 49 29 AC BB 28 30 29 AA 49 31 AC |I).E(I)..(0).I1.|
00000ED0: 41 28 49 29 AD 31 30 00 F5 16 44 11 45 28 49 29 |A(I).10...D.E(I)|
00000EE0: B2 B4 28 45 28 49 29 29 AC 28 B6 28 45 28 49 29 |..(E(I)).(.(E(I)|
00000EF0: 29 AA 2E 35 29 00 0F 17 62 11 8B 45 28 49 29 B3 |)..5)...b..E(I).|
00000F00: B2 30 B0 45 28 49 29 B1 B2 31 A7 34 35 35 30 00 |.0.E(I)..1.4550.|
00000F10: 1A 17 94 11 45 28 49 29 B2 31 00 36 17 C6 11 45 |....E(I).1.6...E|
00000F20: 28 49 29 B2 B4 28 45 28 49 29 29 AC B5 28 B6 28 |(I)..(E(I))..(.(|
00000F30: 45 28 49 29 29 29 00 3C 17 D0 11 8E 00 50 17 F8 |E(I))).<.....P..|
00000F40: 11 8B 4D 28 49 29 B3 32 AC 4C 31 A7 34 37 30 30 |..M(I).2.L1.4700|
00000F50: 00 67 17 2A 12 4D 28 49 29 B2 32 AC 4C 31 AC 28 |.g.*.M(I).2.L1.(|
00000F60: 31 AB BB 28 30 29 29 00 7B 17 5C 12 4D 28 49 29 |1..(0)).{.\.M(I)|
00000F70: B2 B5 28 4D 28 49 29 AA 2E 35 29 00 88 17 8E 12 |..(M(I)..5).....|
00000F80: 46 B2 4D 28 49 29 AA 46 00 8F 17 C0 12 82 49 00 |F.M(I).F......I.|
00000F90: 9A 17 F2 12 46 B2 B5 28 46 29 00 A7 17 24 13 4C |....F..(F)...$.L|
00000FA0: 31 B2 B5 28 4C 31 29 00 B2 17 56 13 50 B2 46 AB |1..(L1)...V.P.F.|
00000FB0: 4C 31 00 DF 17 88 13 99 3A 20 99 22 54 48 45 20 |L1......: ."THE |
00000FC0: 45 4C 45 43 54 52 49 43 41 4C 20 4C 4F 41 44 20 |ELECTRICAL LOAD |
00000FD0: 4E 45 45 44 45 44 20 49 4E 20 59 4F 55 52 22 00 |NEEDED IN YOUR".|
00000FE0: 06 18 92 13 99 22 53 45 52 56 49 43 45 20 41 52 |....."SERVICE AR|
00000FF0: 45 41 20 57 41 53 22 4C 31 3B 22 4D 45 47 41 57 |EA WAS"L1;"MEGAW|
00001000: 41 54 54 53 2E 22 00 35 18 9C 13 99 3A 99 22 54 |ATTS.".5....:."T|
00001010: 48 45 20 4C 4F 41 44 20 59 4F 55 20 52 45 41 43 |HE LOAD YOU REAC|
00001020: 48 45 44 20 57 41 53 22 46 3B 22 4D 45 47 41 57 |HED WAS"F;"MEGAW|
00001030: 41 54 54 53 22 00 43 18 BA 13 8B 50 B1 30 A7 35 |ATTS".C....P.0.5|
00001040: 33 35 30 00 63 18 1E 14 50 B2 AB B5 28 B6 28 50 |350.c...P...(.(P|
00001050: 29 AD 34 AC 28 31 AB BB 28 30 29 AD 31 30 29 AA |).4.(1..(0).10).|
00001060: 2E 35 29 00 8F 18 50 14 99 22 59 4F 55 52 20 4C |.5)...P.."YOUR L|
00001070: 4F 53 53 20 57 41 53 22 B6 28 50 29 3B 22 4D 49 |OSS WAS".(P);"MI|
00001080: 4C 4C 49 4F 4E 20 44 4F 4C 4C 41 52 53 2E 22 00 |LLION DOLLARS.".|
00001090: 99 18 82 14 54 B2 54 AA 50 00 A3 18 8C 14 4C B2 |....T.T.P.....L.|
000010A0: 4C AB 50 00 AD 18 96 14 54 39 B2 31 30 00 B7 18 |L.P.....T9.10...|
000010B0: B4 14 89 36 30 30 30 00 CC 18 E6 14 50 B2 B5 28 |...6000.....P..(|
000010C0: 50 AD 32 AC BB 28 30 29 AA 2E 35 29 00 DA 18 18 |P.2..(0)..5)....|
000010D0: 15 8B 50 B1 31 A7 35 35 30 30 00 E2 18 4A 15 50 |..P.1.5500...J.P|
000010E0: B2 31 00 EC 18 7C 15 54 B2 54 AA 50 00 19 19 AE |.1...|.T.T.P....|
000010F0: 15 99 3A 99 22 59 4F 55 52 20 50 52 4F 46 49 54 |..:."YOUR PROFIT|
00001100: 20 57 41 53 22 50 3B 22 4D 49 4C 4C 49 4F 4E 20 | WAS"P;"MILLION |
00001110: 44 4F 4C 4C 41 52 53 2E 22 00 28 19 E0 15 8B 54 |DOLLARS.".(....T|
00001120: B1 B2 30 A7 35 37 35 30 00 31 19 12 16 4C B2 AB |..0.5750.1...L..|
00001130: 54 00 3B 19 44 16 89 35 32 37 30 00 4B 19 76 16 |T.;.D..5270.K.v.|
00001140: 8B 50 AB 4C B3 30 A7 35 32 36 30 00 5D 19 0C 17 |.P.L.0.5260.]...|
00001150: 54 39 B2 31 30 AA 28 28 50 AB 4C 29 29 00 65 19 |T9.10.((P.L)).e.|
00001160: 3E 17 4C B2 30 00 95 19 70 17 99 3A 99 22 50 4C |>.L.0...p..:."PL|
00001170: 41 4E 54 22 A6 35 29 3B 22 4D 45 47 41 57 41 54 |ANT".5);"MEGAWAT|
00001180: 54 53 20 20 20 20 20 45 43 4F 4C 4F 47 59 20 55 |TS ECOLOGY U|
00001190: 4E 49 54 53 22 00 A2 19 A2 17 45 31 B2 30 3A 4D |NITS".....E1.0:M|
000011A0: B2 30 00 AD 19 D4 17 81 49 B2 31 A4 34 00 B9 19 |.0......I.1.4...|
000011B0: 06 18 53 B2 34 AC 49 AB 33 00 D7 19 38 18 8B 50 |..S.4.I.3...8..P|
000011C0: 24 28 53 2C 53 AA 33 29 20 B2 22 46 49 4E 49 22 |$(S,S.3) ."FINI"|
000011D0: 20 A7 20 36 34 35 30 00 E4 19 6A 18 4D B2 4D AA | . 6450...j.M.M.|
000011E0: 4D 28 49 29 00 07 1A 9C 18 99 50 24 28 53 2C 53 |M(I)......P$(S,S|
000011F0: AA 33 29 3B A3 39 29 3B 4D 28 49 29 3B A6 31 31 |.3);.9);M(I);.11|
00001200: 29 20 3B 45 28 49 29 00 16 1A CE 18 45 31 B2 45 |) ;E(I).....E1.E|
00001210: 31 AA 45 28 49 29 00 1D 1A 00 19 82 49 00 29 1A |1.E(I)......I.).|
00001220: 32 19 59 31 B2 59 31 AA 31 00 4E 1A 64 19 4C 31 |2.Y1.Y1.1.N.d.L1|
00001230: B2 B5 28 31 30 30 AC 28 31 AA 59 31 AD 38 AC 28 |..(100.(1.Y1.8.(|
00001240: 31 AB BB 28 30 29 AD 38 29 29 AA 2E 35 29 00 69 |1..(0).8))..5).i|
00001250: 1A 96 19 99 22 54 4F 54 41 4C 22 3B A6 34 29 3B |...."TOTAL";.4);|
00001260: 4D 3B A6 31 31 29 3B 45 31 00 6F 1A C8 19 99 00 |M;.11);E1.o.....|
00001270: 7A 1A FA 19 45 B2 45 AA 45 31 00 91 1A 2C 1A 99 |z...E.E.E1...,..|
00001280: 22 45 43 4F 4C 4F 47 59 20 55 4E 49 54 53 3D 22 |"ECOLOGY UNITS="|
00001290: 45 00 97 1A 5E 1A 99 00 A1 1A 90 1A 59 B2 59 AA |E...^.......Y.Y.|
000012A0: 35 00 B0 1A C2 1A 8B 59 31 B1 36 A7 37 30 30 30 |5......Y1.6.7000|
000012B0: 00 D7 1A F4 1A 99 22 52 45 41 44 59 20 46 4F 52 |......"READY FOR|
000012C0: 20 54 48 45 20 4E 45 58 54 20 46 49 56 45 20 59 | THE NEXT FIVE Y|
000012D0: 45 41 52 53 3F 22 3B 00 EB 1A FE 1A A1 42 24 3A |EARS?";......B$:|
000012E0: 8B 42 24 B2 22 22 A7 36 39 31 30 00 FB 1A 08 1B |.B$."".6910.....|
000012F0: 8B 42 24 B2 22 59 22 A7 36 36 30 00 05 1B 26 1B |.B$."Y".660...&.|
00001300: 89 36 39 31 30 00 2D 1B 58 1B 99 22 20 20 20 54 |.6910.-.X.." T|
00001310: 4F 54 41 4C 20 44 4F 4C 4C 41 52 53 20 20 20 20 |OTAL DOLLARS |
00001320: 20 20 20 20 20 45 43 4F 4C 4F 47 59 22 00 48 1B | ECOLOGY".H.|
00001330: 8A 1B 99 20 A3 35 29 3B 54 3B 22 4D 49 4C 4C 49 |... .5);T;"MILLI|
00001340: 4F 4E 22 A6 38 29 3B 45 00 56 1B BC 1B 8B 54 B3 |ON".8);E.V....T.|
00001350: 4B A7 37 32 35 30 00 82 1B EE 1B 99 22 43 4F 4E |K.7250......"CON|
00001360: 47 52 41 54 55 4C 41 54 49 4B 4E 53 20 4F 4E 20 |GRATULATIKNS ON |
00001370: 4D 41 4B 49 4E 47 20 41 20 50 52 4F 46 49 54 21 |MAKING A PROFIT!|
00001380: 21 22 00 8C 1B 20 1C 89 37 33 35 30 00 BC 1B 52 |!"... ..7350...R|
00001390: 1C 99 22 54 52 59 20 41 47 41 49 4E 2C 20 59 4F |.."TRY AGAIN, YO|
000013A0: 55 27 52 45 20 47 4F 49 4E 47 20 54 4F 20 4E 45 |U'RE GOING TO NE|
000013B0: 45 44 20 4D 4F 4E 45 59 20 49 4E 22 00 DD 1B 66 |ED MONEY IN"...f|
000013C0: 1C 99 22 32 30 30 35 20 54 4F 20 46 45 45 44 20 |.."2005 TO FEED |
000013D0: 59 4F 55 52 20 46 41 4D 49 4C 59 2E 22 00 EC 1B |YOUR FAMILY."...|
000013E0: B6 1C 8B 45 B3 38 30 A7 37 35 30 30 00 1C 1C E8 |...E.80.7500....|
000013F0: 1C 99 22 59 4F 55 20 47 45 54 20 41 20 47 4F 4C |.."YOU GET A GOL|
00001400: 44 20 53 54 41 52 20 46 4F 52 20 59 4F 55 52 20 |D STAR FOR YOUR |
00001410: 57 4F 52 4B 20 49 4E 20 54 48 45 22 00 31 1C FC |WORK IN THE".1..|
00001420: 1C 99 22 91 45 4E 56 49 52 4F 4E 4D 45 4E 54 2E |..".ENVIRONMENT.|
00001430: 22 00 3B 1C 1A 1D 89 37 35 35 30 00 6A 1C 4C 1D |".;....7550.j.L.|
00001440: 99 22 54 52 59 20 41 47 41 49 4E 20 54 4F 20 43 |."TRY AGAIN TO C|
00001450: 4C 45 41 4E 20 55 50 20 54 48 45 20 41 49 52 20 |LEAN UP THE AIR |
00001460: 41 4E 44 20 57 41 54 45 52 22 00 70 1C 7E 1D 80 |AND WATER".p.~..|
00001470: 00 00 00 |... |
....2..F$(20,20),G(4),M(4).N._.."....WEL
COME TO THE ELECTRIC UTILITY PROGRAM.".V
.D..".. MINI EDISON COMPANY"..
.E..".. THIS PROGRAM REVIEWS THE INSTRU
CTIONS".T.F.."FOR THE SIMULATION .POWER
GENERATION.....H..".IF YOU ARE ALL READY
FAMILIAR WITH THE ".2.I.."BASIC CONCEPT
. PRESS R . TO CONTINUE.".^.L.."...
PRESS .SPACE. TO CONTINUE".R.N..B$:.
B$."" .110...O..B$."R" ..".":.180...S.."
.YOU HAVE JUST BEEN MADE SYSTEM PLANNER"
...T.."FOR THE MINI-EDISON POWER COMPANY
."...U.."YOU ARE TO PLAN THE ELECTRIC NE
EDS".9.V.."FOR YOUR SERVICE AREA FOR EAC
H 5-YEAR".^.W.."PERIOD FROM 1980 THRU 20
05.":....X.."FOR EACH PERIOD YOU WILL BE
TOLD THE"...Y.."POWER NEEDS FOR YOUR AR
EA AND YOU WILL"...Z.."BE GIVEN AT LEAST
$10 MILLION TO SPEND"...{.."ON POWER PL
ANT CONSTRUCTION AND ".5.|.."ENVIRONMENT
AL CONSIDERATIONS.":..Z.}.." HOW YOU USE
YOUR $10 MILLION"...~.."(OR MORE) IS UP
TO YOU. YOU HAVE"....."THE CHOICE OF A
COAL PLANT, A GAS".W...."PLANT, A NUCLE
AR PLANT, AN OIL PLANT"......"OR ANY COM
BINATION OF THESE AS LONG".0...."AS YOU
DON'T CHOOSE MORE THAN 4 PLANTS".Z....:.
"ANY PART OF YOUR $10 MILLION NOT".Y....
"SPENT WILL BE LOST.":.:......." PRE
SS .SPACE. TO CONTINUE "......B$:.B$."
".134......". AT THE START OF EACH 5
YEAR PERIOD"......"THE COMPUTER WILL PRI
NT 'PLANT, HOW".8...."MANY MILLION, WHAT
% FOR ECOLOGY?".I....: ."YOU ARE TO GIV
E 3 ANSWERS SEPARATED BY"......"COMMAS:
YOUR FIRST ANSWER IS THE TYPE".E...."OF
POWER PLANT: COAL, GAS, OIL, OR NUC."...
...:."YOUR SECOND ANSWER WILL BE THE AMO
UNT"......"YOU WISH TO INVEST IN THAT PL
ANT.".O....: ."YOUR THIRD ANSWER WILL BE
THE % OF THE ".Y...."SECOND ANSWER YOU
WANT TO GIVE TO "......"ENVIRONMENTAL CO
NSIDERATIONS."......:."EXAMPLE:"......"P
LANT, HOW MANY MILLION, % ECOLOGY?".....
."NUC,10,20":."MEANS YOU WANT TO SPEND "
.2...."$10 MILLION ON A NUCLEAR PLANT AN
D".^...."20% WILL BE USED FOR THE ENVIRO
NMENT"......".. TYPE 'P' TO SEE . PR
ESS ANY KEY . THE PREVIOUS PAGE . "
;......" TO CONTINUE".Q....B$:.B$."".15
4......B$."P".115......". IF YOU DO N
OT SPEND THE MONEY, THE".>...."COMPUTER
WILL TYPE MORE QUESTION MARKS".}...."THU
S ALLOWING YOU TO INVEST IN UP TO 4 KIN
DS OF PLANTS"......"EXAMPLE:."... .."PLA
NT, HOW MANY MILLION, % ECOLOGY?".K...."
? GAS,3,10"......"? COAL,5,10":."? NUC,2
,20"......".MEANS YOU ARE INVESTING $3 M
ILLION IN ".K...."A GAS PLANT WITH 10% F
OR THE ENVIRONMENT".|....".$5 MILLION FO
R A COAL PLANT(10% ECOLOGY)"......".AND
$2 MILLION FOR NUCLEAR(20% ECOLOGY)"....
..:." AT THE END OF EACH 5 YEARS YOU W
ILL"......"SEE HOW YOU DID. IF THE AMOUN
T FOR ".4...."ECOLOGY FALLS BELOW 80 UNI
TS, YOU ARE".J...."ADDING TOO MUCH POLUT
ION TO THE AIR OR WATER!"......".. TYP
E 'P' TO SEE . PRESS ANY KEY . TH
E PREVIOUS PAGE . ";.J...." TO CONTINU
E"......B$:.B$."".173......B$."P".136...
...".... IF YOU WANT TO QUIT AND STAR
T OVER".M...."TYPE .QUIT,0,0. TO END TY
PE .END,0,0."......"WHEN THE COMPUTER PR
INTS A QUESTION MARK(?)"......".... I
AM NOW GOING TO LOAD THE MAIN "......"PR
OGRAM. IF YOU WOULD LIKE TO REVIEW "...
..."THE INSTRUCTIONS PRESS . 'P' . . "..
....J.1.2000.(.C..G$:.G$."P".115...D...M
.H.."...^POWER SIMULATION...".S.R...}...
."THE LOAD NEEDED IS" L1;"MEGAWATTS."...
......P.."YOU HAVE"T9;"MILLION DOLLARS T
O SPEND".Z...."PLANT, HOW MANY MILLION,
% ECOLOGY"... .I.1...R.T1.0......B$,A(I)
,E(I).....A(I)..(A(I)).".F..E(I)..100.15
50.2.B.FB$."P".136.<...I.I.1.G.D.."MILLI
ON DOLLARS. PLEASE START OVER."......P$(
S,S.3)."COAL".3050...`..P$(S,S.3)."NUC"
.3250...Z.. OIL...^..4390.T...M(I).A(I).
(10.112.(1..(0).10))...6.."REPAIRS ARE N
EEDED ON THE TURBINE OF"...H.."THE ";P$(
S,S.3);" PLANT"./.R..P.1.2500:..C...N..(
(A(I).A(I).E(I).100).7.5.(1..(0).10)..5)
.10....E(I).E(I).A(I).(A(I).N)......385
0.........&.E(I).E(I).A(I).100...0.A(I).
A(I).E(I).W.:.E(I).E(I)..(0).I1.A(I).10.
..D.E(I)..(E(I)).(.(E(I))..5)...B..E(I).
.0.E(I)..1.4550.....E(I).1.6.F.E(I)..(E(
I))..(.(E(I))).<.P...P....M(I).2.L1.4700
.G.*.M(I).2.L1.(1..(0)).{.\.M(I)..(M(I).
.5).....F.M(I).F......I.....F..(F)...$.L
1..(L1)...V.P.F.L1......: ."THE ELECTRIC
AL LOAD NEEDED IN YOUR"......"SERVICE AR
EA WAS"L1;"MEGAWATTS.".5....:."THE LOAD
YOU REACHED WAS"F;"MEGAWATTS".C....P.0.5
350.C...P...(.(P).4.(1..(0).10)..5)...P.
."YOUR LOSS WAS".(P);"MILLION DOLLARS.".
....T.T.P.....L.L.P.....T9.10......6000.
L...P..(P.2..(0)..5).Z....P.1.5500...J.P
.1...|.T.T.P......:."YOUR PROFIT WAS"P;"
MILLION DOLLARS.".(....T..0.5750.1...L..
T.;.D..5270.K.V..P.L.0.5260.]...T9.10.((
P.L)).E.>.L.0...P..:."PLANT".5);"MEGAWAT
TS ECOLOGY UNITS".....E1.0:M.0...T..
I.1.4.....S.4.I.3.W.8..P$(S,S.3) ."FINI"
. 6450...J.M.M.M(I)......P$(S,S.3);.9);
M(I);.11) ;E(I)...N.E1.E1.E(I)......I.).
2.Y1.Y1.1.N.D.L1..(100.(1.Y1.8.(1..(0).8
))..5).I...."TOTAL";.4);M;.11);E1.O.H...
Z...E.E.E1...,.."ECOLOGY UNITS="E...^...
....Y.Y.5...B..Y1.6.7000.W...."READY FOR
THE NEXT FIVE YEARS?";......B$:.B$."".6
910......B$."Y".660...&..6910.-.X.." T
OTAL DOLLARS ECOLOGY".H.... .5);
T;"MILLION".8);E.V....T.K.7250......"CON
GRATULATIKNS ON MAKING A PROFIT!!"... ..
7350...R.."TRY AGAIN, YOU'RE GOING TO NE
ED MONEY IN"...F.."2005 TO FEED YOUR FAM
ILY."......E.80.7500......"YOU GET A GOL
D STAR FOR YOUR WORK IN THE".1....".ENVI
RONMENT.".;....7550.J.L.."TRY AGAIN TO C
LEAN UP THE AIR AND WATER".P.~.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL