' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (  Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠z# u` }28,28}29,26#}25,35321}32,3625?}32,3430M}32,3635\}20500::r END OF PROGRAM}::5(1023)123430205:"WOULD YOU LIKE TO PLAY AGAIN";:868A$(A$,1,1)"Y"İ30090:800(A$,1,1)"N"43A}18,2210F}10,2020(K}24,28156P}10,2024DU}10,2028RZ}12,1625`_}25,3512nd}12,1635|i}14,1630n}31,3416s}18,2225x}25,3518}}25,3522}18,2230}25,3524}25,3530}25,26}26,28}27,303, 4, OR 5";:ZM23:868:20900:EZN:E1E531240pz:10:"O. K. WHEN EVER YOU ARE READY........":20500:y}:6 }10,204}5,11}6,13}7,15}8,13#}9,11(}10,2010-}12,16102}12,16157}10,2012<}10,2016 yD(B)ZN:D(B)1D(B)931140'yBgy:7:"WOULD YOU LIKE PROBLEMS IN :":9:" 1.) ADDITION,"y11:" 2.) SUBTRACTION,":13y" 3.) MULTIPLICATION,":15:" 4.) DIVISION, OR":17:" 5.) A RANDOM MIXTURE."3z19:"PLEASE TYPE 1, 2, );" HOW OLD ARE YOU";:ZM14:868:20900:C(B)ZN:C(B)5C(B)4031125y10:"THIS DRILL IS DESIGNED FOR 5 TO"::"40 YEAR OLDS.":31110y958y10:8:"1 = EASY ...... 9 = HARD"y12:"WHAT IS YOUR DEGREE OF DIFFICULTY";:868:ZM16:20900N 50":31040OyDD99DD0:mTy:5:"PLEASE TYPE YOUR NAME(S) AFTER YOUR ":"PLAYER NUMBER : ":34,5hyB1A::" PLAYER #";B;:B$(B):(B$(B))7B$(B)(B$(B),7)my(37)20ė:6ryB:|yB1AyHy7:"PLAYER #";B;" : ";B$(B20500 uJy7:"HOW MANY PLAYERS ARE THERE";:ZM10:868:20900:AZN,yA35Ģ10:"SORRY, MY CLASS SIZE IS LIMITED TO 35.":DD11000::310006y958@y12:"HOW MANY PROBLEMS PER PLAYER";:ZM15:868 Jy20900:WZN:W50Ģ15:" NO MORE THAG THE MENU PROGRAM...":(4);"RUN HELLO"4)1023,9<*:TPCH(36):CV(37):mQâCV1:36,CH:868:RÖ1:ZC:868:CV2:,::"1) RUN THIS PROGRAM AGAIN,"::"2) RUN A DIFFERENT PROGRAM, OR"T :"3) END"13:"PLEASE ENTER 1, 2, OR 3 ";:86840000:ZEZNZE0ZE443030:"PLEASE ENTER A NUMBER 1 - 3":43022ZE1ĬZE343049(:10:"GETTIN END OF PROGRAM!::58(1023)123430205:"WOULD YOU LIKE TO RUN THIS PROGRAM"::"AGAIN - YES OR NO";:868A$(A$,1,1)"Y"Ĭ(A$,1,1)"N"43050:"PLEASE ANSWER WITH YES OR NO":43005D "WOULD YOU LIKE TO:"PRESS SPACE BAR TO CONTINUE";)9 A$::?@CH(36):CV(37)gA"";ZN$:(ZN$)(((ZN$)))40003B(ZN$)0ZN$"0"40006CZM:"THAT IS NOT A NUMBER - TRY AGAIN";:40010:40001FZM:868:CV1(CV23):ZN(ZN$):JCV1:36,CH:868:E32241?"THAT IS AN ERROR, ";N$;", TRY AGAIN!"I2190p"THAT IS WRONG ALSO,"N$;" . THE ""CORRECT ANSWER IS "C(T)" !!":236022601820::"CORRECT!";:2360I430008 1:24:"(1)fT(86(1)1)*pS(T)121506zS(T)1?E0LI;". ";c"COUNTRY: ";C$(T){"WHAT CONTINENT?";5000040000:MZNM1M5İ50002:2220ZC:"1, 2, 3, 4, OR 5 PLEASE.":50001:2210MC(T)2250EE16 PLEASE.";:50001:2114I@J">>>KEY 1) SOUTH AMERICA"bK" 2) NORTH AMERICA"}L" 3) EUROPE"M" 4) AFRICA"N" 5) ASIA"O:::34,8:R DELETED THE RANDOMIZE\I1N]I12150^XC$(85)"BURUNDI"C(85)45 C$(86)"BANGLADESH"A*C(86)5G4S5I186_6S(I)0f7I>N$;", HOW MANY PROBLEMS WOULD YOU":"LIKE TO TRY?";@50000B40000:NZNDN0N87İ50002:2121FZC:"TYPE IN A NUMBER BETWEEN 1 AND 8LTA"vC(77)4%C$(78)"URUGUAY"1C(78)1HC$(79)"VENEZUELA"TC(79)1lC$(80)"YUGOSLAVIA"xC(80)3C$(81)"ZAIRE"C(81)4C$(82)"ZAMBIA"C(82)4C$(83)"AFGHANISTAN"C(83)5C$(84)"FRANCE"C(84)3 01760%"OFF TO YOUR RIGHT.">:J$;:40000:VZN:]V01820,01970,01970,01970"THAT WAS A GOOD IDEA, YOU MUST HAVE"&:"KNOWN THAT A WOLF WILL EAT A FOX.":0"AS YOU RAN FROM THE WOLVES,"::"YOU LOST ENERGY AND"::"THEY B"."h01660r"MORE."1|II15:EE15:_"BUT UNFORTUNATELY,THE WOLF PACK CAUGHT"|:"YOU AND KILLED YOU."1490"YOU STROLLED OFF THE PATH AND":"SEE A WOLF PACK ";R((1)2)1R201730"OFF TO YOUR LEFT."$(B$,(B$)1):40025&XB$B$(A1)>Y(23):25:B$" "MZM240015X[40009jPù600,A:601,CSÒ0:ME4,E5:E1E2,E3:(21)::(4);"RUN ODELLP2"ٺ:(1023)123ĺ(4);"PR#6"Z݀Z݀Z݀X(16384)12740020IX>K0:3210,110:X2101602:M2\M0:2X2,110:3:2X,110uN(16384)12740020OX:40004TA1(16384)128U16368,0:A113B(B$):B0B6E4X:E5110:VA113(A18(B$)1)B$"":40025WA18B(Z1)7,Z2:30050"@uZ33230050:NuZ31Z1(Z1)7,Z2AbuZGlu@3:5110,118:B$"":A1$"":E15:E2110:E3118:2160,110:16368,0C(23):"WHAT DO YOU WISH TO DO? ";D0:2160,110EX1622102:M3G0:3X2,110:3:3X,110H5,12007,12009,12012,12014D."ATTEMPT TO ESCAPE TO DEEPER WATER":p."ATTEMPT TO ESCAPE TO SHALLOW WATER":."JUST IGNORE IT":."ATTACK AND EAT IT":."CHASE IT OUT OF YOUR TERRITORY":0uZ1(Z$):Z3((Z$,Z,1))?uZ364ĔZ344Z1175-'16368,0:24:13:"PRESS SPACE BAR";F'(16384)12710010b'0:E1E2,E3:ME4,E5:*:::9:"REMEMBER A "A9$" WILL"::"EAT A "A$"."*:"NOW RUN THE PROGRAM AGAIN AND SEE IF "::"YOU CAN SURVIVE":10000*9175.:21:B1200#"YOU HAVE BEEN SUCCESSFUL":*#C30ıd#:::11:"YOU PASSED UP TOO MANY CHANCES AT FOOD":#:" YOU STARVED TO DEATH."#10000#::12:"DO YOU WANT TO TRY AGAIN?";A$#(A$,1)"N"đ:::55555#(A$,1)"Y"X19:10#9Z#"YOU ARE GETTING HUNGRY..BETTER EAT":zn#"YOU CAN NOT KILL THIS ANIMAL AND":"YOU USED A LOT OF ENERGY NEEDLESSLY":s#"YOU GOT AWAY FOR THE TIME BEING":v#"NO.....THAT WAS THE WRONG MOVE":x#"GOOD, IT DOES NOT OCCUPY THE SAME NICHE":5110,118GEME4,E5:Y118:X1230E42:3:5110X,118:3E4X,118jG0:5110X,118:3E4X,118:XI3:5110X,118:E15:E2110X:E3118:(#"THAT WAS A WASTE OF ENERGY":F#"THAT FISH JUST ATE YOUR LUNCH.":P#"YOU ARE TOO LITTLE":):"SEE IF YOU CAN SURVIVE.":10000:9175Q٭(1023)123ĺ(13);(4);"RUN HELLO"Wٿ(13);(4);"RUN HELLO"wٿEA113(A18(B$)1)B$"":40025FWA18B$(B$,(B$)1):40025VXB$B$(A1)sY23:25:B$" ";ZA23M1140015[A23M940015\40009PÑ:::(10):"YOU MADE IT....FANTASTIC"::"TRY AGAIN AS A DIFFERENT FISH AND"(QúX,R3H(16384)12740020$IXMJ0:MR2,R3:A23R150:R2110:MM8]KA24MM1mLXR2R12M0:MX2,R3:3:MX,R3N(16384)12740020OXP40004TA1(16384)128U16368,0:A113B(B$):B0B6E4X:E5R3:$VPON IT" .5."CHASE IT OUT OF YOUR TERRITORY":b@3:4180,118:B$"":A1$"":E2180:E3118oAMR1,R3}B16368,0C23:"WHAT DO YOU WISH TO DO?"D0:MR1,R3:A23R194:R2130:MM8EA24MM1FXR1R22G0:MX2,R3:3:MRUN THE PROGRAM AGAIN AND SEE IF "::"YOU CAN SURVIVE":10000H*9175T.:(21)y.B12005,12007,12009,12012,12014."ATTEMPT TO ESCAPE TO DEEPER WATER":."ATTEMPT TO ESCAPE TO SHALLOW WATER":."JUST IGNORE IT":."ATTACK AND PREY U0320:"PLEASE ANSWER WITH YES OR NO":430058 :y:10:"GETTING THE MENU PROGRAM...":(13)(4);"RUN HELLO"ELLO"T HELP YOU"2( :"MUCH ANYWAY. LET'S MOVE ON..."8( f( "EATING BARK FROM TREES IS NOT GOOD FOR"( :"YOU. YOU SHOULD BE MORE CAREFUL"::"ABOUT WHAT YOU EAT."( II5:( "A ";F$;" DOESN'T USUALLY GO" ) :"AROUND CHASING TREES. WHY CHASE TES GOOD. LETS MOVE ON..".'X II15:EE20:Y'b "BUT YOU DID GET HUNGRY FROM TRYING."f'l EE15:'v V3230,3260,3290,3330' "BEING A ";F$;" YOU DON'T NEED"::"TO RUN FROM A TREE.":' "SAVE YOUR ENERGY"' EE15: ( "GOOD, THE TREE WON'& "WHY RUN FROM A TREE? BEING"P& :"A ";F$;" YOU WOULD HAVE LIKED TO EAT":n& "BARK FROM THAT TREE..."{& EE15:&& "THE BARK OF A TREE IS GOOD FOOD."&0 :"BEING A ";F$;" YOU COULD HAVE"::"BUILT UP YOUR ENERGY."&D EE5:'N "THAT TASING"::"SOMETHING."(% II10:EE10:T% "OOPS HE GOT AWAY. HE WAS VERY LUCKY."a% EE10:% :"THERE IS A FALLEN TREE WITH BARK ON IT "% :"IN FRONT OF YOU."% :J$;:40000:VZN:% A03060,03060,03190,3190% V3070,3110,3150,3170 THE MOUSE HID UNDER A ROCK "C$J :"WHERE YOU COULDN'T GET HIM.":{$T "HE SURE WAS SURPRISED"::"WHEN A ";F$;" TRIED":$^ "TO CHASE HIM."$h EE15:$r R((1)100)1I$| R9502980$ "YOU GOT IT..."% :"YOU MUST FEEL BETTER ABOUT EATOF YOU..."## :J$;:40000:VZN:B# V02820,02850,02930,02880l# "THINK ABOUT IT...YOU ARE A ";F$;"."# :"YOU CAN SURELY EAT A SMALL MOUSE."# EE15:#" "YOU COULD HAVE GOTTEN":#, "A MOUSE IF YOU WOULD HAVE TRIED..."#6 EE5:$@ " EAT A RABBIT?":" :"IT RAN AWAY BEFORE YOU GOT CLOSE."G" EE10:" "CHASING A RABBIT WASN'T"::"A VERY GOOD IDEA...":" "IT HOPPED AWAY, AND YOU LOST ENERGY."" EE15:" :"AS YOU LOOK DOWN THE PATH, YOU SEE" # :"A MOUSE IN FRONT ! EE15:! EE15B! :"THERE IS A RABBIT IN FRONT OF YOU."[! :J$;:40000:VZN:z!F V02640,02660,02690,02720!P "SURE, BUT A RABBIT WOULDN'T HURT YOU."!Z EE15:!d "GOOD... IT CAN'T HURT YOU..."!n !x " "WHY WOULD YOU WANT TO+ "YOU SHOULDN'T HAVE IGNORED SUCH A":K "BEAUTIFUL FIELD AS THAT."X EE10: "GOOD IDEA...THAT SURE IS GOOD CLOVER." :"NOW THAT YOU ARE DONE EATING,"::"LET'S MOVE ON..." EE15:II15: "DON'T BE FOOLISH. LET'S MOVE ON." HIM. BOY, YOU MUST":=B "REALLY FEEL TIRED AFTER THAT RUN"JL EE10:iV A02400,02580,02750,02750` :"JUST OFF THE PATH IS A CLOVER FIELD."t :J$;:40000:VZN: V02470,02490,02520,02550 "YOU DON'T NEED TO RUN FROM A FIELD." (1)100)1IR9502330.R8001240G"AND YOU GOT IT.":v "ALTHOUGH HE DID PUT UP A GOOD STRUGGLE." EE10:II10: "BUT HE BURROWED INTO THE GROUND."$ EE5:. "AS YOU CHASED THE GOPHER INTO THE WOODS,"8 :"YOU LOST OF COURSE YOU CAN IGNORE IT,"Y:"BUT THAT WAS ENERGY THAT"::"YOU COULD HAVE USED."_"THAT WAS A GOOD CHOICE,":E3002260"IT'S ALWAYS GOOD TO BUILD":"UP YOUR ENERGY,":02270"YOU NEEDED THAT ENERGY," R(% :"YOU ARE RESTING UNDER A TREE"E%:"WHEN YOU SEE A GOPHER."^*:J$;:40000:VZN:}RV02140,02180,02210,02350\"THAT WASN'T A GOOD IDEA TO "f:"ESCAPE FROM A GOPHER. ALL YOU DID WAS":p"USE UP YOUR ENERGY."zEE15:" WAS OUT LOOKING":4"FOR FOOD, AND YOU WERE IT"?01490x"EAT A WOLF PACK?"::"THERE IS NO WAY YOU COULD":"HAVE EATEN A WOLF."01490"CHASE A WOLF PACK? YOU LET THEM KNOW": "WHERE YOU WERE, AND THEY GOT YOU."01490."II10:1910:Y"THE WOLF PACK MOVED IN,"::"AND YOU FELL INTO SOME ROCKS.":"THEY CAUGHT UP TO YOU AND ATE YOU."01490"THAT WAS A BAD IDEA TO TRY TO":V01990,01990,02020,02020"IGNORE THE WOLF PACK,"::"BECAUSE ITEGAN TO CATCH UP TO YOU.":&DEE15<NR((1)100)1IMXR9501940^bR8501920l"YOU WERE SAFE,"::"BECAUSE YOU RAN LONG AND HARD."v24:"PRESS SPACE BAR TO CONTINUE";:Z9$::"YOU RAN FAST,"::"BUT THE WOLF PACK INJURED YOU8R((1)100)1I%8I5005040U8"IT WAS CLOSE, BUT THE DEER WAS TOO FAST."b8EE15:8"WHAT A BIG MEAL. YOU SHOULDN'T"8:"BE HUNGRY FOR A WHILE---"8EE20:II15:8:A5080,5240,5400,5570 9"AS YOU WALK DOWN THE PATH, YO$:"YOU GOT IT EXCITED AND IT RAN AWAY."078O7BV04940,04940,04940,04950e7LG$"EAT":EE15:}7VG$"CHASE":EE15:7`V04820,04970,05000,049707j"YOU SHOULD HAVE TRIED TO EAT THE DEER."7t:"YOU HAD A CHANCE OF GETTING IT."7~EE5:0 6V04820,04860,04880,04880I6"WHY WOULD A ";F$;" ESCAPE FROM A "s6:"DEER? A DEER WOULDN'T EAT YOU.":6"LET'S GO ON..."6EE15:6"GOOD---A DEER WOULDN'T HURT YOU."66049306"WHAT?--A ";F$;" DOESN'T ";G$;" A DEER."*75R"WITH THE SECOND BULLET."25\EE10:II15:G5f"HE GOT YOU..."]5pB$"FARMER":8010r5z"HE GOT YOU."}5047205:"AS YOU GO DOWN THE TRAIL FARTHER, "5:"YOU COME UP TO A DEER."5:J$;:40000:VZN:6A04810,04810,04810,0496:$4"THE FARMER IS OUT HUNTING."=4:J$;:40000:VZN:C4b4V04620,04730,04730,04730x4 R((1)100)1I4R90047104 R80046804*"WHEW---THAT WAS CLOSE, HE MISSED TWICE."4>EE15:4H"MISSED ONCE--JUST NICKED YOU":T EAT IT---IT ATE YOU.""3l04440@3v"THE SNAKE ATTACKED YOU"_3:"AS YOU GOT TOO CLOSE,"j3045103"YOU WEREN'T LUCKY ENOUGH THIS TIME---"3:"IT GOT YOU."3044403"AS YOU GO DOWN THE PATH, YOU"4:"GO THROUGH A FARMER'S LAND."2:J$;:40000:VZN:62V04380,04420,04450,04470L2R((1)100)1I]2&R900450020"YOU ARE SAFE. HE DIDN'T NOTICE YOU."2:EE15:2D"MAYBE YOU IGNORED IT, BUT IT"2N:"DIDN'T IGNORE YOU..."2XB$"SNAKE":80103b"NO. YOU DIDN' AND CAUGHT YOU."104150F1"WHAT?? YOU'RE TRYING TO EAT A DOG?"f1:"YOU GOT KILLED TRYING."q1041501"A RABBIT CAN'T CHASE A DOG---YOU"1:"GOT KILLED TRYING."1041501"GOING DOWN THE PATH, YOU COME"1:"ACROSS A SNAKE."T"#0,:"THE DOG GOT YOU ANYWAY.">06B$"HUNTING DOG":8010g0@"REMEMBER...THE DOG IS TRAINED FOR"{0J:"HUNTING, ";0TR((1)2)10^R2042300h"BUT YOU WERE LUCKY BECAUSE"0r:"IT DIDN'T NOTICE YOU."0|1"AND HE SNIFFED YOU OUT40000:VZN:+/V04050,04160,04250,04280A/R((1)100)1IR/R9504110c/R8504130/"YOU WERE SAFE THIS TIME."/:"THE DOG WAS TOO OLD."/EE10:/"YOU GOT AWAY, BUT THE DOG BIT YOU."/025400""IT WAS RIGHT TO RUN BUT YOU ON IT'S ESCAPE."#.ZII15:K.d"AS YOU RAN UP TO THE OWL'S TREE,"b.n:"IT FLEW AWAY."m.sEE15x.x03890.:A3980,4310,4530,4530."AS YOU ARE HOPPING DOWN THE PATH, YOU".:"COME UP TO AN OLD FARMER'S HUNTING DOG." /:J$;:03870+-"IT WAS ALREADY INJURED AND YOU"N- :"GOT IT FROM A LOW BRANCH."b-EE15:II15:-"NO. WHEN YOU TRIED FOR THE"-(:"OWL, IT FLEW FROM ITS BRANCH."-2EE15:-<"YOU WERE JUST INJURED"-F:"BY THE OWL AS IT FLEW":.P"PAS WERE JUST KILLED BY THE OWL"::"IN THE ATTEMPT."=,t03590X,~V3760,3790,3810,3940|,"YOU DON'T NEED TO DO THAT---",:"YOU JUST WASTED ENERGY.":,EE15:,"O.K. LET'S MOVE ON...",,A303900,R((1)100)1I-R50OWL":8010 +R((1)100)1I1+R4003650T+$"YOU WERE LUCKY THAT THE OWL"m+.:"DIDN'T SEE YOU."s+8+B"YOU SHOULDN'T HAVE IGNORED THE OWL."+L:"IT FLEW DOWN AND GOT YOU."+V03590+`"NO, NO, NO...A ";F$;" CAN'T FLY."2,j:"YOU* "THAT WAS SMART OF YOU"M* :"TO ESCAPE FROM THE OWL -- IT HAD ITS":`* "EYE ON YOU."f* * "AS YOU WERE ESCAPING, THE OWL":* R9003580* "SWOOPED DOWN AND CLAWED YOU LIGHTLY."* II1:* "SWOOPED DOWN AND GOT YOU." +B$"A TREE?": ) "LET'S GO ON..."-) EE15:Z)* :"THERE IS AN OWL SITTING ON A BRANCH"{)4 :"IN THE TREE BEHIND YOU.")> :J$;:40000:VZN:)W A3440,3440,3710,3710)p V03470,03600,03680,03680) R((1)100)1I) EE15* R8003540 ONE OF ITS CLAWS":"AND YOU WERE SERIOUSLY HURT."=HEE15HHII15NHH"YOU WEREN'T LUCKY THIS TIME,"::"THE HAWK SWOOPED DOWN AND CAUGHT YOU."HB$"HAWK"H08010HR((1)100)1IHR7506930H06860=I"YOU WERE VERY LUCLYING ABOVE, AND IT"::"HAS AN EYE ON YOU."EG,:J$;:40000:VZN:`GTV6750,6900,6960,6960vG^R((1)100)1IGhR7006800Gr"YOU WERE LUCKY TO HAVE ESCAPED INTO"::"THE WOODS."G|EE15GGR95068602H"YOU WERE JUST CAUGHT BY(1)100)1IFR2006670F"YOU WEREN'T LUCKY THIS TIME---"::"THE RACCOON ATTACKED AND YOU WERE"::"KILLED FIGHTING HIM."FB$"RACCOON"F08010F"DON'T TAKE A CHANCE LIKE THAT..."::"YOU COULD GET KILLED."F,G""THERE IS A HAWK F,6690,6990,7290YEn"ON YOUR TRAVELS THROUGH THE WOODS,"::"YOU COME ACROSS A RACCOON."rEx:J$;:40000:VZN:EV6570,6610,6630,6630E"THAT WAS SMART, BECAUSE RACCOONS ARE"::"MORE FEROCIOUS THAN MOST PEOPLE THINK."EEE15E FR(LET'S MOVE ON."D CD"EVEN THOUGH GRASS IS NOT ON YOUR DIET,"D:"IT DID SETTLE YOUR STOMACH AND IT MADE"::"YOU FEEL BETTER."D(EE10D2D<"ARE YOU TRYING TO CHASE GRASS???"::"IT TAKES A LOT OF ENERGY."DPEE15DZEd:A651015 C~II15C@C"NOW THERE IS A GRASSY FIELD NEAR YOU."YC:J$;:40000:VZN:tCV6360,6400,6420,6460zCC"I DON'T LIKE THE COLOR GREEN EITHER.."::"BUT TO RUN FROM GREEN GRASS IS NOT"::"A GOOD MOVE."CEE15CD"GOOD...OU DON'T NEED TO "::"RUN FROM BERRIES."4BEE15:BuB$"WHY IGNORE THE BERRIES..A FOX LIKES"::"THEM ALOT."B.EE5B8BB"A FOX WOULD NOT CHASE BERRIES."BLEE15BVB`"VERY GOOD...YOU LIKE BERRIES."::"LET'S MOVE ON..."CtEEIT IS TIME TO MOVE ON.""AzEE15-AII153AsA"DON'T CHASE A FIELD...."::"IT MAKES MOTHER NATURE MAD."~AEE10AA"THERE IS A BUSH OF BERRIES NEAR."A:J$;:40000:VZN:AV06140,06180,06240,06210)B"PLEASE BE SENSIBLE..YTO "(@ :"RUN FROM A FIELD OF GRASS."3@*EE159@4@>"IGNORING THE FIELD IS FINE, BUT IT HAD"::"FOOD FOR YOU. YOU MISSED IT."@REE5@\@f"GOOD..A GRASSY FIELD IS GOOD FOR"::"A ";F$;"."Ap:"NOW THAT YOU'VE HAD A FULL MEAL,"::""WELL, YOU DIDN'T GET IT, BUT KEEP YOUR"::"HOPES UP, YOU'LL HAVE ANOTHER CHANCE."Z?w?:A5840,5840,6070,6290?"THERE IS A GRASSY FIELD AHEAD OF YOU."?:J$;:40000:VZN:?V5910,5950,5990,6040? @"THERE IS NO REASON FOR YOU A FOX."$>:"IT WON'T HURT YOU."1>&EE15:>>0"OKAY."D>:Z>DR((1)100)1Ik>NR7005800~>X"YOU GOT IT.">bEE15>lII10>v>"YOU CHASED IT BACK INTO ITS DEN AND YOU"::"CAN'T CHASE IT ANY FARTHER.">EE15>T?AND SLIGHTLY"::"INJURED YOU."2=II5:EE15:U="THAT WAS NOT A GOOD CHOICE."`=05490="YOU TURN YOUR HEAD AROUND AND NOTICE"=:"A FOX IS BEHIND YOU."=:J$;:40000:VZN:=V05650,05680,05700,05760>"YOU'RE MUCH LARGER THAN<@V05460,05480,05500,05550$61050>I|GG **************************************************G ESTSUB 10/7/77 BJ 2D(3(1))2.F(Q110J)0|.Z$"A"12200C.K(3(1))2WD/(KJ)112000fX/KJ12160l/LEWAY.510(J1):12200/LEWAY.510(K1)/G(Q210K)0SFG1:581:I;".) ";F;" + ";G;" IS ABOUT.....";112720:12760`:"HOW MANY PROBLEMS DO YOU WISH?";:8689<(61000:NZNM(N1N3111000t)22:"TYPE A NUMBER FROM 3 TO 30.")10100*C0:C10:WR0\+I1N+TRY0+Q1(1)$,Q110111200,Q2(1),Q210111400P-Z$"A"11800 -J12850001TRñ8AR";::" TO CONTINUE";DTQí(16384)12850001JTRñJZNSZE0ZE443030CS:"PLEASE ENTER A NUMBER 1 - 3":43022OSZE1Ĭ_SZE343049S:10:"GETTING THE MENU PROGRAM...":(4);"RUN HELLO"S)1023,9S*:SPù16368,0:24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE"; TQí(16384)30/R:"PLEASE ANSWER WITH YES OR NO":43005GR(1023)12343050R:10:"GETTING THE MENU PROGRAM...":(13);(4);"RUN HELLO"R*:RPù16368,0:24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE";RQí(16384)12850001RRñZ40000:ZEV23):b:5:SFGpb:I;".) ";F;" - ";G;" IS ABOUT.....";b12720S DO YOU WISH?";:868&Y61000:NZN:X1A:P2$::A(A)A(A)10:31110Nry:"YOU ALREADY USED THAT!":20500:P2$""Tyd}DW332050} }4X,150:DW3:320602}3X,150:DW4<}34,20::2:"YEARS";:10:"DAYS";:18:"HOURS";:26:"MIN.";:32:"SECONDS"X2348:X:0;:"SPACE BAR";::" TO CONTINUE";;(P(16384)1283220530F)P20520N2P:T0upuA(A)10A(A)030200vuuX1A:P1$::A(A)A(A)1:30210uP1$""::"YOU ALREADY WENT THERE!":20500vy"yA(A)1031090 ,y:X120:P$::P1$):"METHOD";:25:"TRIP TIME":U:X120:P$::X19:P$:T(X)05635P$;:29((T(X))):T(X);:33:T$(V(X)):20500''::$'22016*(1023)123ė::D$;"RUN HELLO"*PP24:10:16368,0:"PRESS ";::V:X19:A(X)10DW1+:DW15601a:10:868:"DO YOU WANT TO TRY A DIFFERENT TYPE"868:"OF TRANSPORTATION";A$:(A$,1,1)"Y"(A$,1,1)"N"5550T(W6)T:V(W6)V(A$,1,1)"Y"1340:3:15((P1$)2):"EARTH TO ";84)12750001Rñ 7I)(DB(2I)21)48ƝDB(2I1)(.875D1(2I)(R).5)Y˝DB(2I1)(DB(2I1)36)3.6`НIuڝNN1:N640150{Pù16368,0:24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE";Qí(16384)12750001Rñ 2750001Rñ Qí(163RK(2I1)P180B8KA(2I)(.5K(2I)(R).5)TKA(2I)(KA(2I)21)4yKA(2I1)(.875K(2I)(R).5)KA(2I1)(KA(2I1)36)3.640400D1(2I1)040410RD1(2I1)P180BDB(2I)(.5D1(2I)(R).5)DB(2875D1(2I)(R).5)5˝DB(2I1)(DB(2I1)36)3.6<НIQڝNN1:N640150WPù16368,0:24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE";Qí(16384)12750001Rñ `:" TO CONTINUE";Qí(16384)12750001Rñ NKA(2I)(.5K(2I)(R).5)8KA(2I)(KA(2I)21)4]KA(2I1)(.875K(2I)(R).5)KA(2I1)(KA(2I1)36)3.6:40400D1(2I1)040410RD1(2I1)P180B:DB(2I)(.5D1(2I)(R).5)DB(2I)(DB(2I)21)4ƝDB(2I1)(.)(CE(2I1)36)3.6:404002DD2(2I1)040410hNRD2(2I1)P180B:DL(2I)(.5D2(2I)(R).5)]DL(2I)(DL(2I)21)4bDL(2I1)(.875D2(2I)(R).5)gDL(2I1)(DL(2I1)36)3.6:40400vK(2I1)040410RK(2I1)P180B:1)4*ƝDB(2I1)(.875D1(2I)(R).5)K˝DB(2I1)(DB(2I1)36)3.6RНI\ڝNN1k䝭N640150qPù16368,0:24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE";Qí(16384)12750001Rñdd)P180B*KA(2I)(.5K(2I)(R).5)FKA(2I)(KA(2I)21)4kKA(2I1)(.875K(2I)(R).5)KA(2I1)(KA(2I1)36)3.640400D1(2I1)040410RD1(2I1)P180BDB(2I)(.5D1(2I)(R).5)DB(2I)(DB(2I)2E MENU PROGRAM...":(4);"RUN HELLO"0>a1023,98>b:4);"RUN HELLO"V>a1023,9^>b:w>\ FLASH BAR ROUTINE>f16368,0:24:8:"PRESS ";::"SPACE BAR";::" TO GO ON">p(16384)12762320>zC"1) RUN THIS PROGRAM AGAIN,"::"2) RUN A DIFFERENT PROGRAM, OR"P=E:"3) END"{=F13:"PLEASE ENTER 1, 2, OR 3 ";:868=H61000:ZEZN=IZE0ZE462030=J:"PLEASE ENTER A NUMBER 1 - 3":62022=NZE1Ĭ=OZE362049$>P:10:"GETTING THZE4620306{m?_}~?@~`?@_O~zog>{K/{~{}>@}~?pA0_x??~{m?_}>_o>o{gxs_X_nfWO{]_>nwOo?~?o?x?ocO}{o_nn~{v{nn{{wnnO0?~}~{mw{}v_o>_o?_}v?_q_0_

