SET UPM 56,60:52,60::G%(3),L$(8):S54272:C53280:C,6S$"":T$""B$(0)"":B$(1)"":A$S$""X124:M$:SX1,0: S6,240:S13,240:788,520 S24,15:S4,17:S11,17:S19,204I "X08:L$(X)::FG1o $X050:P:X50228,P::900:H50 &X1593616383:P:X,P:YY1:Y10Y0:HH1:690 ( *V53248:V39,0:V1,0:2040,250:V,248:V21,5:V16,2 ,V3,229:V23,5:V28,3:V37,1= .V40,10:2041,255:2042,249:V41,4:V5,57W 1 SET UP NEW GAME 2MP120:FPMP:FT0:MT0:SPH:FG250:SC0:G0:FS0:M900:680 <(S$,19)"  ":" " A789,196:V4,0:S20,252:S$" INSTRUCTIONS (Y/N)?O FG$:1800:D133::G$"Y"G$"N"(56320)12770~ P789,234:V21,1:V2,PM:G$"Y"1000:90 Z:900:600:780:H90 c **** MONTHLY LOOP **** dM112:M$,DM eSC3333 nCT((8)8)4FT:CP((8)40)20FP:CP0CP0, xSN((8CT)CP10):SN0SN0= SNCPSNCPd RNCPSN:SM(CTSP50):SM0SM0 SPSPSNSM:FI((RNSM).55)10:P50(5(CT12)):730 MTMT4:MPMP20:M6MTMT8:MPMP40 FT((8)8)4MT:FP((8)40)20MP:FP0FP0 1600' **** DAILY LOOP ****\ DA1DM:S$""DA:FD(P200H):H101500 DA15""70)"FORECAST"36)FT" ":34)" "FP TFFSFG:TF999A$" FLOOD":550 TF500SCSC(TF300):A$" HIGH WATER ":1900;FD.8FGA$" OVER  HEAT ":1900WH502FGFD850:300C1,3:FG.75FDA$" BROWN OUT ":1900+ *** INNER TIME LOOP ***,T18:HH(FIFGFS)4000:(S$,9)33)""(H)" "J690TT4880^(198)0(56320)127470&c885DhG$:197,64:J(56320)19]rG$""J2FSFS10{|(G$""J1)FSFSFS10G$""J18FGFG10(FG299)(G$""J17)FGFGFG10G$"P"700G$"Q"G$""550 G$"H"1000:900:600:730:780FG0860:3509780:G$""J19360IGFS800V1800:T:SCSC6(49(10(FDFG))):S$53)"SCORE:"SC:DA1600:M:550 *** END ***S18,129:(S$,13)," "X17:S15,X7:," ":D199::,,"OVERFLOW":S18,128e&""200):X15:" ":+S18,128:"","GAME OVER":SCHSHSSC0"FINAL SCORE:"SC:"HIGH SCORE:"HS:(V2)1600:SCM180H100TF9991750:590 DSCSC1800:SC18506N700:V21,1:V16,2:V3,229:H50:50KW PANELS ~X""29):Y4:650:"TEMPPRCPSNOW"b69):Y11:650:"HEAD"34)"FT:l72)"FLOW"34)"IN:"37)"SP:"37)"GN:"40)"(CFS)v71)"DEMAND"33)"MW:":71)"ALARM"33):Y2:650!S$;:Y1:650PS$11):650:S$16):650:" ";:o"";X1Y:" ݝ";::"";X1Y:"";::: WATER LEVELHH(90H):690:(H)90680?(S$,16H10)""L$((8(H10(H10))8)):" ":M wS1,0:S8,0:S15,0:198,0:789,234S$,"PRESS ANY KEY":X0G$:J(56320):1800:D199::XX1:G$""J127718X3720X6708710*V4,0:G$""V4,0:V21,0:" ":788,49:GS$," ":^ MTHLY ***x(S$,18)33)""P" """70)"WEATHER "36)CT" ":34)" "CP34)" "SP(S$,12)37((FI)))""FIS$""M$" ":  GN GATE GN & SP Y (S$,16FG100)," "(L$((8(FG100(FG100))8)),2)y(S$,13)37((FS)))""FS37((FG)))FG: SPILLWAY  GFS501.9:S15,400G:S18,128(FS0) %(S$,7),,("",G)(" ",(G10)(G10))*X15J4,,("",G)("",(G10)(G10))P>VHlQ BLACK OUT RSCSC4:S8,0:C1,0:789,234:FSFS0:800\FG0:A$" BLACK OUT ":1900fT$62)" "13)"    ":D199:: o TURN ON GEN)pA$"  ":uFG789,196^zS1,4(FG0):S8,5(FG0):p DAM C1,3:"";:X15:" ":""27)" ";:X124:" ";:""," Β   ߩ "+7)"Β     ߩ "L,"Β     "t" "X16:" ":," Ǒ":5)"  " ,"   ":14)"  "/" ߒ ߒ  "k"  ":"  "" " ߒ  "X12:" ":(S$,12);:X1H103:" ": ""250)"  ":800:>789,234:C1,15:SC1100o" IS A COMPUTER SIMULATION OF THE"OPERATION OF A HYDRO-ELECTRIC PLANT."OU CONTROL THE DAM FOR ONE YEAR BY"CONTROLLING THE SPILL RATE AND FLOW"THROUGH THE GENERATING TURBINE.="OU MUST ADJUST THE GATE FOR THEe$"TURBINE TO MEET THE POWER DEMAND.."OU MUST ADJUST THE THE SPILLWAY GATE8"TO AVOID FLOODING AND CONSERVE WATER FORPOWER GENERATION.B700L"":600:""," DISPLAY PANELS "V30)"WEATHER9`"TEMPERATURE (CELSIUS). _]j"MONTHLY PRECIPITATION (MM) _t"CURRENT SNOWPACK (CM) _~"WATER LEVEL ABOVE DAM _"FLOW INTO RESERVOIR _"FLOW OVER SPILLWAY _"FLOW THROUGH TURBINE _:" (FLOW IS IN CUBIC FEET/SEC.)_"POWER DEMAND IN MEGAWATTS _n"ALARMS:" BROWNOUT: GN < 75% OPTIMUM" BLACKOUT: GN < 50% OPTIMUM" OVERHEAT: GN 25% > OPTIMUM":"DATE":700":826)" AISE F1"16)"PILLWAY GATE:"39)" OWER F3u66)" AISE F5"16)"URBINE GATE:"39)" OWER F7" В = AUSE Ȓ = ELP ђ = UIT"SE THIS FORMULA TO CALCULATE THE FLOW FOR THE GENERATOR (): " 200 OWER EMANDB " = "28)"EAD"R SC:700:[ 700 "O GET THE BEST SCORE, KEEP AT THE "CORRECT LEVEL. OU LOSE POINTS EACH TIMEAN ALARM SOUNDS. " TOTAL OUTFLOW ABOVE 500 TRIGGERS3!"THE ɠ ALARM. TOTAL OVER 1000 IS FATAL.a!"HE WEATHER PANEL DISPLAYS THE CURRENT!"WEATHER FOR EACH MONTH. FTER THE 15TH!("OF THE MONTH, IT DISPLAYS THE FORECAST!2"FOR THE NEXT MONTH."<"HE WEATHER CONDITIONS DETERMINE THE "F" FLOW FOR EACH MONTH.:"x"NE FINAL WARNING:c"" 'ԠԠŠ͠!"""Ġ!":"O BEGIN,":700:" *** SPRITES *** ELEVATOR SOUND"X19.2:S1,X::"X90.2:S1,X::#: WALK SOUND1#S1,22:S1,0:D199::K#? ELEVAR DOWN p#@S1,0:S8,0:R(8)7205:1500#JX1R.5:V1,X:#TY12:1510:D1333::V1,208:#^(V2)1660#cV2,0:V21,3:V38,M4$hX0484:MN1MN:2041,254MN:V2,X:1520:"$r2041,251:1700U$|X4804:MN1MN:2041,252MN:V2,X:1520:a$V21,5s$ ELEVATOR UP$1500:X208 1 .5:V1,X::1510$$: QUICK TRIP DW$1500:S1,11:X02552:V1,X::1510:$: DANCE%2041,253(((8)3)1)2:+%9: WALK BOAT]%:680:1500:X150.5:V1,X::1510:S20,44%?S18,129:X139:V4,X:D122::%DV3,70:V16,0:V2,248:V21,7:SC255SC7:SC55SC39%NX248SC4:MN1MN:2041,252MN:V2,X:1520: &SSC3918903&XX330.2:V4,X:V2,X::S18,128_&b680:1500:X500.5:V1,X::1510:t&k: JUMP MAN&lV3,225:S1,33(FG0)11:D144::SCSC2:V3,229:& DATA&JAN.,31,FEB.,28,MAR.,31,APR.,31,"MAY ",31,JUNE,30,'JULY,31,AUG.,31,SEPT,30,OCT.,31,NOV.,30,DEC.,31p'"","","","","","",""'" "," "': ML GENERAR'166,2,189,96,196,232,134,2,160,0,153,196,5,200,192,5,208( 248,224,7,240,3,76,52,234,169,0,133,2,169,83,205,102[(6,208,2,169,93,141,102,6,76,52,234,229,212,199,194,200,217,234o(: SPRITES(2,,,3,,,3,128(,3,192,,3,224,,3(240,,3,248,,3,252,(3,254,,3,255,,3,255(128,3,255,192,3,255,240,3)255,252,3,255,255,3,128,')003,128,,255,255,255,63,255F)255,15,255,254,3,255,254,Y): ELEVARf),,,,,,,),10,160,,10,160,,74)160,,85,85,85,85,85,85)106,150,169,106,150,169,106,150)169,106,150,169,106,150,169,85*85,85,85,85,85,106,150,169)*106,150,169,106,150,169,106,150K*169,106,150,169,85,85,85,255\* OPERATORSr*,016,,,084,,,084*,,168,,,168,,*168,,,252,,3,255,192*15,255,192,15,255,192,15,255*192,15,255,192,11,255,128,11*255,128,3,207,,3,207,+3,207,,3,207,,2,138*+,1,69,,1,69,,<+,4,,,21,,,21N+,,42,,,170,,e+42,,,63,,,255,192+3,255,192,3,255,192,3,191+192,3,191,192,,255,,15+255,,15,255,,10,15,+21,15,,21,15,,,10+,,21,,,21,,+,4,,,21,,,21,,,42,,,170,,,42,,,63,,,255,192;,3,255,192,3,255,192,3,251U,192,3,251,192,,255,,j,63,,,60,,,62,64,,62,64,,62,64,,40,64,,84,,,84,,,,16,,,84,,,84,,,168,,,170,,,168,,,252,,3,255,,3,255,192,3,255,192,3,254 -192,3,254,192,,255,,)-255,240,,255,240,,240,160E-,240,084,,240,084,,160V-,,84,,,84,,j-,16,,,084,,,84}-,,168,,,170,,-168,,,252,,3,255,-3,255,192,3,255,192,3,239-192,3,239,192,,255,,-252,,,060,,1,188,-1,188,,1,188,,1,40 .,,21,,,21,,