fg÷ü78A¤B¤C¤TIMEÓSEMIÔÚRÈRÌDAÙTÔDMGÅÁA±A²RÔRÄPÄEÄXÔXÄSÄGÏTÄCÔEÖPÖSÖPÂSÂXÂGÂK×EÆPÆSÆÐÉMÄPÈEÈSÈGÄAK×ÄDÅX±X²ÙØÊ€€€  !"#$%&'()*+,-./01@@COPYRIGHT 1981 - HOUSTON ATARI COMPUTER ENTHUSIASTS›&&€;@,;@,‚;@,""@@K1 +@‚@1@ƒ@8AR@ @(>:A%,"-@@@(ÁÔÁÒÉ ÎÕÃÌÅÁÒ ÐÏ×ÅÒ ÐÌÁÎÔA-@@ A(&BASED ON VERSION BY STEPHEN R.BERGGREN*'( CREATIVE COMPUTING 12/80*(O.(&TRANSLATED FOR ATARI BY William FrankOFOR DELAY=1 TO 5500:NEXT DELAY›#%2@(@@9ƒ-@A%K-@@Q(e„-@@ i „{-@@($q„-@@  „--@@3(G„-@@ K „O ƒq2(<(>:A%,<(&THE PROGRAM SIMULATES THE OPERATION OF2++(#A NUCLEAR POWER REACTOR. THE OBJECT<,,($IS TO OPERATE THE PLANT AT A MAXIMUMF,,($AVERAGE POWER OUTPUT WITHOUT CAUSINGP(A REACTOR MELTDOWN.Z0(0(%THE CONTROL RODS ADJUST THE AMOUNT OFd//(&HEAT PRODUCED BY THE REACTOR. PRIMARYn++(#COOLANT MOVES THIS HEAT TO THE HEATx//(&EXCHANGER. SECONDARY COOLANT TRANSFERS‚++(#HEAT FROM THE HEAT EXCHANGER TO THEŒ--(%TURBINE, WHERE POWER IS PRODUCED, AND–**("FINALLY TO THE COOLING TOWER. THE //(&EMERGENCY COOLANT IS USED TO HELP SHUTª++(#DOWN THE REACTOR WHEN OTHER SYSTEMS´))(!FAIL. UNLIKE THE OTHER COOLANTS,¾-*("EMERGENCY COOLANT IS NOT RECYCLED.-(Ã))(!ENTER 'D' TO SEE REACTOR DIAGRAM.È++(# 'I' FOR WORKING INSTRUCTIONS.Í&&( 'S' TO START OPERATION.Ò)@…6€.>:…,×M €4D A`+1AR@C-@@M A•Ø€4IA Ù€4SAÚ AÜ< +(<(&THE CONTROLS ARE OPERATED BY TYPING INá++(#THE DESIRED CONTROL ROD SETTING ANDæ0-(%FLOW RATES. (USE VALUES FROM 0 - 100)0(ë,,($IF NO ENTRY IS MADE, THE VALUES WILLð--(%NOT CHANGE. USE THE SPACE BAR TO STEPõ//(&TO DIFFERENT FUNCTIONS. USE THE RETURNú'$(KEY TO SKIP TO THE NEXT DAY.'(ÿ++(#THE REACTOR CAN BE OPERATED UNTIL A//(&MELTDOWN OCCURS OR THE REACTOR FUEL IS **("EXHAUSTED. THE FUEL WILL LAST FOR--(%ABOUT 100 TO 150 DAYS. WHEN THE FUEL,,($IS EXHAUSTED, YOUR PERFORMANCE WILL ( BE EVALUATED.=($(PRESS ANY KEY TO CONTINUE1)@…=…A"D +AR@D( IF YOU WANT TO REPAIR DAMAGE OR '++(#REPLACE COOLANT, BRING THE REACTOR ,,,($TEMPERATURE DOWN BELOW 100 AND SHUT 1**("OFF THE COOLANT FLOWS. THIS WILL 6''(CAUSE AN AUTOMATIC MAINTENANCE ;))(!SHUTDOWN AND ALL COOLANT WILL BE @%%(REPLENISHED AND REPAIRS MADE.E**("THE GREATER THE DAMAGE, THE LONGERJ (REPAIRS WILL TAKE!( (O**(" ×ÁÒÎÉÎÇ: THIS POWER PLANT HAST3*(" NO AUTOMATIC SAFETY DEVICES!!-(0(3(Y A•†START GAME› A šc6†-6‡-'6ˆ-36‰-?6Š-K6‹-W6Œ-c6-ÌWRITE REPORT›Ö +Û6ˆ-ˆ%@à''( ATARI NUCLEAR POWER PLANTê%%( STATUS REPORT - DAY ˆþ(×ÁÒÎÉÎÇÓŠŽ!A((ý REACTOR OVERHEATEDb6-%@%+Ž!AP,%+Ž!A ,%@$+Ž!A P,p6-%@Š6‘-‘%@%+Ž!AP,e’!A/(ý HEAT EXCHANGER OVERHEATEDI6“-“%@%+’!A,W6-%@e6”-”%@P•!A ((ý TURBINE OVERLOADEDB6–-–%@%+•!A%,P6”-”%@&;—!A-(ýCOOLING TOWER OVERHEATED;6”-”%@0%• A%( POWER OUTPUT LOW:*˜ A*( EMERGENCY COOLANT LOWD6™ A(( PRIMARY COOLANT LOW66-%@N8š A*( SECONDARY COOLANT LOW86”-”%@b ÄÁÍÁÇźl)!@)( REACTOR CORE DAMAGEDvP!@6(ý PRIMARY COOLANT LEAK - /DAYP6™-+™&,$++™&,!,€R”!@8(ý SECONDARY COOLANT LEAK - ”/DAYR6š-+š&”,$++š&”,!,Šj‘!@@(ý EMERGENCY COOLANT LEAK - @$‘/DAYj6˜-+˜&@$‘,$++˜&@$‘,!,”\›\("ýý PRIMARY COOLANT PUMP FAILURE - @$$+ @,%A$+@,%ž]œ](#ýý SECONDARY COOLANT PUMP FAILURE- @$”$+” @,%A$+”@,%¨$$(ý HEAT EXCHANGER FAILURE²ž(ý TURBINE FAILURE¼ ÆE!@;(' ÍÅÌÔÄÏ×Î ÍÅÌÔÄÏ×Î ÍÅÌÔÄÏ×ÎýýýýýE A0Ð  ÉÎÄÉÃÁÔÏÒÓÚ,,(REACTOR TEMP. - - - (MAX 800) P:Ž,ä,,(HEAT EXCHANGER TEMP.(MAX 500) P:’,î,,(COOLING TOWER TEMP. (MAX 300) P:—,ø,,(POWER OUTPUT - -(MAX 2000 KW) P:•,ý6Ÿ-P:‰'ˆ,))(AVERAGE POWER OUTPUT (KW/DAY) Ÿ A((CONTROL RODS ................ =-@3F:@„,A(‹*(ÃÏÏÌÁÎÔÓ4C*(EMERGENCY LEVEL - ˜ , FLOW - ?-@3F:@„,C( >C*(PRIMARY LEVEL - - ™ , FLOW - ?-@3F:@„,C(¡HC*(SECONDARY LEVEL - š , FLOW - ?-@3F:@„,C(¢RD+A&‡, @((:(REACTOR FUEL EXHAUSTEDD A@„GET NEW CONTROL VALVES›‰6£-F:@„,Ž( ˜-@3£&@¶ 6-Œ6Œ-‹¸ 6.6€.»¤-@@À.)@…6€.>:…,%¤"@.6‚.>:…,Â…"@2A ‡Ã…"AUApÅ99+…@*…@2,*+…!@W)… @H,A `Ê%67¤<¤,.€%67@<@,.‚Ï…"@2A ‡Ô* 6‹-A:,*6‹-‹%+A&‹,$+‹!A,Ù  € ¤Û(Þ-@3£&@í 6.¤-@@ò.)@…6€.>:…,%¤"@.6‚.>:…,ô…"@2APõ…"AUAp÷99+…@*…@2,*+…!@W)… @H,Aü%67¤<¤,.€%67@<@,.‚* 6 -A:,*6 - %+A& ,$+ !A,   !˜6 -˜  € ¤ ($-@3£&@) 6.¤-@@,.)@…6€.>:…,%¤"@.6‚.>:…,0…"@2A1…"AUAp399+…@*…@2,*+…!@W)… @H,Ah8%67¤<¤,.€%67@<@,.‚=…"@2AB* 6¡-A:,*6¡-¡%+A&¡,$+¡!A,L  € ¤V (`-@3£&@e 6.¤-@@j.)@…6€.>:…,%¤"@.6‚.>:…,m…"@2Abn…"AUApo99+…@*…@2,*+…!@W)… @H,A0t%67¤<¤,.€%67@<@,.‚y…"@2Ab~* 6¢-A:,*6¢-¢%+A&¢,$+¢!A,ˆ  € ¤Š (’K7¡"*¢"*† @*Ž A*‹"A A K As” A€•-@@#—qAR@G( ÍÁÉÎÔÅÎÁÎÃÅ ÓÈÕÔÄÏ×Î - ¥ DAYS [¤-@AP_ ¤qARœ  !˜6 -˜°$$DAMAGE ASSESSMENT & OPERATIONS›µ!!6˜-˜& &@$‘$+‘!@,º**6-%+¡!@,$+H:@,!?•,Ä**6”-”%+¢!@,$+H:@,!?’,Î6›-!@Ø6œ-”!@âQ¡!+A&$@,*›Q6¡-+A&$@,$+A&$@!,ìQ¢!+A&”$@,*œQ6¢-+A&”$@,$+A&”$@!,ö6‡-‡%†'@P;;6†-+‹$@0%Œ$@`%$@,'A%$+A&‡,556¦-¡$+A$+™!A,%™$+™A,,'AP6§- 'A$+Ž&@%,(##6Ž-Ž%†&§&¦&@$+Ž!@%,-''6Ž-@%%+Ž&@%,$+Ž!@%,2;;6’-++Ž&@%,$¡%+—&@%,$¢,'+¡%¢%@,%@%<6’-Ž$?€%@F;;6¨-¢$+A$+™!A,%™$+™A,,'AP$+’&—,P6¨-¨$? Z!!6•-¨'’$+’&—,$@'@_•!A&6•-A&d!!6•-•$+•!,$+ž",n776—-@%%++’&@%,$+¨&•,'+¨%@,$?u,s))6—-@%$+—@%,%—$+—!@%,x4 @46-+“!@,$+H:@,!?,‚4ž @46ž-+©!@,$+H:@,!?,Œ 6‰-‰%•– ApÐ##MAINTENANCE REPAIR SUBROUTINE›ÚK6˜-A6™-A '6š-A 36Ž-@%?6’-@%K6—-@%6Š-Š%@$%‘%%“%”%© y6¥-@%@$+@$+!@,%+‘!@,%+!@,%+”!@,%@$›%@$œ%@$%@$ž,6ˆ-ˆ%¥*«6-6‘-'6-36“-?6”-K6©-W6›-c6œ-o6-{6ž-‡6 -“6¡-Ÿ6¢-«6•-˜$¸ MELTDOWN ENDING›Â (Ì !@A1Ö //(&THE REACTOR CORE HAS BEEN DESTROYED BYà //(&UNCONTROLLED THERMAL RUNAWAY. HOWEVERê ,,($THE CONTAINMENT BUILDING HAS NOT YETô ( RUPTURED.þ ( &&(INITIATE YOUR ÅÖÁÃÕÁÔÉÏÎ PLAN. AP ,,($THE REACTOR CORE HAS MELTED DOWN AND& ((( PRODUCED A STEAM EXPLOSION. THE0 **("CONTAINMENT BUILDING HAS RUPTURED.: ++(#LETHAL RADIOACTIVE GASES AND DEBRISD ( HAVE ESCAPED.N (X //(&INITIATE YOUR EVACUATION AND RADIATIONb %%(CLEANUP PLANS AND GET MEDICALl ( ASSISTANCE.v AP GAME EVALUATION›ª(´--(OVER A PERIOD OF ˆ DAYS, YOU HAVE¾++(#PRODUCED AN AVERAGE POWER OUTPUT OFÈ(Ÿ KILOWATTS PER DAY.Ò??6ª-@%+Ÿ!A,%+Ÿ!A,%+Ÿ!AP,%+Ÿ!A,Ü(æ--(%YOUR AVERAGE POWER PRODUCTION RATE ISð//ªA@AAAAAA AA@ú7-(%HORRIBLE! FIND A LESS DEMANDING JOB!7 AB4*("WAY BELOW YOUR AREA'S POWER NEEDS.4 AB4*("BARELY ADEQUATE. SHOULD BE BETTER.4 AB''(VERY GOOD. POWER COSTS IN YOUR"-#(AREA WILL NOT BE INCREASED!- AB,++(#EXCELLENT! POWER COSTS IN YOUR AREA6,"(WILL DROP SIGNIFICANTLY!!!, ABhDAMAGE EVALUATION›r(|336«-@%+Š!@,%+Š!@ ,%+Š!@0,†--(%THE EQUIPMENT DAMAGE SUSTAINED DURING(THIS PERIOD WAS š''«AB`ABpAB€AB¤( VERY LIGHT. AP®( MODERATE. AP¸(HEAVY. APÂ( VERY SEVERE!ˆc(-(!DO YOU WANT TO TRY AGAIN (Y OR N):)@…C6€.>:…,K€4YN`AdAUc%’/ B+,AdAU/p +@u6¬-AzAR@„$$  THIS IS THE REACTOR VESSELŽ @“#˜¤-@@)¢ "­®¯¬ ,­¯/®¯¶ ¤ÀCC7,9,6,15,17,6,6,18,7,5,19,8,5,7,9,17,19,9,5,6,10,18,19,10,5,6›Å8811,18,19,11,5,6,12,18,19,12,5,6,13,18,19,13,5,6,14›ÊBB18,19,14,5,6,15,18,19,15,5,6,16,18,19,16,5,6,17,18,19,17,5,6›Ï9918,18,19,18,5,7,19,17,19,19,6,18,20,7,17,21,8,16,22›Þ',@@',@@ò',@@',@@ü',@@',@@',@@',@@¤-@¬ ¤( ( (($""  THIS IS THE REACTOR CORE. @8¤-@ @B,¤@/¤@L ¤V¤-@¬ ¤`( ( ((j$$  THESE ARE THE CONTROL RODSt @~',@@'/@@ˆ',@@'/@@’¤-@¬ ¤œ( ( ((¦J, $ THE EMERGENCY COOLANT CAN COOL THEJ( REACTOR IN AN EMERGENCYĤ-@@6Î "¯°Ø ,°¯â±-@@ ±ì ¤ö@@4,2,4,4,5,2,5,3,5,4,6,2,6,3,6,4,7,3,8,3,9,3,10,3,11,3,12,3›û##12,4,12,5,12,6,12,7,12,8,12,9›UU13,9,14,9,15,9,16,9,16,8,16,7,16,6,16,5,16,4,16,3,17,3,18,3,19,3,20,3,22,3,24,3› ¤-@¬ ¤( ( ((X-(%THE PRIMARY COOLANT CARRIES HEAT FROMX(&THE REACTOR CORE TO THE HEAT EXCHANGER2¤-@@Q< "¯°A @F ,°¯P±-@@ ±Z ¤d¤-@¬ ¤nBB4,25,4,27,5,25,5,26,5,27,6,25,6,26,6,27,7,26,8,26,9,26,10,26›p;;11,26,12,26,12,25,12,24,12,23,12,22,12,21,12,20,12,19›sGG12,18,12,17,12,16,12,15,13,15,14,15,15,15,16,15,16,16,16,17,16,18›xGG16,19,16,20,16,21,16,22,16,23,16,24,16,25,16,26,16,27,16,28,16,29›}5516,30,15,30,14,30,13,30,12,30,12,29,12,28,12,27›Œ( ( ((–$$  THIS IS THE HEAT EXCHANGER  @ª',@(@'/@4@´',@4@'/@4@¾',@(@'/@4@È',@(@'/@(@Ò¤-@¬ ¤Ü( ( ((æ''  THIS IS THE TURBINE GENERATORë @ð',@@0'/@@0ú',@@0'/@@6',@@6'/@@6',@@0'/@@6 @"',@@3'/@@3,¤-@@@6#,¤@4#,¤%@@2@ ¤J¤-@¬ ¤T( ( ((^!! THIS IS THE COOLING TOWERh @r',@$@#'/@$@%|',@6@#'/@6@%†',@%@&'/@%@%',@5@&'/@5@%š',@&@&'/@&@(¤',@4@&'/@4@(®',@'@('/@'@6¸',@3@('/@3@6ÂK,@4@6',@&@69,@%@8K/@5@8à¤-@¬ ¤ê( ( ((ï** "THE SECONDARY COOLANT CARRIES HEATô&& FROM THE HEAT EXCHANGER TO THEþ-- %TURBINE AND THEN TO THE COOLING TOWER @¤-@A# "¯°& ,°¯0±-@@ ±: ¤?BB4,35,4,37,5,35,5,36,5,37,6,35,6,36,6,37,7,36,8,36,9,36,10,36›DAA11,36,12,36,12,35,12,34,12,33,12,32,13,32,14,32,15,32,16,32›IAA16,33,16,34,16,35,16,36,17,36,18,36,19,36,20,36,20,35,20,34›NSS20,33,20,32,20,31,20,30,20,29,20,28,20,27,20,26,20,25,20,24,20,23,20,22,20,21›SAA21,21,22,21,23,21,24,21,25,21,26,21,27,21,27,20,27,19,27,18›XDD27,17,27,16,27,15,27,14,27,13,27,12,27,11,27,10,27,9,27,8,27,7›]BB28,7,29,7,30,7,31,7,32,7,34,10,32,13,34,16,35,16,35,17,35,18›bAA35,19,35,20,35,21,35,22,35,23,35,24,35,25,35,26,35,27,35,28›gAA34,28,34,29,34,30,35,30,35,31,35,32,34,32,34,33,34,34,34,35›lYY34,36,34,37,34,38,33,38,32,38,31,38,30,38,29,38,28,38,27,38,26,38,25,38,24,38,23,38›qMM22,38,21,38,20,38,19,38,18,38,17,38,16,38,15,38,14,38,13,38,12,38,12,37›Š¤-@¬ ¤”$€D:NUCPLANT.BAS