{ox?a@}xx?8o{;?o{~_}~.wvsw?o@Go?}WZ<__;_;?xx>{m?_mv^??`@?`@?W~v[k>w-w.{~?{ 0`

o{wpg_X_nvW_{]_~nwoo|?o?x?o~_}?@{?|c@ooo}}`|a?l?~gO~n~{z{fn{{onl_ |~{mw{}no>_o?O}v?_?|/o?o}>_o>{ox? }xc?X_{{?ww~_>wv{w?o@o?}gY>_?=_}~?x?~>{m?_Uv^G_@X~nx1{~?G  wpO_X_lfW_{_>fwooq?o                  ,193,1.23,.1,27.8,.16@à 238,211,159,125,95,66,36,8,0,19331,36,8,0,193,01à .38,.9,.38,2.87,1.32,.93,1.23,.1,27.8,.16Xà 238,211,159,125,95,66,36,8,0,193DRCYCLE,CAR,TRAIN,PLANE,JET,SPEED OF LIGHTxà 2.5,3,9,50,60,90,420,990,186000à .38,.9,.38,2.87,1.32,.93,1.23,.1,27.8,.16à 238,211,159,125,95,66,36,8,0TURN,URANUS,NEPTUNE,PLUTO,THE SUN,THE MOONdà 56673000,25721000,48680000,390760000,797600000,1684000000,2706400000,3561400000,93000000,250000nà WALK,TRICYCLE,BICYCLE,MOTORCYCLE,CAR,TRAIN,PLANE,JET,SPEED OF LIGHTxà 2.5,3,9,50,60,90,420,990,18600X@CH(36):CV(37)CA"? ";ZN$:(ZN$)(((ZN$)))40003`B(ZN$)0ZN$"0"40006CZM:"THAT IS NOT A NUMBER - TRY AGAIN";:40010:40001FZM:868:CV1(CV23):ZN(ZN$):JCV1:36,CH:868:*Zà MERCURY,VENUS,MARS,JUPITER,SAwxo?~_|pn6|Xg]_cnw_opg?xw~xA?o/wu>o{{^o_k~s}wg?|{_ox<@}~??|_Oox?g}xG?go?~o@|<Awx6_o7`o?p>{m?_}v_?ppx?X_~zoo>{k/?{~s<}{}~[o>_o?_}v?~{m?_}?_o<o{~ox_8onV;W[]_]nw_ox?|g?~xc?oox p|ao?lxg}sO{_qq~{nqan{`xqq??7????????'?'????'''OIImIIIIII%%---------7?>??>??????,,',%$%,--$$>>7>??????????>7>?',,46$,=$<<'/%=/%-'$$$4666&$$$$>->7->7-76.56>&-/.---------,%-%-------%$$<<7?7>?'?<'????????>77?>?7'%-,--%---,-$-,%-$---567?>?>???/$-,%%-,-------.5-.5---%%,$%-556666>>7?>??>?>????7>?>?/--57>7/--%,%-%$?<'?'''?>>.5[II??/--66>6---,---55>>????????/----->55-5--,-,,$<<7.5-%-,----------%-,-.5>7?'?$-,-.5--%<$??<'',,--?'5?--.6/,-,,--?<>77..--?>,-,$//.-.--,--$$,%-%%%$''?'??>?>>6...-.%$?-%???/------=???/$$%%?=$-,%%-5>>??---->>>...>&-$=$--,-&.-N--.-..6>>>?>?'?'''$%%-m6666$$6&$---??????,-----=??/-?'$<;?>?65>>?''$<$,$-,%555&<<'<<'?'=/77-.$-%-%%%$''?'??>?>>6...-.%$<,$%,%>76..-,-%-.?.--=?7>..5>7.6??.---$$>???'--%<<$%%-,567?.66$$,,6-.-.>>%$.%'?<$'6%$'%,,557.,$<<''?7?,7>>7'<<6..-5$,$-<$=?=<,$?,--=5?'<-5>/-5557?>-$--,-,,$$''?'??>?>>6655-5--MIII)%-,<<'?>775-%$??''<,,%-?/,$'?<<7---$.-56?>???5666&$$.--=??????---%$$$6%'--------5??????7------5?????7-----5????7-----7?????7-----5?6.$$$$,$$$$,$$$$$$$$$4667$$$$?77&?77>>?=,,-6>??.->?7--->??756..%$$$$$$,--%??/%-------%$$$<>&-/<7?6--&$$6>=???,,%-5?>>??%>6'%7><>>>>>>.-??'-%$'$$-.6666$$$$-,$'666666/$$$$$$$<>>6675.66556.555555---..$$$$$$$$$$$$$$$$$$$$66>??7--5%>???7---5?????,56??'------>?????7------5???????.------5???????.------5????????7--------5?????????7---------5>????????/,--------6>'/-???????7-------5????????.-------5???????.------5?????????--->??/&-I%6,MIIIIIIII)4&mIIIIII)-----???,,.??65%5lIIIIIII ,,,-..677?==<&?--.6.6.65.6-65555-.5-.-.-<_o7_o?p_0G~~{ p{}^o~_o?W}w?wn?w>_o{wgog?wox?o@?~0v`>|>`}~?x>{m?_9v^}xA?ooo}];?oogy{s~nnun{~n{{nnfw?~oxp67\_{]qcfoxG?G|}x?X_s;ww|_>?gv|_x?o~?~}?__y_@_8{~o?}w[>_o7oo??~wp`}x_xs~xXc?p~_<[}~?c{m?{>_o.{wwoO?w{nsox|?xO>n?_}x^|xA?ooo}@?Wt?~Ox?x|}?OO|O@_~{~o?}w[_o7wo?k{m?_}v_?|x~0W]v[k6wmo.{~[mw{}~^~_o?]}w?y{ <`?_o6pwsownw_opq?xg~xA?oOoy]_{??oogO{}qqpnpqan`{qqqwqq`}Oox>?|}?~?xp~@|_>?7{ox?s}|q?oo~o@_~{~o?}w[._0{o?g]{m?_}v_?~~~?~PO>zog>{k/{~+]{{}~]>_o?^}v?|{m?_}?_o:o{ 膢 ȱ " <67 L  8ij v vo>+35000r-R8((T(175R9)100))100:R1R8:22:GT11840.GT1:W63200,150:20500:18350X20025R9:31W61İ32000:18452W6118453W63X,1505868:MRV15:(MR1)81:20500:220 X2703030:3:X,150X5,150HMRV5:MRV1810k(MR1)82:R1;" ";:R1R1R8u1811(MR1)82:((1)Y(MR));" ";4:X,150X5,150:22::20,15015,150:(V1)82:T;" ";5000&R91(W62.1700@T(D1W2):T601620-JV5:1800FTT(T60):T601640T^V4:1800lhT(T60):V3:1800T((D1W2)24):T3651750V2:1830T(((D1W2)24365)):V1183035000  R8(T9100)100:R1R8:270,150265,150:34,2X110:W:XW51480W9W.X:1W9,6050a:X110:P$::X110:DW:XW51508kD1DW:X19:P$:P$P2$1520W6XX:X19:DW:XW61550W2DW:X110:DW:XW51590"W1DW6:P2$"SPEED OF LIGHT"(A)1375>Z1:"ENTER A WHOLE NUMBER BETWEEN 1 AND 9":1368V_31000:P2$""1340ud:3:21,50:1187,40:30i34,20nP1$"THE SUN"1430sW127.8x:1267,80:W59:1490:X110:P$:P$P1$1450W5XX:X138:P$:::"BE DETERMINED."I2:"HOW MUCH DO YOU WEIGH,IN POUNDS";:40000:POZNb<:7:32,12:33,28:F:X120:P$::X19:P$:A(X)91365PX;" ";P$UX32,0:33,40:5:868:5:"HOW WOULD YOU LIKE TO GET THERE"; Y40000:AZN:A0A10A 32,0:33,40:5:868:10:"WHERE WOULD YOU LIKE TO GO";a 40000:AZN:A0A11A(A)1300 1::"ENTER A WHOLE NUMBER BETWEEN 1 AND 10" 1280 30000:P1$""1260 A$""1380 B21340:5:"YOUR WEIGHT ON ";P1$;" WILL ALSO"12);"KINDS OF TRANSPORTATION") 34,0Z 10:868:10:"WHICH WOULD YOU LIKE TO DO";v B$:B$"1"B$"2"1240 3:15:"ENTER 1 OR 2";:1220 B(B$) :7:33,15:32,25 : X110:P$:A(X)0A(X)101279 X;" ";P$ ;,: V20500E `"YOU CAN TRAVEL IN ANY OF THE FOLLOWING":"WAYS:"i t:X110:P$::X19:P$:P$, ~P$"TRAIN"P$"JET"1170  :20500 34,13: :10);"1 TRAVEL TO DIFFERENT PLACES": 10);"2 TRAVEL USING DIFFERENT" YOU THE TIME IT"> "WOULD TAKE TO GET TO ANY OBJECT IN THE"U $"SOLAR SYSTEM.": +"IT WILL FIGURE THIS AT THE POINT THAT" ."THE EARTH IS CLOSEST TO THE OBJECT. " 8"HERE IS A LIST OF OBJECTS THAT YOU CAN" B"GO TO:" L:X110:P$:P$)"YEARS":T$(2)"DAYS":T$(3)"HOURS":T$(4)"MIN.":T$(5)"SEC."^ ,1:3:0:(20000)1711020 D$;"BLOAD PLANETT":20000,171 10:10:"WHAT IS YOUR FIRST NAME";:N$ :2:"HI ";N$;", LET'S TRAVEL THROUGH SPACE.": "THIS PROGRAM WILL GIVE Yd COPYRIGHT MECC 19796n SOLDIST 9/21/79 FPCx AUTHORb ASSOCIATED FILE PLANETTl::v8192D$(4):ZM24:D$;"NOMON I,O,C":232,0:233,64A(10),V(10),W(10),T(10),Y(5)Y(2)365:Y(3)24:Y(4)60:Y(5)60> "T$(5):T$(1           h֭yxA?ooo}={{^o^k|sg~np{p{~`{{aqjwxO8oJV[_{]n]vox?>pp}xO?X_{{@ww~_>?wvyx?o`}?_RAM...":(4);"RUN HELLO"%)1023,9-*:pPù16368,0:24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE";Qí(16384)12750001R×: CONTINUE";Qí(16384)12750001Rñ )(4);"RUN HELLO")1023,9$*:gPù16368,0:24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE";Qí(16384)12750001R×: A:"PLEASE ENTER A NUMBER 1 - 3":43022Z31ĺ(4);"RUN URSA"ZE343049:10:"GETTING THE MENU PROGA520":520"URSA"SPù16368,0:24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE";lQí(16384)12750001tR×: ,1,1)"N"43030:"PLEASE ANSWER WITH YES OR NO":43005(1023)12343050:10:"GETTING THE MENU PROGRAM...":(13);V(37)/A"";ZN$:(ZN$)(((ZN$)))40003LB(ZN$)0ZN$"0"40006CZM:"THAT IS NOT A NUMBER - TRY AGAIN";:40010:40001FZM:868:CV1(CV23):ZN(ZN$):JCV1:36,CH:868: END OF PROGRAM::(13);(4);"BLOAD CHAIN,:"INDICATED ON THE CLOCK IN THE SKY.":"MOVING 17 HOURS IN A CLOCKWISE"::"DIRECTION FROM 1 PM, WE GET A TIME OF "::"8 PM."50000"THEREFORE, FOR OUR DATE AND STAR "::"POSITION, IT IS 8 P.M."@50000J43000'@CH(36):C4, WE DO NOT HAVE TO SUBTRACT"$ = "ANYTHING FROM IT."H 50000 "AS A FINAL STEP, WE SUBTRACT OUR NUMBER"::"FROM THE NUMBER ON THE CLOCK IN THE SKY." 9:"WE DO THIS BY MOVING 17 HOURS IN A "::"CLOCKWISE DIRECTION FROM THE TIME"&"SINCE THE 16TH OF MAY IS IN THE LAST"::"OF THE MONTH, WE ADD 1 TO THE 16 TO "m :"GET A RESULT OF 17."x 50000 "IF THE NUMBER IS GREATER THAN 24, WE "::"SUBTRACT 24 FROM IT.": 12 "SINCE OUR NUMBER, 17, IS NOT GREATER"::"THAN 2RY IS 2, ETC.,"- F"MAY IS MONTH NUMBER 5."5 K10q P:"WE MULTIPLY THE MONTH NUMBER BY 2 "::"AND ADD 6." Z20:"IN OUR CASE, 5 X 2 + 6 = 16" d50000 n"IF THE DATE IS IN THE LAST HALF OF THE"::"MONTH, WE ADD 1 TO THIS NUMBER."P x9:\ 7:"LET'S ASSUME THAT IT IS MAY 16TH AND "::"THAT WE JUST SAW THE STARS POINTING TO " :"1 PM. WITH THAT INFORMATION, WE CAN "::"TELL THE REAL TIME." (50000 <4:"FIRST, WE NEED THE NUMBER OF THE MONTH."::"SINCE JANUARY IS 1, FEBRUAF" " THE MONTH, ADD 1."R ::"3. IF THIS RESULT IS GREATER THAN 24, "j " SUBTRACT 24." ::"4. MOVE THIS MANY HOURS CLOCKWISE FROM" " THE TIME SHOWN BY THE STARS" 50000 4:"NOW WE WILL TRY A SAMPLE COMPUTATION."v:::255:ZM24D2:"BELOW IS THE FORMULA FOR COMPUTING ":"ACTUAL TIME, GIVEN THE POSITION OF THE "::"STARS AND THE DATE"::"1. MULTIPLY THE MONTH NUMBER BY 2 AND"" ADD 6." ::"2. IF THE DATE IS IN THE 2ND HALF O     z#    ԠΠ Ԡ ٠Ϡ"ĠҠǠŠ ̲NԠ8 Բ!Գ"ԴԵ ϠԠ͠в̱ӠԠyW$(T)TD$;"CLOSE WORD FILE #4" OCK "N$|  LIST OF THE WORDS 200 :(7) R21R1 W$(R2) R2 : "HIT THE RETURN KEY TO CONTINUE." " ";Q$  30D$""8D$;"OPEN WORD FILE #4,L40"CT1RcD$;"READ WORD FILE #4,R";TnW$(T);F$  30UWANT ";MND(82) EXIT FROM PROGRAM 200 D$;"UNLOCK "N$ D$;"OPEN "N$/ D$;"WRITE "N$; R21RG W$(R2)O R2c D$;"CLOSE "N$v D$;"LOPEN "N$",L40" R21R5 D$;"WRITE "N$",R"R2E W$(R2):D$M R2a D$;"CLOSE "N$t D$;"LOCK "N$z  LIST OF THE WORDS 200 :(7) R21R1 W$(R2), R2 : "HIT THE RETURN KEY TO CONTINUE." "" "PLEASE ANSWER 'YES' OR 'NO'.", 2505A D$;"UNLOCK "N$V D$;"DELETE "N$o "'";N$;"' DELETED!" D11500:D 30  N$;"NOT DELETED!!!" D11500:D 30 EXIT FROM PROGRAM 200 D$;"UNLOCK ";N$ D$;" 20204R3R2R(>W$(R3)W$(R31)B@D$;"OPEN "N$;",L40"]BD$;"WRITE "N$",R";R3iDW$(R3)qFD$yHR3MRR1R2020 DELETE A FILE :(4) "DO YOU WISH TO DELETE ";N$;:Q$ (Q$,1)"Y"2510 (Q$,1)"N"2550"D TO ?";JW$(R2)-LD$;"OPEN "N$",L40"GND$;"WRITE "N$",R"R2WPW$(R2):D$aT1520| DELETE WORD OR WORDS200"WORD YOU WISH DELETED?";W$W$"STOP"30R21R1W$(R2)W$2100 R2"'";W$;"' NOT FOUND."WRITE "N$",R";RW$(R)#D$8W$(R)"STOP"30B$RR1L.1030_ CHANGE WORDSh200"WORD YOU WISH CHANGED ";W$W$"STOP"30R21R1W$(R2)W$1600R2"'";W$;"' NOT FOUND.""1520@"'";W$;"' CHANGERD #";R;" ? "; &W$(R)2 0D$;"WRITE "N$",R"R= :W$(R)E DD$\ NW$(R)"STOP"525p XD$;"CLOSE ";N$x b30  ADD TO THE LIST 200 "TYPE 'STOP' TO END INPUT" "WORD #";R;" ? "; " ";W$(R) D$;"OPEN "N$",L40"D$;"$ R0# D$;"OPEN "N$;",L40") 3 RR1M D$;"READ "N$;",R";RX W$(R)o W$(R)"STOP"210 D$;"CLOSE ";N$   CREATE A NEW WORD LIST R0  "TYPE 'STOP' TO END INPUT" D$;"OPEN "N$",L40" RR1 "WOHE WORD LIST"0 ~:"7. EXIT FROM THIS PROGRAM"f (22):"ENTER THE # OF THE MENU ITEM YOU WANT ";M M500,1000,1500,2000,2500,3500,3000 (22):958 "ITEM ";M;" NOT AVAILABLE (TRY AGAIN)"; M (21):958 140 D$;"UNLOCK "N-----"3 P"1. CREATE A NEW WORD LIST FOR A GRADE"] Z:"2. ADD A WORD OR WORDS TO A LIST" d:"3. CHANGE A WORD OR WORDS IN A LIST" n:"4. DELETE A WORD OR WORDS FROM A LIST" x:"5. DELETE THE ENTIRE WORD LIST" }:"6. LIST THE WORDS IN T;C$ C$P$29D :"INCORRECT CODEWORD. ACCESS NOT ALLOWED!":d :(3):"LESSON NUMBER?";G$ :(13):"WORD FILE MAKER" #(3):(13):"LESSON NUMBER ";G$ (N$"WORD FILE #"G$ <(5):(18):"MENU" F"-----------------------------------1 D$""RF0+D$;"NOMON C,I,O"8 W$(100)D:(12)o"THIS PROGRAM WILL CREATE AND CHANGE":"WORD FILES. TO USE IT YOU MUST KNOW A":"SECRET CODE WORD."P$(84)(69)(65)(67)(72)(69)(82) :"CODE WORD? "     :C$"XYDB."0E$"EQFN/":G$"IWCMZ":H$"XDHZC"6<aA$"2S28K":B$"K83D3":C$"D3J7J"E$"7JF4F":G$"9L9F5":C$"J6J;O" D"URLIT". &E$"FGTUD":G$"GEYRI":H$"HTREYL"4 0: :_ DA$"YAHRW":B$"QSJIP":C$"WOKUQ" NE$"OWPFL":G$"PEGTO":H$"DORWQ" X b lA$"JVAPU":B$"TBINQ":C$"YMDML" vE$"QVFBN":G$"WBGME":C$"ONHVR"   A$"ZU/PX":B$"KTSVC";:TY$: TY$"Y"ĺ:120+ TY$"N"Ā1 7 \ A$"ASDFI":B$"EJKL;":C$"SEFIA" E$"EK;DI":G$"SEJLI":H$"FSDAJ"   A$"RIJUA":B$"DEKAI":C$"FREUS" E$"LUARD":G$"SRFUI":H$"JIL;E"   A$"SIJUH":B$"HYKEG":C$(WR$,X,3)ĺ(T$,X,3);::" SHOULD BE ";::(WR$,X,3);::" ":E hL rX |:"TRY THESE LETTERS AGAIN.":I11000:I:140 :"WOULD YOU LIKE THE SAME LETTERS AGIN?";:MM$::MM$"Y"140 MM$"N"410 :"WOULD YOU LIKE DIFFERENT LETTERS?" : "T$( ,WR$X$Y$K$Q$Z$V$_ 1 ADD BELL ON TOP OF EXCLAMATION MARKS IN LINE 310 6T$WR$ĺ:"YOU SCORED 100%. VERY GOOD!!!":390 @T$WR$330 J:"OOPS!!":S16336:JJ155:B(S):SOUNDBB:JJ: TX1183? ^:(T$,X,3)90  X(5(1)1)- X$(A$,X,3)@ Y(5(1)1)R Y$(B$,Y,3)e Z((1)5)1w Z$(C$,Z,3) Q(5(1)1) Q$(G$,Q,3) K(5(1)1) K$(E$,K,3) V(5(1)1) V$(H$,V,3) X$;Y$;K$;Q$;Z$;V$,d THIS IS TYPING PRACTICE<h PROGRAM BY GA LAWRENCE^i:"THIS IS TYPING PRACTICE."n:"TYPE THE LETTERS IN ONE LINE WITH "s"NO SPACES BETWEEN LETTERS.":x"WHAT LEVEL OF DIFFICULTY? (1-7)";:DF:DF DF450,490,530,570,610,650,6     줰䮲륥Q9O/Q) WjB`O~5'Q 䯭䮡ޜݜݞGg` ` `嶡䡯z~" `` Oڵw۴Nv L`xw8OPL# (` 40!(L 4LdF`  %L"wLh X{gggggg'(dgxkg~9g'7(*䮥G 0 #gMghghPcQ)Wqqqqhhq`uuuQĠ 5EMҠL Šō?FِLÈϚΠ ăκ f ٢  ٦Τ ȹɀI ȄȹH h3 oLP O䯭䮡𥴳\@`` ~3`Gg壡yi壡yi` @G>W']5Kgvq7ϠGX͠LϠ٠SGϠDĠHSĠNSĠTܙݙᙯ` ??<<<<<<<0UUUUUUUUWB oTMɅ"3J[NSJIfmzq# [$NYP;#o6#"#!0 9@0Ӷ:Pyإ<[(N܄iȢٚ . y$IqܤݐLM͠1FLJܹ/ݾLuc ăܪȱ L[ĨP?xO_ڹo  ʤ  Y YoܹݾЇ`TP@xL` Ιϙ_o$0 8 P# o ΅ڥυ e epݕ` 4LˎL$ `  rPՆϦ ` ΅υȩ ` Τ PڵxۥΑȥL`hh$ F`` ͏%ֈ`ʤZA^ܙ ݙ0  m7; xx ԅբ H 0  $ ( x$0  xx 0$FԨֹ)U h)װ H 듥֐ι L؆l`w0P`fLPεϵxϱHȱ΅hΈ` J  P` Y $0`  'ʅ˅LM&ȱϰqȥȥ`FLʥM˥J̥Kͩ`Lkȱ0@hJHȱШhЄӠȱ0I@iHeШiH˰hhЈЈ͑Ј̑ЈЈ0JKЬ@iHe eѕxh$0X~")XȔ) F*Ȇ0LJɢ  Ȉ ϴX)HЄ ȹ)eHe0hޤȄ h󰩠ɩch cɰ$0 $` dq  u  mʥ` ȹ0 L uߙ`` ӎ$0LL*iS 00)ȆȘHJI@hL`ȩ)?Jжi?oiO iȱ) zȵх 8 05  o ` l3 ΃3` 4J G 4&(JJJJ) ` ӏ F٩ $  ΃Ȣ ii)ɰL ̥͐Eʑ˥ʥ˰ਈ$ u~`ꠀЕ x ت3 Q3ؕxQεy NvNδPPPL#Q8yڅ`Sε{ϵQڵyxȔPMuHOwh(VP`΅h(OM ׁL6 T&ϐ eڅeۅ &L~ 畠(LoU [΅ڥυ džة * * *     % 0LH΢QPHΪ0h$0 )?i h](Њ Px+L 4P 䏕xL# 48` PxL PeHxeH˰iکeۅȱhڙ`=i?BC , LʩM˩I6bVcWdXeYfZg[h\i]j^k_L L3L`) #L $  `  v mL;ʅ˅LM  m       L``F`$ ܪȱ Lܤ`Ś25 a0 LJLJKە LkLMNܕ`LΥΥLMLʥMː ʥ˰JυKL  8Mϕڥ۰եڅʥۅ , ` :L΄<Ȅ>=?`ʕ>?>`8M˕   , ` ăL: i@ &N&O ϕLz JKLυML LMJυKLˎ qL ȩ` 6 6P`JLKMLxL L6 L[L JLKMMLILLILLLLy 2L,PQ܅x݅yLÈ آ8ЕNЕKʵ˕{ TL~&&&ڥې څΈ` l 4Ȑ,` 40L 4Ȑ-` 4(L(n ă ărLa ?&0ΰ` ΔL 4΅` ȑ` l΅υLD L4 䎴xPiڄeΕPeϕxPȵxڰL# N ONi)OO3C$(70)"SWITZERLAND"'C(70)3:C$(71)"SYRIA"FC(71)5\C$(72)"TANZANIA"hC(72)4~C$(73)"THAILAND"&C(73)50C$(74)"TUNISIA":C(74)4DC$(75)"TURKEY"NC(75)5XC$(76)"UGANDA"bC(76)4lC$(77)"UPPER VOC$(62)"ROMANIA"JC(62)30TC$(63)"RWANDA"<^C(63)4VhC$(64)"SAUDI ARABIA"brC(64)5w|C$(65)"SENEGAL"C(65)4C$(66)"SPAIN"C(66)3C$(67)"SUDAN"C(67)4C$(68)"SURINAM"C(68)1C$(69)"SWEDEN"C(69)ORWAY"C(54)3(C$(55)"PAKISTAN"4C(55)5HC$(56)"PANAMA"TC(56)2jC$(57)"PARAGUAY"vC(57)1C$(58)"PERU"C(58)1C$(59)"PHILIPPINES"C(59)5"C$(60)"POLAND",C(60)36C$(61)"PORTUGAL";C(61)3@46)4C$(47)"MONACO"%(C(47)3:2C$(48)"MORACCO"F<C(48)4^FC$(49)"MOZAMBIQUE"jPC(49)4ZC$(50)"NETHERLANDS"dC(50)3nC$(51)"NICARAGUA"xC(51)2C$(52)"NIGER"C(52)4C$(53)"NIGERIA"C(53)4C$(54)"NC$(39)"KUWAIT"C(39)5.C$(40)"LOAS":C(40)5OC$(41)"LEBANON"[C(41)5pC$(42)"LIBERIA"|C(42)4C$(43)"LIBYA"C(43)4C$(44)"LUXEMBOURG"C(44)3C$(45)"MALAYSIA"C(45)5 C$(46)"MAURITANIA"C("/B "AND INCLUDES A SECTION ON TELLING TIME"EC "BY THE STARS." D TELLING TIME"mC "BY THE STARS." _"URSA"A "URSA IS A TUTORIAL ON CONSTELLATIONS"B "AND INCLUDES A SECTION ON TELLING TIME"C "BY THE STARS." TENYA"tC(38)4~NORTHERN" "MINNESOTA."= "SOLAR DISTANCE","SOLDIST"h "SOLAR DISTANCE TEACHES CONCEPT OF" "DISTANCES BY HAVING STUDENTS MAKE""'TRIPS' TO PLANETS IN VARIOUS VEHICLES."@ "URSA","URSA"A "URSA IS A TUTORIAL ON CONSTELLATIONS "ODELL LAKE","ODELL1"A"ODELL LAKE SIMULATES A FOOD WEB IN "i"ODELL LAKE. THE USER TAKES THE" "ROLE OF A FISH AND TRIES TO SURVIVE." "ODELL WOODS","ODELL2""ODELL WOODS IS A FOOD WEB SIMULATION" "INVOLVING ANIMALS FOUND IN VIDES DRILL AND PRACTICE ON" KR"ESTIMATION IN ADDITION, SUBTRACTION,"{S"MULTIPLICATION, DIVISION, AND PERCENTS."  "MATH GAME","MATHGAM" "MATH GAME IS A GAME WHICH PROVIDES DRILL" "ON THE FOUR BASIC OPERATIONS." " "$"0"540* ZN$"D"(ZN$,1)"E"ZN0:a ZM:"THAT IS NOT A NUMBER - TRY AGAIN";:550:500 ZM:868:CV1(CV23):ZN(ZN$): &CV1:36,CH:868:  "ELEMENTARY SCHOOL VOL. 4, VER. 2.0",6 P "ESTIMATE","ESTIMAT"Q "ESTIMATE PROR YES OR NO";:1:390( Q0QN1470u 22:1:"PLEASE ENTER A NUMBER IN THE RANGE":"OF 1 AND ";N;".":16:280 ::10:"GETTING THE PROGRAM..." D$;"RUN ";N$(Q,2) CH(36):CV(37) "";ZN$:(ZN$)(((ZN$)))520 (ZN$)0ZN hQ0QN1380R r:"PLEASE TYPE A NUMBER IN THE RANGE OF"::"1 AND ";N:340{ |:N$(Q,3):18:N$(Q,4):20:N$(Q,5)  23:"DO YOU WANT ANOTHER DESCRIPTION";:868 A$ (A$,1,1)"Y"330 (A$,1,1)"N"ė:280 "PLEASE ANSWET.":"(IF YOU NEED DESCRIPTIONS, TYPE 'D'."::"TO END, TYPE 'END'.) ";:868V "490g ,ZN$"D"330 6(ZN$,1)"E"Ĺ1023,9::: @QZN:450 J34,15:16: T16:"TYPE THE NUMBER OF THE PROGRAM YOU"::"WANT DESCRIBED ";:868 ^490:QZN,I,O" 1023,123" ::255:, T$,N? 1:20(T$)2G T$h 2:11:"AVAILABLE PROGRAMS"o 4z T1N C15 N$(T,C) C T;" ";N$(T,1);:20 T2(T2)ĺ: TM 16:1:"TYPE THE NUMBER OF THE PROGRAM YOU WANF  (C) MECC, 1979* D$(13)(4)522016U:::255:(1023)123100:16302,0:::D$"BLOAD ELEMENTARY LOGO":16304,0:16368,0(16384)12827JJ1:J20030(dZM24nD$(13)(4)xN$(20,5) D$;"NOMON,C           THE":"MORE POINTS YOU RECEIVE.":slu::"YOU WILL BE GIVEN THREE TRIES.":::"BONUS POINTS ARE GIVEN AT THE "qu"END. THESE POINTS ARE DETERMINED ":"BY YOUR AGE, LEVEL AND THE NUMBER":"OF WRONG ANSWERS."u::" L O T S O F L U C K ":TH PROBLEMS.":?uDu"YOU CAN CHOOSE FROM ADDITION, ":"SUBTRACTION, MULTIPLICATION, DIVISION ":"OR A MIXTURE OF PROBLEMS."Xu::"YOUR AGE AND LEVEL WILL DETERMINE THE ":"PROBLEMS YOU RECEIVE.":20500#bu3:"THE FASTER YOU ANSWER THE PROBLEMS0940!Q(ZN$)0ZN$"0"20950lQ:ZM:"THAT IS NOT A NUMBER - TRY AGAIN";:868:20960:ENT9ENT5:wQ20915QZM:868:ZV1(ZV23):ZN(ZN$):QZV1:36,ZH:868:0u:3:u"IN THIS GAME, ANY NUMBER OF PLAYERS":"CAN COMPETE IN MA"SPACE BAR";::" TO CONTINUE";9(P(16384)12820520U)P(16384)1283220530`*P20510r2P16368,0::Q NUMERIC VALIDATOR QZH(36):ZV(37):ENT9ZM20:ZHZH(ZN$):20920QZN$:ZN$""İ20960:20915Q(ZN$)(((ZN$)))2" ";:(0):16368,0:203601O16368,0:20360COZZ$"":20430vOZZ$ZZ$(ZZ):(ZZ);:16368,0:ZCZC2:20360OZN$ZZ$:ENT9:20900OENT5ZZ$"":20360OENT0:ZCZC39PP SPACE-BAR ROUTINE P24:7:16368,0:"PRESS ";::F WENT OVER TIME LIMIT) ,tOZTZT39:958F~OZZ$"":ZC0:16368,0iOZCZC1:ZCZTZC9984:20476O(16384)12820360OZZ(16384)128:ZZ1320470OZZ820460O(ZZ$)020440O(ZZ$)120450OZZ$(ZZ$,(ZZ$)1)O(0):" AND ";NB$;"."s:11:"INDIVIDUAL SCORES:"::3:"NAME";:17:"BONUS";:34:"TOTAL":34,(37)2::1621LO ENTER STATEMENTVO ENTRY CONDITIONS - ZT= # OF SECONDS TO ALLOW`O EXIT - ZA$=INPUT, ZC= # OF SECONDS IT TOOK, (ZC=-256 IE WAS ";G7;", SCORED BY"EK90:NA$"":NB$"":B1A:T(B)G71728gK9K91:K91NA$B$(B):1728(NA$NB$)35ĺNA$",":NA$NB$:NB$B$(B):K8K81:1728K92NA$NA$", "NB$NB$B$(B)B:NA$;:NB$""ĺ".":1735(NA$NB$)34$(B1):T(B1)K8:B$(B1)K8$-Y:K9016218hB1Avr3:B$(B);:18:(" "(B(B)),3);:35:(" "(T(B)),3)(37)20(BA)İ20500:B:23:34,0:20500:43000G7T(1)B2A:G7T(B)G7T(B)B:A$" ""THE HIGHEST SCORT(F)T(F)P:P:21:"YOUR TOTAL SO FAR IS ";T(F):20500A @F:V T:"THAT'S ALL FOR THIS ROUND...."::B1A:B6(20W(N(B)W)20W5D(B)C(B)):T(B)T(B)B6:B(B)B6::1700UK90:B1A1:T(B)T(B1)K9K91:K8T(B):K8$B$(B):T(B)T(B1):B$(B)B:MRĢ(37):" CORRECT!!":958:1560[ (37):" INCORRECT":958:TRYTRY1:TRY31540e 1460 :"YOU HAVE USED YOUR THREE TRIES. THE ":"ANSWER WAS ";R :19:"YOUR SCORE ON THIS PROBLEM WAS ";:P(50((P10.5)100)50):P0P17 , xRH:HG:GSU G;E$;H;"=.....?";:868:ZT30:N(F)N(F)1:20300:ZC2561480` PP30 (37)1:" TIME";:958:(7);(7):TRYTRY1:TRY31540 :" PLEASE TRY AGAIN.":VV(37):DDD11000:DDD VV:868:VT:1420& PPZC:MZN)31)- G((1)(I4)JK):GG((1)J)Z H((1)(I4)J(K)):HH((1)351){ GHGG((1)KH2):1240 1340 G((1)I(J)):H((1)I(J)) G01280 (SGH <E1RGH:1420 PE2RGH:1420 dE3RS:1420: V1W" F1A:TRY1:P08 :5:"ROUND #";VJ .IC(F):JD(F)m 87:3:B$(F);" : ";:VT(36)1 LE15E((1)4)1 `E1125,1130,1135,1140 eE$" + ":1160 jE$" - ":1160 oE$" * ":1160 tE$" / " E21280 K((1zc COPYRIGHT MECC, 1979<d MATHGAME 8/23/79 FPtf AUTHOR: C.NEUENSCHWANDER THIEF RIVER FALLS, MN. g LANGUAGE: APPLESOFTB$(35),B(35),C(35),D(35),T(35),N(35)X3200030000 DD0:E10:E5E15 B1A:T(B)0     #(A$,1)"N"đ:::55555M#(A$,1)"Y"X(0):600,9:(4);"RUN ODELL1"W#9176'16368,0:24:13:"PRESS SPACE BAR";'(16384)12710010'0:E1E2,E3:ME4,E5:*:::(9):"REMEMBER A ";A9$;" WILL"::"EAT A ";A$;".">*:"NOW FOOD ":R#"AND USED YOUR ENERGY WASTEFULLY."::" YOU STARVED TO DEATH."c#10000:9175#"WHY CHASE FOOD AWAY?"##"THAT'S RIGHT!":#"YOU CAN'T SURVIVE ON THAT TYPE OF FOOD.":##:12:"DO YOU WANT TO TRY AGAIN?";A$U CAN NOT KILL THIS ANIMAL AND":"YOU USED A LOT OF ENERGY NEEDLESSLY.":ss#"YOU GOT AWAY FOR THE TIME BEING.":v#"NO.....THAT WAS THE WRONG MOVE.":#"YOU HAVE BEEN SUCCESSFUL.":#C30ı#:::(10):"YOU PASSED UP TOO MANY CHANCES AT 180,118:X1801002:3:11X,1006x0:11X,100:XGy3:11X,100Xz10000:9175{(#"YOU WASTED ALOT OF ENERGY":F#"THAT FISH JUST ATE YOUR LUNCH.":Z#"YOU ARE GETTING HUNGRY...BETTER EAT"[#d#"YOU GOT AWAY THIS TIME...":In#"YO2:3:MX,E5:4180X1,118:08vMX,E5:4180X1,118GwX1X12:Xzx3:4180X1,118:E14:E2180X1:E3118:E460:2A4(100(1))205702d0:ME4,E5:X1001702:3:19X,100:0i19X,100:j"AN OTTER WILL EAT A FISH.""n0:4168,106:XE42202:3:10X,Y3<Z0:10X,Y3:X:10000j[:::10:"AN OSPREY WILL EAT A "A$".":\"TRY AGAIN":10000:91750:ME4,E5M9:XE41003:3:MX,E5:0:MX,E5:XE4120:5715p0:4180,118qX10uXE460D0:4180,118FX118@IY1801681:3:4Y,X:0:4Y,XMJXX1:Y_L3:4168,106~MA23E14:E2168:E3106:NM8E41705790OM95800P0:8E4,E5SX(168E4)10:Y6070:3:8E4X,YU0:8E4X,Y:E4E4X:Y!X0:4$"CAUGHT BY A FISHERMAN.":10000.9175b::::(13):"THIS WAS PART OF A FISH TRAP":"YOU WERE CAUGHT....TRY AGAIN.":10000:9175|0:4180,118~X18017023:16X,93:0:16X,93:X3:4170,118:E14:E2170:E3118:118:3:5180,118*E15:E2180:E3118:<0:4180,118XXE2702:3:16X,93k0:16X,93:X100((1))11550073:4X,114:E14:E2X:E3114:A2250110:1730,50:3:1830,50:"WITH THE INSECTS WAS A HOOK. YOU WERE",Y:0:4X,Y:XX2:Y' 3:4168,106D A24100(1)1193050] E14:E2168:E3106: "YOU DID NOT MAKE IT THIS TIME":5710 0:4180,118 X180:Y1181402:3:5X,Y:0 5X,Y:XX4:Y 3:5X,Y:E15:E2X:E3Y:0:4180,00 A20& B1İ9100:10000:300< 9060:10000:300i :21:"NEAR THE SHORELINE IS AN OTTER," R194:R2110:R395:A23:M11:40000:12000 B4000,6450,6450,6500,6500 9100:10000:300 0:4180,118 X180:Y1181101:3:4X7 :21:"AT THE SURFACE LIES SOME ANIMAL PLANKTON,"S R160:R2100:R394:M13j A22:40000:12000x R51:505 :(21):"YOU SEE AN OSPREY CLOSE TO THE SURFACE," A24 R1100:R2200:R360:M9:40000:12000 B4000,3000,5700,5700,57,6000) R50:B4İ9100:C0:10000:300P B3İ9050:CC5:10000:9150:300x B5İ9170:CC10:10000:9150:300 9000:9050:CC10:10000:9150:300 DB4000,3000,4500,5500,6000 FB3İ9173:10000:300 GB4İ9174:10000:300 N524S11 JSS(S2)310 TS2- YS(S1)S:S16 ^S11F cS1450000d hS(S1)500,1000,1500,2000 :(21):"YOU SEE WATER INSECTS AHEAD OF YOU," R160:R2100:R390:A21:M12:40000:12000 A520,520,520,520,580,580 B4000,3000,4500,5000X  :(21)A(600)'C(601)8X1A:A$:# "WHITEFISH","CLUB","BLUEBACK SALMON","RAINBOW TROUT","MACKINAW TROUT","DOLLY VARDEN"C(326)S(4)E2180:E3118301,S1S11:355-S1146S(4(1)1) @S21         10:2LX1101242:0:5X,118:3:5X2,118:X^Q0:ME4,E5:XE41146:3:2X,118:0T2X,118:3:14X2,118:0:14X2,118V3:15X4,118:0:15X4,118:X0:5126,118:3:2114,118ZE12:E2126:E3118:E4114:E5118:M2: @0::7X,Y:0`7X,Y:XCc3:5E420,118:E15:E2E420:E3118:Ul0:5110,118bm2E4,E5nX0220E44:3:7X110,100:3E4X,110:0p7X110,100:3E4X,110:Xq3:3E4X,110:M3:E4E4X:E5110r3:5X110,110:E15:E2X110:E3114:E5118:M2:p0:ME4,E5Kq3:XE41006:2X,118:0:2X,118:3ys14X2,118:0:14X2,118:3:15X4,118u0:15X4,118:w5110,118:3:2100,118:E15:E2110:E3118:E4100:E5118:M2:X0:5110,118 _Y100:X110E4262:31X7R1:XE4E4362:15X,Y5:0:15X,Y5:3:XF0:5X1,Yt3:2X,Y:E15:E2X1:E3Y:E4X:E5Y:M2:0:5110,118X110:Y1181101:3:4X,Y:04X,Y:XX4:Y3:478,110:E14:E278:E3110:RE1124:E2118:E35:E41:5X,Y:0,5X,Y:Y10(Y10)XX6:YS3:5134,150:E15:E2134:E3150:e0:5110,118x(1).904005ME4,E5X110:Y1181402:3:5X,Y:2E4,Y:05X,Y:2E4,Y:Y10(Y10)XX6E4E46:E425XĂY3:5X,Y:X80,2506' B4500,5000,6000,7500,7500E B1R1R0:9075:11000d B1B2İ9075:10000:300| 9078:10000:11000 510 :(21):"A MACKINAW TROUT IS IN FRONT OF YOU,":A9$"MACKINAW TROUT":25010:5110,118 X110:Y1181502:3İ9000:9050:10000:CC15:9150:300@B4İ9070:10000:300P10000:300:(21):"YOU SEE A RAINBOW TROUT IN FRONT OF YOU":501 :(21):"YOU FIND A DOLLY VARDEN VERY NEAR":A9$"DOLLY VARDEN" 40000:12000 A2506,2506,2506,2506,250000:CC5:9150:300110000:CC5:9150:300?B5520[8000:9100:10000:300:21:"ALONG COMES A CHUB":501:21:"IN YOUR VICINITY IS A BLUEBACK SALMON,":4000012000:A4505B4000,5000,9080,7020,8000%B1B2B5A530,520,530,530,510,510>B4000,5000,9050,7000,8000tB1B2B5İ9000:9050:10000:CC15:9150:300B4İ9100:10000:C0:30010000:300B4000,5000,9030,7020,9040 B1B2İ9000:10000:CC5:9150:300 B4İ9070:1 ,S1S11:355 -S116- 6S(6(1)1)< @S21S11M JSS(S2)310U TS2e YS(S1)S:S1n ^S11~ cS1650000 dAS(S1)300 hS(S1)500,1000,1500,2000,3000,2500 :(21):"YOU FIND YOURSELF CLOSE TO A WHITEFISH" 40000:120008:Z$"AS A":30000: Z142:Z28:Z$A$" YOU CAN":30000e Z15:Z216:Z$"1 ESCAPE DEEPER":30000 Z224:Z$"2 ESCAPE SHALLOW":30000 Z232:Z$"3 IGNORE IT":30000 Z216:Z1140:Z$"4 EAT IT":30000 Z224:Z$"5 CHASE IT":30000 3015120,60M Z15:Z2100:Z$"THE FISH YOU ENCOUNTER WILL LOOK LIKE ":30000 2110,126:(21):"IN REAL LIFE THE FISH ARE DIFFERENT" "SIZES. YOUR JOB IS TO DISCOVER THE":"ACTUAL SIZE OF THE FISH.":10000 ::3:1:0:11,55:21 Z15:Z2"MACKINAW TROUT","DOLLY VARDEN"3 :X1A:A$:XA X19241 D$(4):D$"NOMON C":::10:" TRAVELING TO ODELL LAKE..." 8164:232,0:233,64:1:3:0 D$;"BLOAD SCENES ":: Z15:Z220:Z$"AS A "A$" YOU WILL LOOK LIKE":30000 TION. CHOOSE THE"+ 7"OPTIONS BY NUMBER."X <:"THE FISH YOU CAN CHOOSE FROM ARE:":{ P:X16:A$:" "X". "A$:X :"WHICH FISH DO YOU WANT TO BE ";:A$ A(A$) A1A610 "WHITEFISH","CHUB","BLUEBACK SALMON","RAINBOW TROUT",X1(600):600,0:S(6)9 C0:::Z$""::X1960"YOU WILL ROLE PLAY A FISH. AFTER ROLE":"PLAYING ALL THE FISH YOU SHOULD KNOW""THE RELATIONSHIPS BETWEEN THE FISH.": 3"YOU WILL BE GIVEN 5 OPTIONS TO DECIDE":"WHAT TO DO IN A SITUA       ??$!) $;?2'0)- ') ??? !$$<::2--50)- $;?$--?)- ?7&$ -?$ ??7)- ?& -6-- $$;?2-6.)=$$$=?. 6) $$,?<$$$6 6--#$$$>$$$ 666%$$$.2111$$$> $$)-266??$$$--2>?. $$)-266?%0116$$$--2?56-- ?$)-- $$$?--- $$ 666;?5 $#$ 66% $$$6667$!!!!61111$ $$## 635 ??$!!!!??' $$)-266? !!?)=$$$>- %---.='???>?$'$%$dI5'MI=.$?'?'?<7?>>77??????/-???7?77?77?77?<<<<<7555555-.-.---5------<<<<''/..,--&,47???.555-.-%%-,,,%-,-$/.-%%$ۛIII<$$46666???%$$ 66$??$$$$--26;?$,-.I ?$$ -!$$$--266;?-$$$--;7--$$$--;76d)5?$$ -l$$$6.-%$667>7?<<'<',$%$'$$6666657?>>>?>????65-5-.%%%?=====<>>>777?7?7???$->$56-....6--..55-...-.56-..55555.5-6.666.--%4?$,----.-5--5--.--.-5--.-5--.-.%$,$,$%%$,,,,%-,676?/7?&-,--.-.-.%,,$,%-65>>67.5.5565?>'?<'$''$6.66.6'67777?>??77---.--,,<<<>>????7?''''<--5-.5-.-$'$/$%$%$4?>7??=7?>7?<'?>.6-.555555-6&$?<<|III5'6>>.-577--->>.-577--6>67>><<4766><<455=<<<>66'6?>7-,%-,%,%,%,%,,$%$<$<<$''''''',,...55-*~IIIII!''?<'????>?-$,,,-%--..>>3.65>67.-%-,,$<<<>67?>.655556LIII16-6>76-MII --%$--6.--$,--6&$6.--$d LI-5?-7-*uI!L L1.M)e Lq1-uI L1&d1m &->>>77.%-,-,--%-------.5---%<$,-55-..5%$<$/$%$%,4?7?>???>>>??>???>>>655-.-.&'?'?<<$MI 5/$>6?6?>?>...-%-,%%%%%----%---55----$',66>>>%-5.&'$-,,,,,-6$$<,$$$<$<77>777>.-67?7/,%--?77?>??7>77?>>-6..-%=6-.-55-..5-55--,,%%-,,?>??7$'-----,------%--,,%%%%?>>>?'??>?-MQ-??6--LII 66.--<<<<'.--$-----.----.--------%-,%-,-567>67>6>>>,%,%%,,%-%-%-,%-,%-46?>67777>77>7?>>>7-..-.5-,-,6-..-...??????????>>6>6...%-,,%<$$%%,,$$%%%-,<<$%-,--..555-%-,-5.5..&??<6?7555='??>7.55-&?<6??66..655%-$%46666-.$%%,4666.55??'??>?>?'''-----?????'<<<[)mIII $,$$,$46766>6$6?<'''$,,,,-,$dI>?>?>?>?'?6?7??>>/?-.->67--%-,%%??>?-%--%-,,='''<$LI"%%,$$<$'ܛ=.L!''''<$?7?>7>67>665.6&<77?>7?,$%$,$=$'<$'''-.5-.5mIIII'??6765..%/%546.5-.->67--%-,%%??>?-%--%-,,='''<$LI"%%,$$<$'ܛ=.L!''''<$?7?>7>67>665.6&<77?>7?,$%$,$=$--,-,-5>6----,%-----.---%-%-%-%????<<55----%%%%<,''=>67?>>7??'??>7?66>6$%$$<$?<'?'?,,%,%4??/7??>7>7---=????>>777>676.65.%-,$%=>67?6555=<<<<,5,,$%M1...-,$%<$'?>>7&,,#7%-.5???????????????????$,.?7/-->??????????'??766%$$$=????,$%-%--,-%%-,,-%-----655....5---%--,5>=>66.6.????????????''''$ m+$..666>6>,6.-5-----------------------------------------------------------------------------------------------------------------------------:???????????,$-,$%,,66766.$-??'''?<''<$IIII????????????????????????????????'%,,$% 5-6..6$4766666%$$$$$<666666'$$$$,---4.6%4.&46%,=66%$,&,,,,,,,,,,,,,,,,56-....6--..55-...-.56-..55.55.-.56666--I#$$$?????????????????????<>7?>??<<<$$--5.%-,%--..555=766?/---=???'?/---??????????-%<<<$$,$$$$,-$$ -?',Q#4=676666666v----------$-@bd]dJ n O F t   # , 9 G T _ o } #0>HWb'$$---666H)h ɠFȄBLRLSB𱦧C B FFLR=$<% " C0`݅ۅ߅,`߅_ h%<$=Ѕ  dUeUfUgUF ȄB@ iSi>  CBCC` S UH)HJJh)JJLR)hLSD D0 ELSQLQ`Ԣ TȱL.QUL]UcUF TH?@DE >LR UL]Ui0 ȢUL]U81Hȱ81Hȥ 8$Ʌ<ȥ 8$(=ȱ8"(>ȱ8#>LaQ?ȱ81@ȱ Dȱ Eȱ81ׅh<&    IR9501670$R8001600E"THEY HARDLY NOTICED YOU. "m":"BUT YOU DID LOSE SOME ENERGY":,"BY RUNNING SO FAST."6EE15:@"BUT AS YOU WERE RUNNING YOU LOST ENERGY"J:"AND THE WOLF PACK INJURED YOU ";TI001650^ HUNGRY WOLF PACK.",:J$;:40000:VZN:;V101510i"THAT WASN'T A SMART MOVE ON YOUR PART.":"THE WOLF PACK ATE YOU."B$"WOLF PACK":8010"THAT WAS A GOOD CHOICE TO":"RUN FROM THE WOLF PACK,":R((1)100)1R20012407:"AS YOU CHASED THE RABBIT,"h:"YOU STUMBLED INTO A TRAP. EVEN THOUGH":"YOU ESCAPE, YOU HAD MAJOR INJURIES." 1910II15:dnA1400,1400,1700,2080x"WALKING DOWN THE TRAIL,":"YOU COME TO A:II54j:"NOW THAT YOU HAVE FINISHED YOUR MEAL"Nt:"YOU CAN MOVE ON."T~"WHY WOULD YOU CHASE A RABBIT"::"AND NOT EAT IT?":"THE RABBIT RAN INTO THE BUSHES":EE15"AND YOU LOST ENERGY CHASING IT."R((1)100)1:Q"OF COURSE YOU ARE SAFE, BUT YOU SHOULD"::"HAVE EATEN FOR MORE ENERGY."]$EE5:."YOU GOT IT. THAT WAS A GOOD MOVE":3"BECAUSE YOU'LL HAVE MORE ENERGY";8I001110B::"AND YOUR WOUNDS WOULD HEAL FASTER";V"."`EE15 RABBIT IN YOUR TRAVELS."2:J$;:40000:VZN:LV990,1030,1070,1160Rz"THERE IS NO REASON TO TRY TO RUN":"FROM A RABBIT. REMEMBER...":"YOU ARE A ";F$;",AND YOU JUST":"GOT WEAKER FROM RUNNING FROM A RABBIT."EE15U WERE LUCKY, THE FOX">4:"DIDN'T NOTICE YOU THERE. YOU":]>"SHOULD BE MORE CAREFUL."cHR"THAT WASN'T A SMART IDEA..."\00780f"YOU GOT KILLED TRYING."p00780z"THE FOX FOUND YOU AND CAUGHT YOU."00780:"YOU SEE AUR ENERGY":+"WENT DOWN FROM RUNNING."8EE10:b"AS YOU WERE RUNNING AWAY, THE FOX ":"INJURED YOU WITH HIS SHARP TEETH."II10:"THE FOX CAUGHT UP AND GOT YOU." B$"FOX":8010R((1)100)1 R9000850*"YON-X:"AS YOU ARE GOING DOWN THE PATH,"Qb:"YOU COME ACROSS A RED FOX."jl:J$;:40000:VZN:V670,790,870,890R((1)100)1IR1000770R2000740"YOU WERE VERY SMART TO ESACPE." :"YOU ARE SAFE NOW, BUT YO:"YOU MADE IT THROUGH ODELL WOODS":3 "WITH ";I I0ĺ"NO ";:530g I10ĺ"ALMOST NO ";:530 I30ĺ"SOME ";:530 "HEAVY "; "INJURIES." :"I HOPE YOU HAD FUN.":::"COME BACK AGAIN" :07950 DA00590,00590,00920,00920---------------------------------"* 6:6 @Y110I JX((1)10)1T TN1Yf ^H(N)X00330m hNx |H(Y)X X00580,01380,02390,03000,03370,03970,04750,05070,05830,06500 07680 Y 50000% 34,0::::"CONGRATULATIONS...": A3:300" F$"WOLF"02805 A4:EE6:300z :"PLEASE BE A RABBIT, MOUSE, FOX OR WOLF.":(37)2:868:183 ,:"AS A ";F$;" YOUR OPTIONS ARE:" -:" 1. RUN 2. IGNORE IT"::" 3. EAT IT 4. CHASE IT" .34,6" /6:"------ :"YOU CAN BE A:":Y " RABBIT"::" MOUSE"::" FOX"::" OR WOLF":w "WHICH ANIMAL WOULD YOU" " LIKE TO BE";:868:F$ F$"RABBIT"220 A1:EE15:300 F$"MOUSE"240 A2:EE10:300 F$"FOX"00260"THERE ARE A FEW THINGS THAT DECIDE":U "WHETHER YOU MAKE IT THROUGH THE WOODS" :" 1. HOW WELL YOU SURVIVE ATTACK"::" 2. YOUR HUNGER LEVEL"::" 3. YOUR INJURY LEVEL" 50000 (J$"WHAT WOULD YOU LIKE TO DO" 2H(11):I0:E46:ZM24 dJ COPYRIGHT MECC, 19794 ODELL2 8/23/79Z AUTHOR* MIKE FISH, MARGE KOSELe::4}13);"O D E L L 2":"THIS PROGRAM IS ABOUT THE ANIMALS THAT":"LIVE AROUND ODELL LAKE. YOU WILL ROLE":"PLAY AN ANIMAL."(                          ATE FOR""#:"3 DIGIT NUMBERS."-T$10100@$Z$"4"10000L%J4:K4ZN%LEWAY500%:"IF YOUR ESTIMATE IS WITHIN 500 OF THE"%:"EXACT ANSWER, IT IS A GOOD ESTIMATE FOR"H&:"4 DIGIT NUMBERS."&10100'Z$"A"07900t')'17"IF YOUR ESTIMATE IS WITHIN 5 OF THE "X4!:"EXACT ANSWER, IT IS A GOOD ESTIMATE FOR"r!:"2 DIGIT NUMBERS."}!10100`"Z$"3"09400"J3:K3"LEWAY50(#:"IF YOUR ESTIMATE IS WITHIN 50 OF THE"#:"EXACT ANSWER, IT IS A GOOD ESTIM50& :"IN THIS DRILL YOU HAVE THE"W:"CHOICE OF WORKING WITH 2, 3, OR 4 DIGIT":"NUMBERS, OR A MIXTURE OF ALL THREE.":8:"ENTER 2, 3, 4, OR ALL";:868@Z$:Z$(Z$,1,1) Z$"2"08800l J2:K2 LEWAY5' :** D ESTADD 10/7/77 BJV REVISED SEVERAL TIMES, ORIGINAL AUTHOR UNKNOWN:8:"THIS IS A DRILL ON ESTIMATING THE SUM OF","TWO NUMBERS. YOU WILL NOT BE EXPECTED TO""GIVE THE EXACT ANSWER, JUST A CLOSE"::"ESTIMATION."610400::, A05700,18400,30600,39300,48400758100e 3:"WOULD YOU LIKE ANOTHER DRILL";:868m<I$(I$,1)"N"60200(I$,1)"Y"Ģ23:"YES OR NO PLEASE.":3850160060200 ***********************************************21:"WHICH DRILL WOULD YOU LIKE?";:8685` 02600b :"PLEASE ENTER 1, 2, 3, 4, OR 5":2300r( 61000:AZN A5A102500 21:958:"HOW MUCH TIME DO YOU WANT FOR EACH":"ESTIMATION (1-30 SECONDS) ?";:61000:TL%ZN:TL%1TL%302710 ::"THE DRILLS INCLUDE THE FOLLOWING:"H:"1) ESTIMATING ADDITION"k:"2) ESTIMATING SUBTRACTION"l:"3) ESTIMATING MULTIPLICATION":"4) ESTIMATING DIVISION"4:"5) ESTIMATING THE PERCENTAGE ONE NUMBER":" IS OF ANOTHER"*2,1522:10,1323:8,1124:8,925:26,8|13,12:10,1414:9,1515:10,1416:17,12:25,2923:24,3024:25,2925:26,2761100:22:"WHAT IS YOUR NAME PLEASE ";:N$X180:3:"THIS PROGRAM DRILLS YOU ON ESTIMATING."(@18,2010:18,2011g17,2112:18,2013:18,2014:19,15:17,27:25,2918:24,3019:25,2920:21,27t61100:9:X3901:0,39X:X:8:12,31:30,3113:28,3114:26,291524,2716:22,2517:20,2318(18,2119:16,1920:14,1721:1:24,2816:14,1717:23,2617:16,2318:18,2119:18,2120:16,2321r 14,1722:22,2522:12,1523:24,2723 10,1324:26,2924:8,1125:28,3125:8,1026:29,3126:27,31 61100:12:X039:0,39X:X:14:X1722:12,27X:X:19,9:1:0,39X:X:8:X1821:8,31X:X:X1722:12,27X:XG 61100:z 8:X039:0,39X:X:14:X1722:12,27X:X 61100: 6:X3901:0,39X:X:8:12,8:12,31:8,1013:29,3113 8,1114:28,3114:10,1315:26,2915F 12,1516610:(7):D1200:DI 732,3614:30,3115:16,29:30,3117:32,3618 815,1733:(7):D1200:D:22,2629:30,3624:(7):D1200:D 929,3630:31,3329:31,3232:31,3336 (7) 450 :21::A401,405,408,415,420: 3:X39012,1410:(7):D1200:D:21,4W 319,203:4,518:19,206:7,921:19,2010:18,9 4(7):D1200:D:25,293:4,1027:(7):D1500:D:13,1519 518,2215:16,2220:18,2223:25,2719:(7) 6D1500:D:29,365:6,30:7,831:9,30:29,3((G$,X,1))128:X ZM23 "GREAT!","BEAUTIFUL!","VERY GOOD!","TERRIFIC!","WONDERFUL!","FANTASTIC!","GOOD JOB!" ,"SUPER!","EXCELLENT!","ALRIGHT!" AN$(9)::ZZ09:AN$(ZZ): -::X039 10,39X:X! 214:3,1011:12,143:12,136:/d COPYRIGHT MECC, 1979:x ESTIMAT 8/23/79 FPX MODIFIED 1/17/80 BY TBg255:::20735:(13);(4);"BRUN INPUT"TI%0:TL%0:IN$""FI$"12 ($2 2"G$" PLEASE TYPE A NUMBER. " X140:21864X,                            ı2I1)X:K(2I)Y:502009D1(2I1)X:D1(2I)Y:50200HĭX050250O"ĂIYJNN1hTĭN650010^N(1)128:N(2)83:N(3)132hN(4)87:N(5)132:N(6)83rN(7)128:N(8)87|āA122DB(A)1:DL(A)1:DR(A)1KA(A)1:CE(A)1ĂA ,40,31.5,29,31.5,21,28,11,25 ,343,23,5,32,10,38,2.5,38,5,32,-100, -100 dPN1pZÁI113ydÇX,YnôN50080,50070,50060,50050xD3(2I1)X:D3(2I)Y:50200C(2I1)X:C(2I)Y:50200D2(2I1)X:D2(2I)Y:50200K(33,-100,-100 J' 242,27,250,30,257,29.5,261.5,34,269,31.5,-100,-100$' 0,5,20,8,35,12,26 ,14,40,18,50,16,35,12,-100,-100.' 277,13,288,24,298 ,33,311,28,311,20,277,13,-100,-100\8' 96,21,84,20,58,26 PER' AND THE 'LITTLE":)^"DIPPER'?":ih"I WILL NOW SHOW YOU THESE AND"::"OTHER CONSTELLATIONS."x34,23:24(4);"BLOAD CHAIN, A520"520"PART2"' 63,40,70,35,77,3 4,87.5,33,93,37,107.5,34,107 ,28,87.5, FIED GROUPS OF STARS WHICH":A "FORMED SHAPES OR PICTURES.":l ""THESE GROUPS OF STARS WERE CALLED": ,"** C O N S T E L L A T I O N S **" 6 @"YOU MAY BE FAMILIAR WITH SOME": J"CONSTELLATIONS. HAVE YOU HEARD":T"OF THE 'BIG DIPOU CAN ALSO LEARN TO TELL":A "TIME BY LOOKING AT THE STARS?"K (21)q "TO LEARN MORE ABOUT THE STARS," :"PRESS ";::"SPACE BAR";::16368,0 (16384)127230 : (2) "VERY LONG AGO, ANCIENT ASTRONOMERS ": "IDENTI520":Y$"2"Č520"PART3"0 Y$"3"Č520"PART4"[ (13);(4);:(1023)123ĺ"RUN HELLO"c :l (9) "FOR CENTURIES, STARS HAVE BEEN USED": "BY SAILORS AS A NAVIGATIONAL AID.":: "DID YOU KNOW THAT WITH A LITTLE": "PRACTICE Y 2) SEE THE ROTATION OF THE STARS,":" 3) LEARN TO TELL TIME BY THE STARS, OR";:" 4) END": "TYPE 1, 2, 3,OR 4 ?";Y$:Y$"1"ė:140 Y$"2"Y$"4"Ģ22:"PLEASE ENTER 1, 2, 3, OR 4.":16:868:133 Y$"4"138 (13);(4);"BLOAD CHAIN,A,K(24),C(24),N(8)9 iDB(24),DL(24),DR(26),KA(24),CE(24)H s::255:d u(13);(4);"NOMON C": x(3):10);"WELCOME TO THE STUDY" :14);"OF THE STARS" QQ0İ50000:QQ1_ 9:"WOULD YOU LIKE TO"::" 1) LEARN ABOUT CONSTELLATIONS,":" 2 COPYRIGHT MECC 1979 URSA 9/7/79 FP AUTHOR: HUGH COLLET, NSF COMPUTER INSTITUTE, MACOMB COUNTY INTERMEDIATE SCHOOL DISTRICT ASSOCIATED PROGRAMS AND FILES: PART2, PART3, PART4, PART5, CHAINQQ1115 dD1(25),D2(24),D3(26)     (CE(2I1)36)3.6:404004DD2(2I1)040410LNRD2(2I1)P180BnXDL(2I)(.5D2(2I)(R).5)]DL(2I)(DL(2I)21)4bDL(2I1)(.875D2(2I)(R).5)gDL(2I1)(DL(2I1)36)3.6l40400vK(2I1)040410 RK(2I1(DR(2I)21)46DR(2I1)(.875D3(2I)(R).5)WDR(2I1)(DR(2I1)36)3.6b40400xC(2I1)040410RC(2I1)P180B&CE(2I)(.5C(2I)(R).5)+CE(2I)(CE(2I)21)40CE(2I1)(.875C(2I)(R).5)5CE(2I1)H0H1:C$"AM"40080!H1H1123B2B1365360DLL1365360THH124360bP3.14159wB(B2LH)P180œH1H0̜N1֜I112N40360,40310,40260,40210,40170RD3(2I1)P180BDR(2I)(.5D3(2I)(R).5)DR(2I))4VCE(2Q1)1,CE(2Q)1CE(2Q1)1,CE(2Q2)1;VQKVP1022290RWPXW@A$"MARAPRMAYJUNJULAUGSEPOCTNOVDECJANFEB"JI112T(A$,I32,3)B$40040^IhA$"345011041072102133164194225255286317"rB1((A$,I32,3))|)4VDR(2Q1)1,DR(2Q)1DR(2Q1)1,DR(2Q2)1?V22260VVKA(2Q1)022270VKA(2Q1),KA(2Q)KA(2Q1),KA(2Q2)VKA(2Q1)1,KA(2Q)1KA(2Q1)1,KA(2Q2)1V22260VCE(2Q1)022270VCE(2Q1),CE(2Q)CE(2Q1),CE(2Q22Q)DB(2Q1),DB(2Q2)K}VDB(2Q1)1,DB(2Q)1DB(2Q1)1,DB(2Q2)1VV22260mVDL(2Q1)022270VDL(2Q1),DL(2Q)DL(2Q1),DL(2Q2)VDL(2Q1)1,DL(2Q)1DL(2Q1)1,DL(2Q2)1V22260VDR(2Q1),DR(2Q)DR(2Q1),DR(2Q2(2I1)020280v$OCE(2I1),CE(2I)CE(2I1),CE(2I)2CE(2I1)2,CE(2I)2CE(2I1)2,CE(2I)CE(2I1),CE(2I)}.OI8ONBOUP1022110TVP15^VQ111hVP22130,22160,22190,22210,22240rVDB(2Q1)022270|VDB(2Q1),DB(NDR(2I1),DR(2I)DR(2I1),DR(2I)2DR(2I1)2,DR(2I)2DR(2I1)2,DR(2I)DR(2I1),DR(2I)oN20270NKA(2I1)020280OKA(2I1),KA(2I)KA(2I1),KA(2I)2KA(2I1)2,KA(2I)2KA(2I1)2,KA(2I)KA(2I1),KA(2I)O20270OCEI)DB(2I1),DB(2I)2DB(2I1)2,DB(2I)2DB(2I1)2,DB(2I)DB(2I1),DB(2I)]N20270tNDL(2I1)020280NDL(2I1),DL(2I)DL(2I1),DL(2I)2DL(2I1)2,DL(2I)2DL(2I1)2,DL(2I)DL(2I1),DL(2I)N20270NDR(2I1)020280dE NORTH STAR." =34,24:24K @(13);(4);"BLOAD CHAIN,A520":520"URSA"a 22000:50000:: NN(1),N(2)N(3),N(4)N(5),N(6)N(7),N(8)N(1),N(2) NN15 NI112 NN20130,20160,20190,20220,20250 NDB(2I1)020280RNDB(2I1),DB(2 SEE HOW IS THIS DONE";% 16368,0= (16384)1271170E :p "DRAW AN IMAGINARY LINE OUT FROM THE" "TWO STARS ON THE END OF THE BIG DIPPER." 5 DB(13),DB(14)N(1),N(2)  50000  22:"THIS LINE PASSES THROUGH TH127X1 3$ (X2)(X2)Ē4[ N(1),N(2)N(3),N(4)N(5),N(6)N(7),N(8)N(1),N(2)e XX1u Y1271120~ 955 `16368,0 a::22 j"IT IS IMPORTANT TO BE ABLE TO FIND" t"THE NORTH STAR." "PRESS ";::"SPACE BAR";::" TO IS URSA MAJOR, THE 'BIG DIPPER'"/ fP1:30007 22d "THERE IS ONE OTHER STAR ON THE SCREEN" "CALLED POLARIS OR THE 'NORTH STAR'" "(IT IS BLINKING)" 24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE"; 16368,0 Y(16384):YRACED OUT."; O16368,01 P(16384)127592: X6:] v"THIS IS 'DRACO THE DRAGON'."k P3:3000 "THIS IS CASSIOPEIA" P4:3000 "THIS IS CEPHEUS" P5:3000 *"THIS IS URSA MINOR, THE 'LITTLE DIPPER'" 4P2:3000! \"THIS!B$"MAY":L122:H18:C$"PM"340000:50000;:M34,20:35,24S&}0"LOOKING INTO THE SKY SOME EVENING,":"YOU MIGHT SEE A SCENE LIKE THIS."?3::20000D"PRESS THE ";::"SPACE BAR";::" TO SEE THE" N"CONSTELLATIONS T          DR(2I)(DR(2I)21)4@DR(2I1)(.875D3(2I)(R).5)hDR(2I1)(DR(2I1)36)3.6:40400~C(2I1)040410RC(2I1)P180B:CE(2I)(.5C(2I)(R).5)+CE(2I)(CE(2I)21)40CE(2I1)(.875C(2I)(R).5)5CE(2I1225255286317":B1((A$,I32,3)):H0H1:C$"AM"40080CH1H112xB2B1365360:LL1365360:HH124360:P3.14159B(B2LH)P180:H1H0:N1֜I112N40360,40310,40260,40210,40170RD3(2I1)P180B:DR(2I)(.5D3(2I)(R).5)"0"30006E3uZM:"THAT IS NOT A NUMBER - TRY AGAIN";:30010:30001m6uZM:868:CV1(CV23):ZN(ZN$)::uCV1:36,CH:868:@A$"MARAPRMAYJUNJULAUGSEPOCTNOVDECJANFEB"JI112:(A$,I32,3)B$40040^I6hA$"345011041072102133164194Q)1KA(2Q1)1,KA(2Q2)1:22260;VCE(2Q1)022270fVCE(2Q1),CE(2Q)CE(2Q1),CE(2Q2)VCE(2Q1)1,CE(2Q)1CE(2Q1)1,CE(2Q2)1VQVWP:0uCH(36):CV(37)1u"";ZN$:(ZN$)(((ZN$)))30003 2u(ZN$)0ZN$Q2)?VDL(2Q1)1,DL(2Q)1DL(2Q1)1,DL(2Q2)1:22260jVDR(2Q1),DR(2Q)DR(2Q1),DR(2Q2)VDR(2Q1)1,DR(2Q)1DR(2Q1)1,DR(2Q2)1V22260VKA(2Q1)022270VKA(2Q1),KA(2Q)KA(2Q1),KA(2Q2)$VKA(2Q1)1,KA(2I 8ON:UP15"UQ111GhVP22130,22160,22190,22210,22240^rVDB(2Q1)022280|VDB(2Q1),DB(2Q)DB(2Q1),DB(2Q2)}VDB(2Q1)1,DB(2Q)1DB(2Q1)1,DB(2Q2)1:22260VDL(2Q1)022270VDL(2Q1),DL(2Q)DL(2Q1),DL(21)020280rOKA(2I1),KA(2I)KA(2I1),KA(2I)2KA(2I1)2,KA(2I)2KA(2I1)2,KA(2I)KA(2I1),KA(2I)}O20270OCE(2I1)020280$OCE(2I1),CE(2I)CE(2I1),CE(2I)2CE(2I1)2,CE(2I)2CE(2I1)2,CE(2I)CE(2I1),CE(2I).OL(2I1),DL(2I)DL(2I1),DL(2I)2DL(2I1)2,DL(2I)2DL(2I1)2,DL(2I)DL(2I1),DL(2I)kN20270NDR(2I1)020280NDR(2I1),DR(2I)DR(2I1),DR(2I)2DR(2I1)2,DR(2I)2DR(2I1)2,DR(2I)DR(2I1),DR(2I)N20270 NKA(2I(4)N(5),N(6)N(7),N(8)N(1),N(2)4NN15:I112YNN20130,20160,20190,20220,20250pNDB(2I1)020280NDB(2I1),DB(2I)DB(2I1),DB(2I)2DB(2I1)2,DB(2I)2DB(2I1)2,DB(2I)DB(2I1),DB(2I)N20270NDL(2I1)020280`ND ROTATION";:1' 6:P20:22000:1410; :::16368,0q 6:868:"DO YOU WANT TO PICK ANOTHER DATE ?";Y$ (Y$,1)"Y"160 (Y$,1)"N"ĺ(13);(4);"BLOAD CHAIN,A520":520"URSA" 20:"PLEASE ENTER YES OR NO.":1500! NN(1),N(2)N(3),N(16384)1271490* H1H11:H125H11B H2H21:H213H21d H21C1$"AM"C1$"PM":1430 H21C1$"PM"C1$"AM":L2L21 40000:3::20000 :21:B$;" ";L2;" AT ";H2;C1$;:868 24:1:"PRESS ";::"SPACE BAR";::" TO STOP THEH2H1:L2L1:C1$C$::h .21:"HERE ARE THE STARS AS THEY WOULD APPEAR":"AT ";H1;C$;" ON ";B$;" ";L1 640000:3::20000:6:22000 :"PRESS ";::"SPACE BAR";::" TO SEE THE STARS ROTATE";:16368,0 (16384)127431 n16368,0: D YOU LIKE?";:30000:L1ZN:L131L11L1(L1)Ģ22:"ENTER AN INTEGER FROM 1 TO 31.":10:210v 15:"WHAT HOUR?"; 30000:H1ZN:H1(H1)H112Ģ22:"ENTER AN INTEGER BETWEEN 1 AND 12":230 18:"AM OR PM";:958:C$:C$"AM"C$"PM"250 "HOW":"YOU HOW THE STARS WILL LOOK EACH HOUR."::] "TYPE IN THE FIRST 3 LETTERS OF THE": 9:"MONTH YOU WOULD LIKE";:868 B$ A$"MARAPRMAYJUNJULAUGSEPOCTNOVDECJANFEB" X112:(A$,X32,3)B$210 X:190_ ::"WHAT DATE WOULZZM24:::fn:"THE STARS SEEM TO ROTATE ABOUT THE"::"NORTH STAR IN A COUNTER-CLOCKWISE":"DIRECTION.":::"EVERY HOUR, THE STARS ROTATE 1/24TH":"OF THE WAY AROUND.":2250000:2 ::"IF YOU PICK A DATE AND TIME, I WILL S!! ! ! ! ! !!!!!!!!!   5CE(2I1)(CE(2I1)36)3.6+:40400BDD2(2I1)040410ZNRD2(2I1)P180B|XDL(2I)(.5D2(2I)(R).5)]DL(2I)(DL(2I)21)4bDL(2I1)(.875D2(2I)(R).5)gDL(2I1)(DL(2I1)36)3.6l40400vK(2I1)0404105)DR(2I)(DR(2I)21)4DDR(2I1)(.875D3(2I)(R).5)eDR(2I1)(DR(2I1)36)3.6p40400C(2I1)040410RC(2I1)P180B&CE(2I)(.5C(2I)(R).5)+CE(2I)(CE(2I)21)40CE(2I1)(.875C(2I)(R).5)rB1((A$,I32,3)).|H0H1:C$"AM"40080;H1H112MB2B1365360LL1365360:HH124360:P3.14159:B(B2LH)P180:H1H0:N1̜N1֜I112N40360,40310,40260,40210,40170RD3(2I1)P180BDR(2I)(.5D3(2I)(R).Q1),CE(2Q)CE(2Q1),CE(2Q2)SVCE(2Q1)1,CE(2Q)1CE(2Q1)1,CE(2Q2)1ZVQiVP522290pWPvW@A$"MARAPRMAYJUNJULAUGSEPOCTNOVDECJANFEB"JI112:(A$,I32,3)B$40040^IhA$"345011041072102133164194225255286317"Q1),DR(2Q)DR(2Q1),DR(2Q2)SVDR(2Q1)1,DR(2Q)1DR(2Q1)1,DR(2Q2)1^V22260uVKA(2Q1)022270VKA(2Q1),KA(2Q)KA(2Q1),KA(2Q2)VKA(2Q1)1,KA(2Q)1KA(2Q1)1,KA(2Q2)1V22260VCE(2Q1)022270 VCE(2Q1)0222707|VDB(2Q1),DB(2Q)DB(2Q1),DB(2Q2)j}VDB(2Q1)1,DB(2Q)1DB(2Q1)1,DB(2Q2)1uV22260VDL(2Q1)022270VDL(2Q1),DL(2Q)DL(2Q1),DL(2Q2)VDL(2Q1)1,DL(2Q)1DL(2Q1)1,DL(2Q2)1V22260 VDR(22,KA(2I)KA(2I1),KA(2I)'O20270>OCE(2I1)020280$OCE(2I1),CE(2I)CE(2I1),CE(2I)2CE(2I1)2,CE(2I)2CE(2I1)2,CE(2I)CE(2I1),CE(2I).OI8ONBOUP15^VQ111hVP22130,22160,22190,22210,22240 rVDB(21),DL(2I)N20270,NDR(2I1)020280NDR(2I1),DR(2I)DR(2I1),DR(2I)2DR(2I1)2,DR(2I)2DR(2I1)2,DR(2I)DR(2I1),DR(2I)N20270NKA(2I1)020280OKA(2I1),KA(2I)KA(2I1),KA(2I)2KA(2I1)2,KA(2I)2KA(2I1)250NDB(2I1)020280NDB(2I1),DB(2I)DB(2I1),DB(2I)2DB(2I1)2,DB(2I)2DB(2I1)2,DB(2I)DB(2I1),DB(2I)N20270NDL(2I1)020280 NDL(2I1),DL(2I)DL(2I1),DL(2I)2DL(2I1)2,DL(2I)2DL(2I1)2,DL(2I)DL(2I(A1$)0A3$"PM"ĺ"THAT'S CLOSE, HOWEVER THE ANSWER IS 1PM.";:3060g "WRONG, THE ANSWER IS 1PM."x 50000::: :(4);"RUN PART5" NN(1),N(2)N(3),N(4)N(5),N(6)N(7),N(8)N(1),N(2) NN15 NI112NN20130,20160,20190,20220,20)(X2)Ē4, DB(11),DB(12)DB(13),DB(14)6 XX1F Y1272015P 1975^ 16368,0 :21:"ACCORDING TO THE STARS, WHAT TIME IS IT?" "WHAT HOUR";:A1$ "AM OR PM";:A3$ *:21 A1$"1"A3$"PM"ĺ"RIGHT!!":3060F (A1$)3 D:3:0 v20000:6:22000:34,20:35,24:{ "THE HAND OF THE CLOCK IN THE SKY":"IS THE PAIR OF STARS IN THE END" "OF THE BIG DIPPER.":24:6:"PRESS ";::"SPACE BAR";::" TO CONTINUE"; 16368,0 Y(16384):Y127X1 3:(X2"8AM"" 8:2);"5PM";37);"7AM"< 10:"6PM";38);"6AM"Z 13:2);"7PM";37);"5AM"x 15:4);"8PM";35);"4AM" 17:7);"9PM";32);"3AM" 18:10);"10PM";28);"2AM" 19:15);"11PM";23);"1AM" 20:20);"12" &40000: 050000RS RATHER"+ T:"THAN 12 AND THE NUMBERS"I ^:"GO IN REVERSE ORDER."v h::"TO SEE A PICTURE OF THIS CLOCK,": 50000:: 20);"12" 16);"1PM";23);"11AM" 11);"2PM";28);"10AM" 7);"3PM";32);"9AM" (6):4);"4PM";35); d:eH1(0)5B$"MAY":L116:H18:C$"PM"r:"HOW DO WE TELL TIME BY"::"WATCHING THE STARS?"::""FIRST, IMAGINE A BIG CLOCK IN THE SKY.",:"THE NORTH STAR IS THE"6:"CENTER OF THE CLOCK."@: J"THE CLOCK HAS 24 HOU"" " " " " """""""""