L%hh LHH` X% " ӠӠΠǠ ˮԠˠǠӬĠӠ٠٠ϠŮ+JJJJ ,,,L Lک ٥ҥ>ӥ? ( ㆭ  ؆` | A""""""QQQYV <"<Q '(h((QQQ`@GHOHO $"!$q}T@` `@@``p0 8p@@`00 |0@` `pppPox`D3 < p?|@@@|@`f ppn|>0p  qcs6<, 3['Nxxxpp0` ```@vl  ?`@:3q  AcqcCyO@  0p`@@q @p?|`3cC ? ?>|xp`p`@Acwsssssss__????????~^^ ?~~~~~~~?>~||xpp`@~| xyy{~|@`pp xpp`@yyyyyyyx~ ~x`|xpxqa` cqx|||||||cCC?>>>??<<|||~?`ppxx||<||xxpp`|||||||| |?|p`@@@@`p|? OOGgccqpxsssssssppxxx|<<~?>~||xxxxppp```@@@`?~|x|~|||||||p@@p|~><|xp`@>|x|xpx}yyyyyyyAA?~|xpp`ppx|~? ?? 33@``@@glloLL LlOgloloG @`@glolo@@gLLL GaamGGlg`GGlg`G  xL| x@@xMLLxMyyM MyxAxMx|Yq @lllLglllgG LlL`@GLOLo033366m~0>3>33~G<`G}rccb``acccq{{{{8008????~ |lL COoooog CgoooocCFFLLXXPpqa88`}}}}>????~ | ~FCCFL ____|GG|GGccp{{{{ ;1q``qp`aas{{{{8008 0y| |}}}}AAQg((h' $C@0j ed`y < I1@@q q s8EE9EE8> ` `$DC0ANPQN@'h(' WPG((H@stq q8AyEx:NPQ@GhHHG#$p# @ (*Y9AyEy: QQQO~C%%C~_DDD qAAAaq9`ppxxx|xxx|AsGN8088 Ccˆʎõĵ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 iõ`  \ 濭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- ( t Ϡ@跻~!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䵍䵐`"L ŵ8ŵH ~(` d ֠z# u`kkkAS ON GRAVITATIONAL"n"EFFECTS ON AMUSEMENT PARK RIDES"(:"1. POTENTIAL-KINETIC ENERGY"7" (COASTER CONSERVATION)"<"2. PARABOLIC ARCS"A" (HILLTOPPING)"F"3. FREE FALL" K- "PUBLICATION ARE THOSE OF THE AUTHORS &"8 22:2d "DO NOT NECESSARILY REFLECT THE VIEWS"o 24:3 "OF THE NATIONAL SCIENCE FOUNDATION" A15000:A @k@k@kkk10:9# "UPON WORK SUPPORTED BY". 12:4U "THE NATIONAL SCIENCE FOUNDATION"` 14:5 "UNDER GRANT NO. SPE 82-63209" 16:2 "ANY OPINIONS, FINDINGS, & CONCLUSIONS" 18:2 "OR RECOMMENDATIONS EXPRESSED IN THIS" 20:1C4ĺD$;"RUN ANCHORS AWAY": C5ĺD$;"RUN BALL TOSS"X C6ĺD$;"RUN SPACE PARK" C7ĺD$;"RUN SENSATION SIMULATION" "OF THE NATIONAL SCIENCE FOUNDATION"  ::5:12:"ACNOWLEDGEMENTS" 8:9 "THIS MATERIAL IS BASED" L") x" EFFECTS OF VARIABLE G FORCES"K {" (SENSATION SIMULATION)"S }22| "CHOOSE YOUR PROGRAM BY NUMBER: ";C C7C1125 D$(4) C2ĺD$;"RUN HILLTOPPING" C1ĺD$;"RUN COASTER CONSERVATION" C3ĺD$;"RUN FREE FALL" " (FREE FALL)"; P"4. PENDULUM SWINGS (ROCKING BOAT)"U U" (ANCHORS AWAY)" Z"5. TRAJECTORIES (ARCADE BASKETBALL)" _" (BALL TOSS)" d"6. RIDES WITH VARIABLE GRAVITY FIELDS" i" (SPACE PARK)" n"7. SIMULATION OF PHYSIOLOGICA1 5000 :2G"THESE PROGRAMS FOCUS ON GRAVITATIONAL"n"EFFECTS ON AMUSEMENT PARK RIDES"(:"1. POTENTIAL-KINETIC ENERGY"7" (COASTER CONSERVATION)"<"2. PARABOLIC ARCS"A" (HILLTOPPING)"F"3. FREE FALL" K 膢 ȱ " <67 L  8ij v vo>ϭV122GH0V0:50000:30045RV(V122GH)AC0:FC0:NFMG(TH):GF(NF2(MG(TH))2)ϰ50000ϫ53140ҭX(TP)0X(TP)279Y(TP)0ıҹ54,189:55,158҉:=Ӣ10:5:"SORRY, BUT YOUR LOOP WON') |ϰ50000,~ϭL0Ē0:XP(L1),YP(L1):3=ϓXP(L),YP(L)OρPA1130:PAVςLoϒ0:XP(24),YP(24):3}R0:L163LL1THTH(24)ϭL163Ē0:L1,(L1)2.78557:3ϓL,2.78L557H(150(2.78L557))UCϭH138XL1:Y( NϓL,148#XϭL0Ē0:L2,148:36]ρPAUSE1100:=bςLPgϒ0:100,148:3\iR60UChlρL024}wH(150YP(L))UCxϭV122GH0MLL:25000yV(V122GH):AC(V2)(70UC)zFCMAC{NFFC(MG(TH(L))):GF(NF2(MG(TH(L)))2100,150 ρTH070PI180.052!ρPAUSE160:Q&ϓ100(TH)70,80(TH)70Y0ςTHa5T0:ϓ166,104198,12196,11197,10198,11;ρTH070PI180.05ςTH@ϰ50000DρL01002(TH(L)))(GF(NF2(MG(TH(L)))2)R˭NF0THTH(L):XXP(L):YYP(L):20000]˰50000h˓OX,OYo˒3˓XP(LST),YP(LST)ADOXXP(LST):OYYP(LST)AD˂ḼST1H0:VV1:R0:NFMG:GFMG:12450̫25240ϐ RF1ϓ0,1501RR3:52090,\˭L116L106RR3:52090Hf˭L10L0RR4:52090`p˭L127L117RR4xzH(150YP(L)AD)UC˹54,0:55,96˒0˭ST1ī52130˭V122GH0MLL:25000V(V122GH)AC(V2)RFCMACNFFC(MG:18:"ALERT":54,189:55,158:"":FB1:54,0:55,96:8DZJ ˁLBLELSTf$DX(XP(L))(XP(LST))%DY(YP(L))(YP(LST))&˭DX0DY0ī522204˭L86L42RR1:52090>˭L41L22RR2:52090H˭L105L86RR2:52090 R˭L21L15`íU$"E"I6)dâ4:I:D$;I14);D$;iâVF2:32:V$fnâ20:2:"G'S FELT";28);"NORMAL FORCE"xâ21:32:(NF10)10;" "}OG32:U$"M"OG9.8â22:4:(GF10OGM)10;33);F$íFB1FB0:21:18:" ":510004íNF0GF0:21WA$"^WA$"N"ė:"RUN SP MENU"KhWA$"Y"ĺ(4);"RUN ZG LOOP LANDING"[r"":40000}Pâ2:5:"HEIGHT";19);"RADIUS"TVF2UíRF1VF12VâVF:30:"VELOCITY"Zâ3:7:(H);" ";21);(R10)10;" "\âVF1:33:(V);" "_íU$"M"IXuT]uVT2023E^uVT:" "M_uVTqbu22:9:"HIT A KEY TO CONTINUE"luSS(16384)vuSS127ī30060u16368,0:@54,189:55,158:::10:3J"WOULD YOU LIKE TO RIDE AGAIN? (Y/N)"T12:20:"";02bLXIĒ0:L2,TR:3&bL,TR9bPAUSE1100:@bLKb30045Z0uX(VXT)Xx3uY(.5GT2)(VYT)YAD:uT135?uS(16336)Du(1)8HuEF20IuH135EF40NuXEX40(1)80:YEY20(1)EFPuYE0YE0SuX,YXE,YEX,(.5G(T.1)2)(VY(T.1))Y:3X[N(.5GT2)(VYT)Y(Y3(PI12)C4)C4ī30000c\N20040zaTH(L)PI2ī20000aBLL1:EL1:ST1a0:XP(L),YP(L)AD:3a52000b0:XP(0),YP(0)AD:3bH0:VV1:NFMG:GFMGb50000bLXI(VXT)X0ī30000SDN(.5GT2)(VYT)YAD191(.5GT2)(VYT)YAD0ī30000yHN(VXT)X,(.5GT2)(VYT)YADRNTT.1WNPAUSE1130:PAUSEYNH(150((.5GT2)(VYT)YAD))UC:V(VX2(VYGT)2):NF0:R0:50000#ZN0:(VX(T.1));J22:9:"HIT A KEY TO CONTINUE"2BJSS(16384)ELJSS127ī19010SVJ16368,0^N53000 N22:" ":23:" "*NVX(TH)V4NVY(TH)V9N3>NT0CN(VXT)X2790: -L.0:L2,TR.|.BL1:EL126:ST19.52000T00:XP(127),YP(127)ADh0LX(127)2792s15000081LX(127)Ē0:L2,TR:31L,TR2PAUSE1100:d2L8JVT20239JVT:" ":JVT!12)C4 %XF280XI& %0,150XI,1503 H&T0127F &X(T),Y(T)ADM 'Tb t'XF,150279,150 *22:" " +TR148 +VV1:NFMG:GFMG +50000 $,L0XI2 ,L0Ē0:L2,TR:3 ,L,TRP-PAUSE110)(C42):YP(TP)(Y3(PI12)C4)(TH)(C42); #TH(TP)THG #TPTP1O T$TH^ $T6301 %X(6463T)280X(T):Y(6463T)Y(T) :%XP(6463T)280XP(T):YP(6463T)YP(T) N%TH(6463T)TH(T) %T %AD150((Y3(PI12)C4)C4) %XIX3(PIY2(PI3)C3)(TH)(C32)) !TH(TP)TH5 !TPTP1= `"TH{ "X3X2(PI3)C3(PI12)C3:Y3Y2(PI3)C3(PI12)C3 (#THPI120.05 #X(TP)(X3(PI12)C4)(TH)C4:Y(TP)(Y3(PI12)C4)(TH)C4 #54000- #XP(TP)(X3(PI12)C4)(TH22) TH(TP)TH  TPTP1& l THj X2(X1(.64PI)C2)C2(PI3):Y2(Y1(.64PI)C2)(PI3)C2 4!THPI3PI12.05 !X(TP)(X2(PI3)C3)(TH)C3:Y(TP)(Y2(PI3)C3)(TH)C3 !54000 !XP(TP)(X2(PI3)C3)(TH)(C32):YP(TP)(TH(TP)TH TPTP1 xTHJ X1140C1(.64PI):Y180C1(.64PI)c @TH.64PIPI3.05 X(TP)(X1(.64PI)C2)C2(TH):Y(TP)(Y1(.64PI)C2)(TH)C2 54000 XP(TP)(X1(.64PI)C2)(C22)(TH):YP(TP)(Y1(.64PI)C2)(TH)(C,XX(135),Y(135),XP(135),YP(135),TH(135)2C 54,0:55,96u22:"PLEASE WAIT WHILE LOOP IS CONSTRUCTED."TP64LTHPI.64PI.05X(TP)140C1(TH):Y(TP)80C1(TH)54000XP(TP)140(C12)(TH):YP(TP)80(C12)(TH)         TE FALL"! (4);"RUN HELLO" - :"4) FREE FALLING RIDE"::"5) QUIT"[ ::"WHICH DO YOU WANT";:A:A1A6135y A500,700,1100,1300,1500 "RUN ZG CC" "RUN ZG CC II 2" "RUN ZG LOOP LANDING" L"RUN ZG AA" "RUN ZG FREE FALL" (4);"RUN HELLO"Z d16368,08:13:"SPACE PARK MENU"S13:"----- ---- ----"[:}"1) STANDARD ROLLER COASTER" CONNECTED TO TRACK""2) STANDARD ROLLER COASTER" NOT CONNECTED TO TRACK" :"3) PARK PENDULUM"<@+U*U*UjV* *Uj*W>U\*U*UV/UU*U*]*5+5uV*U*U*U*U.U*U*U*U*UJ*U*U*U*U*U*U*U*U*U*U*U*-U*U*U*U*U*UX*U*U*U*5UV*U*U**U*U*u*U*U*U*U*5U*U*+U*Uj*-U*U*U*U*U+U*U*UT*U*U*U*U*U*U*U*U*U*U*U*U*UZ*U*U*U*U*UW6Uj*U*55U*U*U+U*U*U>U*U*U*U+U*U*U*U+U*U*U*U*U*U*U*U*U*U*U*U*U*5U*U*U*UU*U*U*U*U*U*U\*U*-+U*Uj*+U*U6jUJ*U*U*u*U*U*#-U*U*U*UjU*U*U*U*U*U*U*U*U*UZ*U*U*U*U~U*U*UR*U*U*U*U*U*Up p!pO04V*U*U*++U*UU +U*U*U*U*U*UzU*]*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UU*U?UV*U*U*U*U*U ``+U*Uj*+U*}*q+U:U*U*U*U*U*W*U*U:U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UZ*U~UR*U*U*U*U*U*U@+U*U*+TJ*Uh*U*U*U*U*U*U*U*U.U*U*U*U*U*U*u+U*U*U*U*5U.-U*U*U*U*U40A0.U*U:/U*U*5-U*U:U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uj:5U*U*U*U*U:@\>B8\<\88\"/U*U*UjZ**UjjW*U:+U*5u+-U*U*W*u+-]V*U*U*U*U+U*U*U*U*U*)U*U*U*U*U*U*UjW*U*U*U*)U*U*U*U*U*Up*U*0U*U*UjZ*U*Uj*U*U*E+U*U*U*U*+U*U*/U*Uj:-U*U*U*U*u*U*U*UT*U*U*U*U*U*U*U*U*U*U*U*U*UZ*U*U*U*U*U^6U:*U*U5U*U*U+U*U*U.U*U*U*U.U*U*U*u*U*U*U*U*U*U*U*U*U*U*U*U*U*UV*U*W*UU*U*U*U*U*U*UX*U*--U*Uj*+U*Uz*UZ*U*U*U*U*U*-+U*U*U*UjU*U*U*U*U*U*U*U*U*U*U*U*U*UzU*U*UR*U*U*U*U*U*U`PapZ ,\*U*U*M+U*UZ*-U*U*U*U*U*UjW*W*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UU*UzUZ*U*U*U*U*U@@*U*U*+-U* */U.U*U*U*U*U*]*U*U:U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UZ*UzUR*U*U*U*U*U*U.U*U*-4U*-U*-U*U*U*U*U*U*U*U>U*U*U*U*U*U*U+U*U*U*UZ*]j*U*U*U*U*U$  8U*U,U*U*5-U*U.U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UJ:5U*U*U*U*UF\"@BbBb"T*U*+U*[j*UZjU*U*,U*-}*+U*UjU*U+-UU*U*U*U*u*U*U*U*U*U*5U*U*U*U*U*U*U*_*U*U*U*+U*U*U*U*U*Up+Uj`U*U*U*k*U*U:*U*U*/U*U*U*UZ>U*Q*9U*UJ.+U*U*U*U*]*U*U*UV*U*U*U*U*U*U*U*U*U*U*U*U*UZ*U*U*U*U*Ux4U*U*U5U*U*U/U*U*U+U*U*U*U.U*U*U*u*U*U*U*U*U*U*U*U*U*U*U*U*U*U**U*_*UU*U*U*U*U*U*Up*U*U5e*Uj*+U*UZ)UR*U*U*]*U*U*]*U*U*U*U:U*U*U*U*U*U*U*U*U*U*U5U*U*UjW*U*UV*U*U*U*U*U*U 8pa!ra(X*U*U*u>U*Uj*5U*U*U*U*U*U*}{U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UZ*UjWj*U*U*U*U*U @.U*U*-5Uj'5Uz/U*U*U*U*U*}*U*U.U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uj*U*UZ*U*U*U*U*U*UU*U*U*5UzWZ*U*U*U*W*Ud  pU*U8U*U*U5U*U+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UJ*5U*U*U*U*UBb<UV*U*U*U*W*UD` @U*U`U*U*UVU*u+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U:U*U*U*U*U*U**5U*U*U*U*UFB FFbrB P*U*UU*-:*UZzU*EZQUZ*UZ*U*U.U*UN*5U*U*U*U*]*U*U*U*U*U*U*+U*U*U*U*U*U*}*U*U*Uj*U*U*U*U*U*U.uW*U*U*-+U**U*5U*=U*U*U*5U+-U*U^U*UV/+U*U*U*UjU*U*U*UJ*U*U*U*U*U*U*U*U*U*U*U*U*UT*U*U*U*U*U 0`x*U*UVV*U*U>U*U*u*U*U*U*U:U*U*U*]*U*U*U*U*U*U*U*U*U*U*U*U*U*U*5U*u*UT*U*U*U*U*U*U*+UZ*U*+-U*U*_*U*U*U*W*U*U*u*U*U*U*U.U*U*U*U*U*U*U*U*U*U*U*UJ*U*U*]*U*UT*U*U*U*U*U*U h ?xqgrsX0`*U*U*@_*U*UVZ*U*U*W*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*+U*U*-U*U*U*U*U`:rg<>8U*U*UUVZ$UJ*U*U*U*U*U*U*U+U*U+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*+U*Uj*U*U*U*U*U*U`U*U*uX*U*-Uj*U*U*U*Uj*U*UjW*U*U*U*U*U**UW*U*U*%U*UU*U*U*UjU*UL@ W*}@W*U*UVV*=4U*U*U*U*U*U*U*U*U~*U*]*U*U*U*U*U*UjU*U*U*U*U*Uj*5U*U*U*U*U:B:|:\B"@Z*5UZ*5*UZ:5U*UV*U*UU*U*U.U*U**5U*U*U*U*]*U*U*U*U*U*U*U*U*U*U*U*U*u+U*U*Uj*U*U*U*U*U*Ux?\*U*U*U5U*U*U*+U*uT*U*U*-U*(U*U/[*UVk*U*U*U*UzU*U*U*Uj*U*U*U*U*U*U*U*U*U*U*U*U*UU*U*U*U*U*U @*U*UzZ*U*UvU*U*]*U*U*U*UjU*U*U*W*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UU*u+UT*U*U*U*U*U*U\*+UZ *U*--U*U*]*U*U*U*W*U*U*u*U*U*U*U.U*U*U*U*U*U*U*U*U*U*U*U*UV*U*U*U*UT*U*U*U*U*U*Uz X h`=@VQ1@+U*U*X*U*U*k*U*UjU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*-U*U*U*U*U`bB <dcp?0U*U*UVZ6T*)U*U*U*U*U*U*U+U*U+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*-U*U*+U*U*U*U*U*UW*U*5p+U*5U*-U*U*U*U>*U*U W*U*U*U*U*Uj*U^*U*U*)U*-U*U*U*UjU*Ux@\*V*U*UVV*/UU*U*U*U*U*U*U*U*u*U*}*U*U*U*U*U*U*W*U*U*U*U*Uj*5U*U*U*U*U@BW*UZj*5 *UZ*-U*U^*u*U*U*U+U*Uj*5U*U*U*U*W*U*U*U*U*U*U*U*)U*U*U*U*U*U?U*U*UZ*U*U*U*U*U*U0*U*U*UVU*u*U*+UjWW*U*U*+UZ*U*u)_*UUk*U*U*U*U:U*U*U*U*-U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U @*U*UZk*U*UJW*U*W*U*U*U*UjU*U*UjU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UT*U/UV*U*U*U*U*U*UPU-Uj*U*--U*U*y*U*U*UjU*U*U*u*U*U*U*U.U*U*U*U*U*U*U*U*U*U*U*U*U**U*U*U*UT*U*U*U*U*U*UZP`@+U*Ujp*U*U*++U*UjU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*5U.5U*U*U*U*U@F pDA1aAl`U*U*UZZ.UZ*UU*U*U*U*U*U*U.U*u*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*5U*U+%U*U*U*U*U*UV*U*5/U*UU*UU*U*U*U*U*U*]*U*U*U*U*UZ*_z*U*U*)U*+U*U*U*U:U*U0pp\*U*UZjb+UZ*U*U*U*U*U*U*U*?*U*u*U*U*U*U*U*U*_*U*U*U*U*Uj*5U*U*U*U*U~@<V*U*k*5 *Uj*-U*U^j*+U*U*U+U*Uj)-U*U*U*U*W*U*U*U*U*U*U*U*UZ*U*U*U*U*U?U*U*UZ*U*U*U*U*U*U`*U*U*UZU**Uj*U~V*U*Uj.UV*U*=*Y*UuZ*U*U*U*U.U*U*U*U*UV*U*U*U*U*U*U*U*U*U*U*U*%U*U*U*U*U*U`0*U*Ujk*U*u ]*UjQ*U*U*U*U*W*U*UjU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UZ*U>UV*U*U*U*U*U*U`U.Uj*U*5-U*U*=*U*U*U:U*U*U*U+U*U*U*U+U*U*U*U*U*U*U*U*U*U*U*U*U*)U*U*U*UU*U*U*U*U*U*UPA+U*Uj@+U*U*--U*U:U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UV:5U*U*U*U*U@D0@!8C <W*U*U*[.U*5UV*U*U*U*U*U*U:U*u*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U/UU*U*U*U*U*U@\*U*,U*U*UV*U*U*}*U*U*9*U*U*U*U*UUz_*+U*U**5U*U*U*U*U.U*U@p*U*UZ*:*Uj*U*U*U*U*U*U*Uz*U*U+U*U*U*U*U*U*]*U*U*U*U*UZ.-U*U*U*U*U          @Ox"|D0`<`<`@ @?xD?0`xG?Ȁ`|px@o?ɈȇȀ怀0"|??a?0D`?`O?~]j?0Qj_:]q L`szo?x@G|~` p@ |~`@xpb @~4|:@\>B8\<\88\"x@y}} `|'DGpȄȀ@<~|~DɈȀ0p x0x? x@px@tpL:Uzo~_ Gxz xx|tO`O|xp@?~A@Ag`Oq?<~DC@|0~ F\"@BbBb"~@O~DxPD x DApψȄȀ`_*p DɈȀ♀0x"p `C~?`Op<?@@pU?Sxp!<𘀀@.Gpq`/Dc@Gp??MȀntEx?DAx  DaBb<p@qc1xO?@ DQa?~AhA0@@DxE၌ЇȀp`uAct0z@x`FB FFbrB @@y<~Ex~|`h0|ɈшȒ.U?>ADxȀ@"p`0``?0|awp@~A?.]7xC@ : pD~``Q`򣀀D|A80@p!|z7Ȁpb&xxx_8 pG@|/4:B:|:\B"|@ |tG~GD?D |ȓꈀU+U?}AxgȀ@|@{G?~A?|xp|pgA`@h~`| f?DDAA ~~`Oq1Ȁȃpbq#pG8D xA@ @B|@~bDa<D`? D ȑʙt*u;]D.Ȁ@ `|!x@`x~Aa_ =?@9Ag@~GA#!Dx?~Eq|D?Dx#0ɈȄȀ쀀0~?`1x@`@`b ~@<@f=|pG`?pD`t? Dȓ_j?]CD8<Ȁ@|xxO D??pQp @x+ <@qh?|Dh@!C |}{O`sx~!t                   ժժժժժժժժժ<ժ*U*U*MC|`?|/U*U*U*U*U*U*U:n|h+U*U*U*U*U*uU*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*Uv/DxBU*U*U*U*U*U@+UAd?1U*U*U*U*}W*U*U*U.U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ*U**U*O+U*5p/q*UJcC|Wx}/U*U*U*Uj+U*U*U:*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*U*UCbUjp?$D?b]Q?*U*U*U*UO+U*U*U*?U*U*Uj+U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*]eU*U*U* I~<~U:U*U*U*U*w+U*U*+U*Uj*U*Uժժժժժժժժժ*U*w*U*U~S*U*Uj.U*U*U*U*U*U*/bx+U.U*U*U*U*U?U*U*U*U*U*Ujk.U*U*]*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ{*U*u+U*U*U*U*U*upw@|CU*U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժժժժ_zWzߪ_*U*U~?U*U*U*U*U*U*uc_*U*Uv]: ~I*U*U*U*U*U*U*55U**U*Uժժժժժժժժժ:@\>B8\<\88\"ժ*U*U* K~7@h?$|W*U*U*U*U*U*Ujh +U*U*U*U*U*ujU*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*UFOyCP*U*U*U*U*Uz*U:xAD|U*U*U*U*}W*U*U*U.U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ*U*u*U*z+U*uq|q*U}_*O\"2 '/U*U*U*U*?U*U*U:u*U*U*U*u*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*U*U~"Uj`qqqqd?U*U*U*U:}+U*U*U*?U*U*U:U+W*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ>U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*]*U*U*UjsID_~UjUU*U*U*U*}*U*U*k+U.UjU*U*Uժժժժ<8\>0<<8D><\088Dժժժժժ*U*]*U*UqU*U*U*o+U*U*U*U*U*U*x?`+U.U*U*U*U*U~U*U*U*U*U*UjU.U*U*]*U*U*U*U*UժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժW*U*u/U*U*U*U*U*Uzx?@~I*U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժ_**U*U*U*U*U*5bW*U*UrKs/Da?U*U*U*U*U*U*ujU*_*U*UժժժժժժժժժF\"@BbBb"ժ*U*U*~B"bA q?}+U*U*U*U*U*U*wIN+U*U*U~*U*U*u]*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*Uf~D?U*U*U*U*U*U*UjAGd|@S*U*U*U*}W*U*U*U.U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ*Uj*U* Bp+U*UA%|_*U:1^*=|ys|/bO#/U*U*U*U*}?U*U*U:*U*U*U*u*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*U*U: B~2UjAd>Gt'b*U*U*Uz9+U*U*U*}U*U*U:*W*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ~u?U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*u4U*U*Uz:y]nW*U*U*U*U*U*U*U**U.Uj**U*UժժժժBD"@HBDD@$"HDDժժժժժ*U*U*U*U:p!U*U*U*9*U*U*U*U*U*U*u|*U.U*U*U*U*UzW*U*U*U*U*Uj+.U*U**U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ?U*U*uW*U*U*U*U*U*}|_Bp?U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժk/U~/U*U*U*U*5~U*U*U^(}GI?r_*U*U*U*U*U*uU*U*U*UժժժժժժժժժBb<U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ*UjU+U*Bd*U*U'DW*Ujq!W*u_F~?h1.U*U*U*U*uU*U*Uj}*U*U*U*u*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*U*U*B~7U*$/ ~q't?U*U*^3+U*U*U*uU*U*U:U*_*U*U*U*U*U*U*U*U*U*U*U*UժժժժժժժժժzU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*u?U*U*U> i]~+}U*U*U*U*U*U*U*U*U.U*U*U*UժժժժD<<~DD<~B<DDժժժժժ*U*U*U*Uj?U*U*U*U*U*U*U*U*U*U*U\*U>U*U*U*U*Uj_*U*U*U*U*UjU.U*U*k+U*U*W*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*U*uM|/U*U*U*U*U*U~~BHy_*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժu{ժW*U*U*U*5>U*U*UZj| ix/U*U*U*U*U*ujU*U*U*UժժժժժժժժժFB FFbrB ժ*U*U*uxq_W~$tB~+U*U*U*U*U*5H+U*U*U~+U*U*u]*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*U:8DxGP?"p?U*U*U*U*U*U*}q+~{o*U*U*u_*U*U*UU*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ*Ujk+U*5Pt*U*U~U*U*CU*U~Q~?b<.U*U*U*U*U~W*U*U*_*U*U*U*u*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*]*UjpC>U*%.||?&t_*U*u{+U*U*U*uW*U*Uzj_*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժj*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UgIG].}+EU*U*U*U*U*U*U*U*U.Uj*+U*UժժժժD BFDDBFB DDժժժժժ*U*U*U*U*/U*U*U*U*U*U*U*U*U*U*U?@W*uU*U*U*U~p{+U*U*U*U*Uj).U*Uj+U*U*W*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*U*U%|W*U*U*U*U*U*?xBP q/U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ+U*U*U*5.U*U*U~+]?~ b{W*U*U*U*U*uuU*U*U*Uժժժժժժժժժ:B:|:\B"ժ*U*U*UqrW%q_U*U*U*U*U*u_O+U*U*Uj/U*U*U?}*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*Uj1Dyd?p_*U*U*U*U*U*U_*}8oxO*U*U*u_*U*U*uzU*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ*UjU*U*u0B~_*U*U<|U*U*xU*U*U:b.U*U*U*U*Uz_*U*U*U*U*U*U*+U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*]*Uj0,U*+u8%x#Dx/U*J+U*U*U*U_*U*UjU{u*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժ?U*U*U*U*U*U*U:U*U*U*U*U*U*U*U*U*U*U*us}|{/U.9U*U*U*U*U*U*U*U*U/UjU+U*Uժժժժ8|><:8>|<:B>8>ժժժժժ*U*U*U*U*u+U*U*U*U*U*U*U*U*U*U*UjU*ujU*U*U*U???>U*U*U*U*UjU.U*Uj*+U*U*_*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*U*UID~+U*U*U*U*U*u|_xyW*U*U*U*U*UժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժU*U*U*u/U*U*Ujabx/|+U*U*U*U*u*U*U*U*Uժժժժժժժժժ@Bժ*U*U*UCBpBU:r*U*U*U*U*U{\+U*U*Uj/U*U*U.W+U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*U*c zrOx/U*U*U*U*U*UzU*UszHL+U*U*u_*U*U*uU*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ*Ujk*U*UaCX*U*U:pR/U*m~U0/+U*U*U*U*U*U*U*u;Ujk*U*UժժժժBBժժժժժ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*]eU*U*U*uix*}W*U*U*U*U*.U*U**U*U*]*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*U*UYdU*U*U*U*U*U~~/uqQ|+U*U*U*U*UժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժW*U*U*u+U*U*U*U~@/yG~U*U*U*U*U;U*U*U*Uժժժժժժժժժ~@<ժ*U*U*UBBtU*$BDU*U*U*U*UfI+U*U*U*/U*U*UjU+U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժ*U*U*CEB|#~y_*U*U*U*U*U*U*UNcO+U*U*u_*U*U*ujU*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժ*U*U*U*UC^*U*Uj@/U*U*U*U*U*Ujc#"+U/U*U*U*U*}+U*U*U*U*U*Uj.U*U*]*U*U*U*U*Uժժժժժժժժժժ*U*]*U*CBD*U*$d_*UCtz8~Q|7;hp*U*U*U*U~+U*U*]:u*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ/U*Uz_*uu*U*U*U*U*U*U*U*U*U*U*5'~*U*UooW~GU*U*U*U*U*U*U*u:Uj*U*Uժժժժ<<ժժժժժ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*]jU+U*U*= yp?U+U*U*U*U*+U*Uj*+U*U*_*U*U@ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*U*US$d+U*U*U*U*U*@.UCA~Y*U*U*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ_**U*u+U*U*U*U*Uz` M+U*U*U*U?U*U*U*U                     ժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U*xODP!],=* YU D*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժ*U*U*U*U*U>U8*E-u Z2E+L*D*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժ՚Iժժժժժժ/U*U*U*U*U*U*U*U*U*U p/|qk9,U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U*U*U*x~`Pkq 6a\U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UժժժժժժժժժժժժժժժժժժժժժժժՖIժժժժժժ*U*U*U*U*O*U*x*UbS*U*U*U*U*U*U*U*U*U*U*Uժժժժժ՚Iժժժժժժժժժժ}~_ժժիժ+yu?/ժժժժ*U*U*U*UBU*U*q+U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժ<ժժ՚Iժժժժժժ*U*U*U*U*E#Ub;*%\JQ2$E*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժժժ՚Iժժժժժժ*U*U*U*U*y*U*N*}yT*W U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժ*U*U*U*U*|z{| , W!YUaS*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժ՚Iժժժժժժ*U*U*U*U*UU*U*U*U*U*U*U*U*U*U*|Oj=/U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U*U*U*U|@ xP"t U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UժժժժժՎժժժժժժժժժժժժժժժժժժ՞Iժժժժժժ*U*U*U*U*O*U*<*UbS*U*U*U*U*U*U*U*U*U*U*Uժժ<<\88ժժժ՚Iժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*UbQ*U*Q+U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժ:@\>B8\<\88\"ժժ՚Iժժժժժժ*U*U*U*U*U'Ub9*'jU&*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժժժ՚Iժժժժժժ*U*U*U*U*q(U O*yT*WJU*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U*Up@?H, S0TUxS*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժ՚Iժժժժժժ*U*U*U*U*U|.1JSPTxQ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժ՚Iժժժժժժ*U*U*U*U*<|E.eI "u)LW"U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժ՚IժժժժժժկU*U*U*U*U*U*U*u?U*U* ~+U*U*U_*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U~|p^*T 7U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UժժժժժՎժժժժժժժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U*^*U*<*UbQ*U*U*U*U*U*U*U*U*U*U*Uժժ~~<ժժժ՚Iժժժժժժժժժժժժժժժժժժ>}ժժժժժժ*U*U*U*UjS*U*q)U*T*U*U*U*U*U*U*U*U*U*U*UժժժժժժժժժժժժժժժժժժժժBb<lF)U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժ՚Iժժժժժժժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U**U*\*UjU*U*U*U*U*U*U*U*U*U*U*Uժժ:<<ժժժ՞ժժժժժժժժժժժժժժժժժժՖIժժժժժժ*U*U*U*UJW*U*q(UJG*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժ:B:|:\B"ժժ՚Iժժժժժժ*U*U*U*U*Uz4*+90T$E#D*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժժժ՚Iժժժժժժ*U*U*U*U*e+U*W*uL SjT(U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U*U*U?`xp1"`49T*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժ՚Iժժժժժժ*U*U*U*U*xpa? U!)y(NDR U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժ՚Iժժժժժժժ_>uzժO^u;}ժժ*U*U*U*U*T*U* U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U*U*U*U*U*U*~xs nw-U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժ՚Iժժժժժժժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U**U*^*UjT*H*U*U*U*U*U*U*U*U*U*UժժժժժՎժժժժժժժժժժժժժժժժժժՖIժժժժժժ*U*U*U*UJG*U*q*UjG*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժ@Bժժ՚Iժժժժժժ*U*U*U*U*Uz$*U+y:P E# L*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժժժ՚Iժժժժժժ*U*U*U*U*e#U**eN\JS"T.U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U*U*U*`?x~d`4AU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժ՚Iժժժժժժ*U*U*U*U*A/=|V!,9*F`ST*T*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժ՚Iժժժժժժժժwժo~]_ߪժժժ*U*U*U*UT*U*a#U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժ՚Iժժժժժժ/U*U*U*U*U*U*U*U*U*@@?ns,U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժժժ՚Iժժժժժժժժժժժժժժժժժժ՚Iժժժժժժ*U*U*U*U*}*U*N*zT*@*U*U*U*U*U*U*U*U*U*Uժժ~~ժժժժժժժժժժժժժժժժժժժժժՖIժժժժժժ*U*U*U*U O*U*x*UjW*U*U*U*U*U*U*U*U*U*U*U@ժժժժժժժժժժժժժժժժժժժժ~@<ժժ՚Iժժժժժժ*U*U*U*U*U>Uz$*U)q P$E# *L*U*U*U*U*U*U*U@ժժժժժժժժժժժժ՚Iժժժժժժժժ՚Iժժժժժժ*U*U*U*U*e#Ub;*e.\JS2U.U*U*U*U*U*U*U*U*U                     p#%##27#(PP(#PPPdi#d(P _ 0LEHJJJJJhi"ƴLELǶ-^ƴHJJJJJhLǶLF浅:µL HH8:CC:Bȍ:e:µCssBs췭µ BCȱBȌs µ<µ(пB=ȱBHHBC hh sЌ( BChh`뷭ª `LҦ@X\BA80ĭ9#9ŭ$Axy$@]PB­` գ ze)rs zrs qLY TO START" 26001 M$" "; 2600 (16384)127Ĺ16368,0:0:179,6190,6190,153179,153179,6: 2510( I1(M$):I1:27:(M$,I,1)2 I< :5:"MAX: "MH" "L$;:5:"STANDARD: ";(128LS);" ";L$T:5:"MIN: "MN" "L$Z:"HOW HIGH UP DO YOU WANT TO GO";:H:HMNHMH2160H((MHH)LS)10  16368,0 7:179,6190,6190,153179,153179,6  M$"HIT A KE68,0t(16384)1281140*~16368,006::12:"DO YOU WANT ENGLISH OR METRIC (E/M)?";:E$:E$"E"E$"M"2005LS1:L$"FT"E$"M"LS.305:L$"M"9MG32.2a16368,0fMH(165LS)kMN(55LS)p:6zYH0:1X,YR820/54,0:55,96CV%(2G(YH))QV1%V%LSe5:20:V1%" "2:15:(T100)100;" "8:16:((175Y)LS);" "L11:13:(GF10)10;" "VPP(16384)[PP1281200`PP155716j163:1(X),Y"54,189:55,158::(q:2:12:"DO YOU WANT TO GO AGAIN (Y/N)?";:W$:W$"Y"W$"N"720wW$"N"ĺ(4);"RUN HELLO"200016304,0:16299,0225 *YS14YYYS:Y159570>YSYS1:7:1X,:I1300;A(1)4020X:BY(1)45:(1)7A<B190B190N=A2A1`>(X),Y4A,Br?A(I)A:B(I)BDPP(16336)IIK0NI130S(X),Y4A(I),B(I)XIb7167:1X,YV%01025I12000:I: 07:1X,Y(X)MX700(GFDG32.2?V%VO%DGT2:1025M 0:1X,YV475\!j"T30:X2Xx&7:1X,Y)T3T3TI:TTTI*GF0:1025+0:1X,Y0XX2V%T33X38007Y.5GT3T3Y%(I)18Y190Y191:5709550 A32.2YY%(I):1000.0:1X%(I),Y%(I)?RTRTST:RTJTTTIQIY16hI16:DG48|V(2G(YH))MX(X%(I)VV.5DG)XX%(I):YY%(I)1:T2TI:VO%V%TTTI:T2T2TIXX%(I).5DGT2T2VT2X125545SC>...QUIT"'17:7:"...PAUSE"1"4:0>%1255,HH&2500R'TTIc,TTTI:X255t1Y.5GTTH2YY%(1)RT0:38067:1X,Y;GF0@1000h0:1X,Yr300|STV%40:I116ST7:1X%(I),Y%(I)GFV%V%R ". 5:3:"VELOCITY ("L$"/S): "S 8:3:"HEIGHT ("L$"): "r 11:3:"G'S FELT: "y 7 0,95168,95 63,112117,111 0,145168,145168,0 0,0279,0279,1910,1910,0 14:10:"COMMANDS" 16:7:">" 0(16384)12748 22000 FX%(17),Y%(17),A(30),B(30) :"BLOAD FF TITLE PAGE"I "BLOAD HIRES CG":"BLOAD LCLETTER"b(::16:"FREE FALL"w*16:"---- ----"-:"FREE FALL IS A PROGRAM THAT SHOWS YOU ":"GRAVITATIONAL ACCELERATION. BY CHANGING " ."THE HEIGHT FROM WHICH THE CAR DRO     W_zuWk{W?}U*}/ukuzW?}kuzzW߮U~UzUzx_.uU~WkuzzkWz_~uWU~|ߪ+Uz׿kuzku/ߪ?UUz?UzU~p/k_.ukk/Uzkuz_*zWz+u߾WU~xߪߪ+UzW?}+uzzW?u?U?U~|_*u_~u/UzkuzתzkUj߾W?Uzxߪ+Uz׿zku/}z?u?Uz/k_juk_~ukߪ/UzkuzW.jUz+U߾W?Uzp+]zW?}/}zjU?}z?}z?]z_ju_>uߪkuz׿jzku+߮ߪW?}zpU+_z׿zkU*?}z?}z?zk_ju_>ukߪkuzW?}+uzzW߮ߪW?}z@+zW?}/}U*}+U?Uz?Uz?zz#Xı  РǪ ΠӠ ϠӠ Π ƠŠŠ" àŠŠ" ŠˠŠŠ"ǠŠŠ"Рՠ ŠˠǠàɠ ǠŠ̠ Ӡ٠Š"" ΠΠ"ӠŠŠ"Š̠ Ӡ٠ ҠΠ ǠǠàӠǠʠβ ̠Ϡ αҠ Ԡ ̠ӠŠŠǠGE, SEX, AND "G *"BACKGROUND PULSE RATE AND WILL THEN TELL "~ +"YOU WHAT TO DO TO SIMULATE EACH RIDE.":16368,0 ,"%CT7":23:5:"<< HIT ANY KEY TO CONTINUE >>" -(16384)12845 ."%NW":"%CT3" 02000g2"%NW":R$(1)"FREE FALTION, ":"AND DIZZINESS CAN RESULT IN A WIDE "[ &"SCREEN MOVIE, FOR EXAMPLE." '16368,0:"%CT7":24:5:"<< HIT ANY KEY TO CONTINUE >>";:E$:"%CT3":"%NW" (:"TO SIMULATE A RIDE, THE PROGRAM WILL " )"FIRST ASK YOU FOR YOUR A ":"SIGNALS TO THE BRAIN, AND WILL CAUSE ":"LIGHT-HEADEDNESS, STAGGERING, AND EVEN ":"NAUSEA IN EXTREME CASES.":9 %"DIZZINESS CAN ALSO BE STARTED BY VISUAL ":"CLUES. THE BRAIN CAN INTERPRET SOMETHING ":"MOVING AROUND YOU AS YOUR OWN MOOTION."F "%CT7":23:5:"<< HIT ANY KEY TO CONTINUE >>";:16368,0\ !(16384)12833 ":"%CT3":"%NW":"ON FAST-SPINNING,CIRCULAR RIDES, EXCESS- " #"IVE STIMULATION OF THE SEMICIRCULAR EAR "} $"CANALS IN ONE DIRECTION SENDS UNUSUAL IDES. THESE FEELINGS CAN BE "W "DUPLICATED IN SEVERAL WAYS. PHYSICAL " "ACTIVITY AS WELL AS HIGH-STRESS " "SITUATIONS CAN RAISE YOUR PULSE RATE. " "DIZZYNESS IS PRIMARILY CAUSED BY FAST " "CIRCULAR My  254724"%CT7":10:"SENSATION SIMULATION"T10:"--------------------":"%CT3":"SENSATION SIMULATION IS A PROGRAM TO ""SHOW THE INCREASE IN PULSE RATE AND ""DIZZYNESS CAUSED BY RIDING AMUSEMENT "% "PARK R      '"'<*** "ISL HELLO" ***>($'<.'*** WRITTEN BYT8'*** LYNELL JACKSONnB'*** JANUARY 14, 1987tL'V'*** LAST MODIFIED BY`'*** LYNELL JACKSONj'*** JANUARY 27, 1987t'~'<*** "ISL HELLO" ***>DMONDAY-SATURDAY." #""F#"TECHNICAL/SOFTWARE SUPPORT HOURS ARE"w#"8:30 AM --> 4:30 PM PST MONDAY - FRIDAY." #""#"CALL US FOR A FREE CATALOG OF"#"COMPUTER SUPPLIES AND THE LATEST AND"#"MOST UP TO DATE PUBLIC DOMAIN SOFTWARE." Z#"A DIVISION OF U.S.COMPUTER SUPPLY INC."O d#"511-104 ENCINITAS BOULEVARD"j n#"ENCINITAS, CA 92024" x#"(800) 992-1992 (USA) #"(800) 992-1993 (FOR CA) #"(619) 942-9998 (FOREIGN) #"" #"ORDER HOURS ARE"#"6:00 AM --> 4:30 PM PST l24:7110 vGO$: # : TB%(21(PR$)2)I TB%:PR$;O U (#r +#<*** DATA LOCATION ***>x /# 2#"FOR OTHER PUBLIC DOMAIN AND" <#"USER-SUPPORTED PROGRAMS PLEASE CONTACT:" F#"" P#"THE INTERNATIONAL SOFTWARE LIBRARY",16297,1:16300,1:16301,1:16304,12 70108 @ :M I1ND%_ PR$:I:7110f Ip 7010v  RN$""ė:D$;"CATALOG": (:D$;"RUN ";RN$ 2 X [<*** SUBROUTINES ***> _ bPR$"< PRESS ANY KEY TO CONTINUE >" GF%11110 :E PR$" U.S. COMPUTER SUPPLY INC. PRESENTS:"S 10:7110 PR$"THE INTERNATIONAL SOFTWARE LIBRARY" $13:7110 .7010:1210 L V: `PR$"* LOADING PROGRAM *" j11:7110: ~D$;"BLOAD ISL HELLO.GRAPHIC"( CING FOR PRINTING DATA LINE6 * I = LOOP VARIABLE S * GO$ = CONTINUE STRING GF%0:* DISPLAY GRAPHIC FLAG, 1=YES, 0=NO ND%20:* NUMBER OF DATA LINES RN$"":* NAME OF THE PROGRAM TO RUN NEXT  <*** MAIN PROGRAM ***>  <*** "ISL HELLO" ***>">*** PROGRAM WRITTEN BYV(*** LYNELL JACKSONp2*** JANUARY 14, 1987vdg<*** VARIABLES ***>knD$(4):* CONTROL-DxH$(8):* CONTROL-H* PR$ = DATA LINE FOR PRINTING * TB% = TAB SPA     h  **"">""~DD~0H ">  I**II*I*@`pxp`@@@  |*((  >  <   TEACUP(RU((250PU)10)AG42$DI10;.JU0Cs66N"%QT"X::""L$"Q"ıL$"0)AG4: DI2D JU4! 664 LOOP COASTERO RU((260PU)10)AG3X DI1a JU2i 66y SCRAMBLER RU1 DI8 JU0G 66H ROTOR R RU1\ DI6f JU0 66 ENTERPRISE RU1 DI3 JU266TER, DON'T YOU KNOW?":2030L14:" "lFL1Ģ14:"THAT'S BETTER."uFL0I1200:I3 FREE FALL RU((250PU)10)AG3 DI1 JU3 66 WOODEN ROLLER COASTER0 RU((300PU)1RRECT?":2020]PU120Ģ9:"BOY, ARE YOU OUT OF SHAPE.":"TRY TO GET SOME EXERCISE, OKAY?"12:"PLEASE INPUT YOUR SEX (M/F): ";(8);:"";S$(S$)0ĺ:"WHICH ONE DUMMY, NOT HOW OFTEN! ":FL1:2030S$"M"S$"F"ĺ:"WHAT'S THE MATU WOULD BE DEAD! TRY AGAIN. ":20209:" " PU150Ģ9:"I'M SORRY, BUT YOU PULSE IS TOO HIGH TO":"RIDE SAFELY. ARE YOU SURE IT'S CO2020AG27AG2:20201AG40AG3:2020GAG65AG6:2020sAG64ĺ:"SORRY, TOO OLD. ":20104:" "7:"PLEASE INPUT YOUR BACKGROUND PULSE: ";(8);:"";PUHPU40ĺ:"COME ON NOW!, YO"5:"3) QUIT."5:5:"WHICH? ";(8);:"";WHJWH1ĺ"%ND":50aWH2Ľ:"%ND":46WH3ĺ"%QT":(4);"RUN HELLO"6502:"PLEASE INPUT YOUR AGE: ";(8);:"";AGAG5ĺ:"SORRY, TOO YOUNG.":2010AG12AG4:!"%SH+29800"&DI6600/)I1200:I>+RZ0:AR.5W,"%PY-14,TY35,RZ";RZm-RZRZAR:ARAR.5}.RZ655700556:"%SH+30200,RZ-65"Xb:10:"ALL SET!!!"l17:5:"1) TRY ANOTHER RIDE."v5:"2) LET SOMEONE ELSE TRY.0,PY-5"E@T55:Y55(VT2TT):"%SH+29800,PY";Y:TV"%SH+30000,PY-5"\kDI01999QW$" TIMES.":DI1QW$" TIME.":10:"SPIN AROUND "DI;QW$TU(DI)256R0TU32"%SH+30200,RY";RR1024ĺ"%CG1"R18(C);"SC";SX%478.475U"%SH+29800,PY0":"%SH+30000,PY-3"~V1:QW$" TIMES.":JU1QW$" TIME."V1:JU0500:10:"JUMP "JU;QW$E1JU1T55:Y30(VT1TT)"%SH+29800,PY";YT"%SH+3000OR ":10:RU6;" SECONDS.")jI1(RU)IkA85:B85:C30:S(S):110klA85:B85:C30:S(S):110wmI:455nXABCx"%SH+29000,PX";X;",SX";S"%SH+29200,PX";X4(C);"SX";S"%SH+29400,PX";X8(C);"SC";S"%SH+29600,PX";XUR;") ";R$(UR)?56FAR3000,3100,3200,3300,3400,3500,3600,5000LBRCD"%NW":"%CT7":3:"TO SIMULATE THE ";R$(R);": "F"%ND,RZ0,CG3,PY-5,PX-85,RY0"K"%YD"gS8hRU(RU2)41:RU2RU1i:10:"YOU MUST RUN VIGOROUSLY FT7":22:"USE ARROW KEYS TO CHOOSE.":"HIT ";::"RETURN";::" WHEN READY."T7R1b8"%CT7":y9RZRZAR:ARAR.75:(3R2):R;") ";R$(R);URR:W$:(W$)1365<(W$)8RR1:R1R8=(W$)21RR1:R8R1>"%CT3"::(3UR2):LING RIDE":R$(2)"WOODEN ROLLER COASTER":R$(3)"LOOP COASTER":R$(4)"SCRAMBLER RIDE":R$(5)"ROTOR RIDE"3R$(6)"ENTERPRISE RIDE":R$(7)"TEACUP RIDE":R$(8)"EXIT"4:"%CT7":18:"MENU":18:"----":"%CT3"5I18:(3I2):I;") ";R$(I):IL6"%CHAVE MADE "PL(1)PL(2);" SHOTS"C*"ANOTHER BALL TOSS (Y/N)? ";A$a/A$"N"ĺ(4);"RUN HELLO"p4A$"Y"10z\4650 MOVE UNTIL SHOT:(21):"PRESS <- TO MOVE LEFT":"PRESS -> TO MOVE RIGHT":"PRESS RETURN TO SHOOT"MO2Ģ(21):(33):23XC3:V4XM,126:3XM,108:2XM,97:9XM4,105:10XM17,116:1XM26,123`XNXMf~ *** DISPLAY SCOREMO14600(21):"PLAYER 1 YOU MADE ";PL(1);" SHOTS ":"PLAYER 2 YOU MADE ";PL(2);" SHOTS ":4700(21):"YOU .5PI:YY5A2.5PI# X273240> A2((Y5Y)(XX5))PIQ XX5A2A2PIh AN(A2A1)2A1PI V(VX2VY2).5.8 VX(AN)V VY(AN)V  DRAW MAN04XN,126:3XN,108:2XN,97:9XN4,105:XHXN17,116:1XN26,1 X35Y40Y30SH1:S11:3070/ S10SH0> S11S10 SH1X27X4Y40DE0ĺ"":Q121:VX0:VY10:1000:7000:Q:R1:XM236:PL(PL)PL(PL)1  VX0A11.5PI:VY0A1.5PI:3210 A1(VYVX) VX0A1A1PI XX5A211:VYVY5$ X274VXVX.8:X274; X8VXVX.8:X8o XXM10XXM10Y80Y82VY.5Y80:VYVY.8 XXM10XXM10Y85VXVX:XXM11(VX) ((X27)2(Y40)2).57X527:Y540:3200 ((X4)2(Y40)2).57X54:Y540:3200  MO2Ģ(21):"PLAYER ";PLM (22):"WHAT IS THE SHOOTING ANGLE? ";AN (22):"WHAT IS THE VELOCITY OF THE BALL? ";V  ANAN3.1415926535180 VXV(AN):VYV(AN)  *** CHECK FOR BOUNCE Y141Y141:VY(VY.6):D0D XXVXDT YYVYDT* DE01110 (21):"HORIZONTAL VEL: ";(VX100)100;" ":"VERTICAL VEL : ";(VY100)100;" ":"PRESS ";::"/ESC/";::" FOR THE NEXT SHOOT." V  *** INPUT INFORMATION PL2PL0 PLPL1 DE09000< X0705:X,10:X,70:X:Y10705:70,Y:YF 5000P 2000Z #6000d (1000n 23000x 77000 8Q(16384):Q1554500 9R14500 <40  *** MOVE BALL X60Y70Y10DE0DT.1:1010 DT.5 VYVY4.9DT 232,0:233,3:1:0:3@(4)"BLOAD SHAPE TABLE,A$5DDF"o232,223:233,93:115,80:116,93:SIZE1:0(4);"BLOAD BASKET,A$5D50":PI3.141592654:XM236:DE0 ::R00,00,148279,148279,0232,80:10,40:232,223      @-------------9;??wI m 5 3 . wk 3 3------  J>>> <"<""" <"""<"><(""< """"  0 " " ?IIII$$$$"""""<""< &< >"""""""""**6"""""< >>880"**:<"">""""""""""""">>><2"<""">""" "  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> ><< @< <(D>>< (&20 *<**>>@ "2*&" " >>  ">> "8""> """"""<   >> "PRESSIONS USED TO DRAW THE SHAPES. " '"USE THIS PROGRAM TO DETERMINE THE ":"THE RELATIONSHIP BETWEEN THE TRACK'S ":"SHAPE AND THE HILLTOPPING SPEED. THE ":"INITIAL SPEED OF THE COASTER REMAINS "u ("CONSTANT. TO PLOT"; ""SHAPES WITH VARIOUS WIDTHS AND HEIGHTS. ":35:38m #16368,0:23:7:"" $(16384)12736:16368,0 %% &:"THE FORMULA CAN BE FOUND IN A MATH BOOK ":"OR BY LISTING THIS PROGRAM AND CHECKING ":"THE EXTHEY GO": :"OVER THE TOP OF A HILL. PARABOLIC HILL":k "TOPS PROVIDE SUCH SENSTIONS. THE COASTER " "RIDER FOLLOWS A PATH QUITE SIMILAR TO A " "THE TRAJECTORY OF A TOSSED BALL - A " "PARABOLA. PARABOLAS ARE A FAMILY OF N :"BLOAD HILLTOPPING TITLE PAGE":"BLOAD HIRES CG":"BLOAD LCLETTER"i::15:"HILLTOPPING"15:"-----------":"IN ORDER TO THRILL RIDERS, ROLLER":"COASTERS ARE DESIGNED TO MAKE THEIR ": "PASSENGERS FEEL WEIGHTLESS AS      -ۛ???6?888cۛ666666>??L)$$$$$$$d --%??(((( P <$$%$R6. -(` $$$ $%$ 6666 -((((((d((((((((((-----(-----5--:??????????--5--@  .z*W}I!?8?6vv--( $"o !-(666?7&P -#$$,%O,.,.,.>??"?-($5666668????'%'%$$-($5666668????'%'%$$$$- $?66666666N- -$< 3w66>?W6??$$$<66676 $MIIII666>?W6666666.%$ $$ $$L1 '10SP5(P5256)256:P41,(P5256):P4P5:10040H.'10010\8'P6:P6010010b='B' 10,40,1000,1010,1110,2000,3000,3050,3070,3100,3200 L'3210,3240,4000,4020,4500,4600,5000,5020,5025,5030,6000,7000,7100,8000,9000,9130,10000,10010 ,10GAME TO BE ";i#"PLAYED BY TWO PEOPLE. THE FIRST MOVES THE PLAYER AND THE SECOND SHOOTS THE BALL.";#10:1:"TIME SLOWS DOWN INSIDE THE BOX."#(15):(5):"WHICH MODE (1 OR 2)";:Q$:Q$"1"Q$"2"9130#Q$"1"MO1#Q$"2"MO2#P MANDELSTEIN"d#X12000:X'#DE1/#: #" THE PURPOSE OF THIS PROGRAM IS TO DEMONSTRATE PARABOLIC ARCS. THE PROGRAMHAS TWO MODES. THE FIRST IS A PRACTICE MODE IN WHICH THE USER MOVES THE PLAYER AND SHOOTS THE BALL. THE OTHER MODE IS A 7,4028,4028,4127,41T-(# *** INTRO \-#(22):(16)::"BALL";::" ";::"TOSS":2#4020:1XM26,123:1XM26,110:6000<#VX27.577:VYVXF#Q118:1000:3000:7000:Q:VX0:Q18:1000:3000:7000:QP#"" Z#(23):(11):"BY DAN336XM4,105:1XM9,83:5XM4,105:1XM1,80OXXM1:Y80:X1X:Y1Y:gX *** PLOT THE BALLbX274X8Y0Y1417100l1X1,Y1:DE0ēX1,Y1v1X,YX1X:Y1Y232,80:10,40:232,223@ DRAW BASKETJ0,405,40:2:5020;(A$)13XXM:Y123:1XM26,123:1XM26,110:E5030Up HOOK SHOTz10XM17,116:1XM26,110:9XM4,105:8XM4,105:1XM38,1018XM4,105:1XM38,101:7XM4,105:1XM22,817XM4,105:1XM22,81:6XM4,105:1XM9,8"PLAYER":(22):(36):PL"5025,400064020>A$(A$)8XM15ĕ1XM26,123:10XM17,116:11XM17,116:1XM26,140:XMXM5:XH11:XC17:5020(A$)21XM236ĕ1XM26,123:10XM17,116:11XM17,116:1XM26,140:XMXM5:XH11:XC17QQ(16336)(16336)(16336)77:0,154279,154=|UX((3VTV)ST)SCjY(10.532TT)vFL1ıT0CXX6:CYYT0CXX:CYY5T0CXX6:CYYCX2,CYCX2,CY:CX,CY2CX,CY2CX2,CY1CX2,CY1 CX1,C EXAMPLES."yRI3ĺ"NOT VERY GOOD. YOU MISSED ";4RI;" QUESTIONS OUT OF 4. YOU SHOULD LOOK AT SOME MORE EXAMPLES."16368,020:4:"< HIT ANY KEY TO RETURN TO MENU >"(16384)127147716368,0:50(4);"RUN HELLO"!"(16384)1271462,:16368,0:I410RI4ĺ"GREAT! YOU SEEM TO UNDERSTAND THE RELATIONSHIP BETWEEN TRACK SHAPE AND HILLTOPPING SPEED." RI3ĺ"NOT BAD. YOU ONLY MISSED ONE QUESTION. IT MIGHT BE HELPFUL TO RUN A FEW MORE %I14:10:Q$(I);" (T/F).";:Z$XZ$A$(I)RIRI1::::"THAT'S RIGHT.":1460::"SORRY, THAT IS WRONG."::"THE CORRECT ANSWER IS ";A$(I)"F"ĺ"FALSE."A$(I)"T"ĺ"TRUE."16368,020:5:"<< HIT ANY KEY TO CONTINUE >>T"RQ$(3)"THE FLATTER THE CURVE, THE FASTER THE HILLTOPPING SPEED":A$(3)"T"Q$(4)"ON A VERY STEEP NARROW HILL, THE COASTERROLLS VERY SLOWLY OVER THE TOP":A$(4)"T":"PLEASE ANSWER THE FOLLOWING TRUE/FALSE QUESTIONS WITH A T OR AN F."::SI0 Fx+:14:"COASTER QUIZ"C14:"------- ----"Q$(1)"COASTERS ALWAYS GO THE SAME SPEED OVER THE TOP OF A HILL NO MATTER WHAT THE SHAPE IS":A$(1)"F"Q$(2)"THE WIDER THE PARABOLA, THE FASTER THE HILLTOPPING SPEED":A$(2)"QUATIONSSTART HERE...8 -----------------------F9VVM1.47U>ST1403VdCSTSC,154sRT33.1fX((3VTV)ST)SCpY10.532TTX,YT------------------------ SC1SI1SC.7T=";(VT);" ";"192,89279,89IU18:36:U12:("VECTORS",U,1)PU^XL0765YQ22:XOXL,YOYQXOXL3,YO:YQ7YL0405XQ22:XOXQ,YOYLXO,YOYL3(T):XQ405-----------------------PARABOLA E(64(Y10))VM%VY(VTVTVMVM).PL18XLVMLYL(T)VY2.2WXO200jYO121(T)28XO,YOXO5XL,YOXO,YOXO,YOYLXO,YOXOXL,YOYLD932:D:"VX=";(VM);" "32:D1:"VY=";(VY);" ";32:D2:"V41410]PL1700Qb0:XO,YOXO5XL,YO:XO,YOXO,YOYL:XO,YOXOXL,YOYLzdYQ22:XOXL,YOYQXOXL3,YO:YQgXQ22:XOXQ,YOYLXO,YOYL3(YL):XQi VECTORS ARE DRAWNl IN THESE LINES7FL1:5500:FL0VT9:6:"RET VECTORS"*29:7:"ESC EXIT"3T3=5500K16368,0[P(16384)iP15550yP13650016368,0:T3405TT.555905000P14960016368,0T3405TT.5:5590 5000XP1Y"ĺ::120505192,0192,154:192,60279,60F54,0:55,96]31:2:"COMMANDS"p211,17264,17197,27217,27:213,25216,27:213,29216,2733:4:"RIGHT"217,34197,34:201,36198,34:201,32198,3433:5:"LEFT"2u0,0279,0279,1540,1540,0Nx"WHAT IS THE PEAK SPEED (MAX 27 MPH)";:VM{VM27ĺ:"MAX IS 27. PLEASE TRY AGAIN."::120800SI019016368,0"DO YOU WANT ANOTHER CURVE SUPERIMPOSED ON THIS GRAPH (Y/N)?";:Z$ Z$"NTS"(7" OF A SINGLE PARABOLA"R8::"3)......TAKE A QUIZ ON COASTER"v9" SPEED AT ITS HILLTOP":::"4)......EXIT"<::"WHICH ONE?";:W$:WE(W$)AWE1WE450Zdn7qWE1200,1300,1400,1500s::EEN ":"TRACK SHAPE AND HILLTOP SPEED."^ -23:8:"<< HIT ANY KEY FOR MENU >>":16368,0t .(16384)12746 /16368,0 2::5 4"1)......SUPERIMPOSE DIFFERENT" 5" PARABOLAS ON SCREEN"6::"2)......ANALYZE VELOCITY COMPONE A HILLTOP SHAPE, ":"SIMPLY INPUT THE SPEED YOU WANT THE ":"COASTER TO REACH AT THE PEAK. PLOT " )"VARIOUS TRACK SHAPES AND STEP THROUGH":35:+ *:"THEIR VELOCITY GRAPHS UNTL YOU FEEL YOU ":"CAN IDENTIFY THE RELATIONSHIP BETWAY((AYG)10)106A(AXAXAYAY):A(A10)10G54,0:55,96g30:9:"VX: ";:33:VX30:10:"VY: ";:33:VY30:11:"V : ";:33:V30:13:"AX: ";:33:AX30:14:"AY: ";:33:AY 30:15:"A : X=D/DT VX, AY=D/DT VY0-------------------- >SW(WI)LCW(WI)\VXWAMSWoVX(VX10)10VY2WYA(W2I)VY(VY10)10V(VXVXVYVY)V(V10)10AXWWAMCWAX(AX10)10AY4WWYA(2WI)16384)160:16368,0::54,189:55,158:::155(16384)155Ĺ16368,0::54,189:55,158:::10:"DO YOU WANT TO TRY AGAIN (Y/N)";:G$:G$"Y"30G$"N"ĺ(4);"RUN HELLO"16368,0--------------------VX=D/DT X, VY=D/DT YA,20XO40,YO20;7=R.@1X40,Y20DO100,20X40,Y20\T(16384)127İ400j^XOX:YOYscRORzhIr54,189:55,158:::11:"DO YOU WANT TO GO AGAIN?";:Y$:Y$"Y"Y$"N"370|Y$"Y"30(4);"RUN HELLO"0(65TL2LL#IT2TNUTS635:7:" "S35:7:((IT2)10)10`IOITSpXAM(WI)YA(LYB)2YYA((W2I)1) YYYBTH(XY)XX140,RTH323.14:R0R65R6RO:M70:1XO40,YO20:100(M15)2G32.2F S40)NU5E:"CALCULATING PERIOD"`YBL(D):YOYB:XO140nAML(D)SE1(.25(D2)(D2))(.1406((D2)4))(.097656((D2)6))(.074768((D2)8))T23.14159265(LG)SE2000W23.14159273DD13.14180LF(D)85ĺ:"THE AMPLITUDE OF THIS SWING WILL TAKE ITOFF THE SCREEN; TRY DECREASING ONE OR BOTH OF THE VARIABLES."::172::"DO YOU WANT OUTPUT TO THE PRINTER?";:PR$:PR$"Y"PR$"N"180:7L(LF) M (Y/N)";:Z$-Z$"Y"M25:LEE:D160:1745:EMA(160F)~10:"INPUT THE NO.OF RIDERS (1-50)";M:M50M1171:"INPUT THE PENDULUM LENGTH (MAX ";MA;")";:L:LMAL.001172:"INPUT THE DISPLACEMENT (MAX 90 DEG.)";D1:(D1)901 60,60,60,45,45,45,45,45,0,0B 232,252:233,29:115,252:116,29H m "NO. OF RIDERS.........";::25| EE(44F) :"LENGTH................";::EE;" ";L$: "INIT. DISPLACEMENT....";::"65 DEG.": ::"DO YOU WANT DEFAULT VALUES?/SEC"9 \23:7:"< HIT ANY KEY TO CONTINUE >":16368,0O ](16384)12893U ^c _16368,0i `z nI76767712 xA:I,A:I 2,0,6,0,20,0,45,45,55,55,63,63,60,60,45,45,5,0,0,0 45,36,52,53,53,61,62,62,38,36,4,0,0,0,0,0 LISH"5 +"LINE, AND ACCELERATION BY A DASHED LINE." ,:"ENGLISH OR METRIC (E/M)?";:U$:U$"M"F.3048:LE$"METRIC":L$"M" -::"VEL. AND ACC. UNITS ARE STANDARD ";LE$: ." VELOCITY: ";L$;"/SEC" /" ACCELERATION: ";L$;"/SEC 16:"--------" !:) "16368,0S #"..........RETURN TO THIS MENU"Y $ %".....INPUT NEW VARIABLES" &:".......DISPLAY ACC. AND VEL." ' )"THE VELOCITY VECTOR IS SHOWN BY A SOLID" *F1:L$"FT":LE$"ENGF PENDULUMS BY MANIP- "6 "ULATING THE VARIABLES:"> :e :" 1) MASS (NO. OF RIDERS)"| " 2) LENGTH" " 3) INIT. DISPLACEMENT" 21:7:"< HIT ANY KEY TO CONTINUE >":16368,0 (16384)12829 :16:"COMMANDS"J:"BLOAD ANCHORS AWAY TITLE":"BLOAD HIRES CG":"BLOAD LCLETTER"R:j 14:"ANCHORS AWAY" 14:"------------":" THE SWINGING BOAT RIDE BEHAVES MUCH ""LIKE A SWINGING PENDULUM. LEARN MORE " "ABOUT THE MOTION O        Y2CX1,CY2&CX2,CY1CX2,CY1?CX1,CY2CX1,CY2EL0rCX2,CYCX2,CY:CX,CY2CX,CY2CX2,CY1CX2,CY1CX1,CY2CX1,CY2CX2,CY1CX2,CY1CX1,CY2CX1,CY2D8,7,5,4,3,3,3,3,3,4,5,6,8,10,12,14,17,20 23,26,29,33,37,41,45,49,53,57,61,66,70,74,79,83,87,91,95,99,102,106,109,112,115,118,121,123,125,127,128,129,130,131) 132,132,132,131,131,130,129,127,126,124,122,119,117,114,111,108,105,101,98,94,91,87,83,10:"ENGLISH OR METRIC (E/M)?";:E$:E$"E"E$"M"2097p212:1:"X STEP VALUE (1-5)";:XS:XS1XS52098414:"DO YOU WANT OUTPUT TO THE PRINTER?";:PR$9PR$"Y"PR$"N"2100f( 71,66,61,56,52,48,43,39,35,31,27,24,21,18,15,12,10,RDINATES"5 :"ARE DISPLAYED AT THE BOTTOM OF THE"d:"SCREEN. HIT THE 'RETURN' KEY TO STOP" :"THE COASTER AT ANY TIME. ANY OTHER KEY"*:"WILL RESTART IT. HIT ANY KEY TO START.".16368,0/(16384)1282095016368,0:1:------------------"2:12:"BY FARSHID GUILAK"O12:"-----------------"U:"THIS IS A PROGRAM TO SIMULATE A BRIEF:"RIDE IN A ROLLER COASTER. THE CAR'S":"KINETIC ENERGY, POTENTIAL ENERGY, " ::"VELOCITY, AND X AND Y COO5:Q(16336):E13:Q(16336):E,I1 [I135I ](1)7:Q(16336)x bAX%(1)40:BY%20(1)40:X%,Y%A,B:I~  7000  0:X02795:X,0X,155:X:Y01555:0,Y279,Y:Y  L 11:"COASTER CONSERVATION"11:"--% 10 22:PE%;" ";# 105 23:KE%;" ";M 10:24:VEL%;" ";d ,(16384)141300u 6PR$"N"400 @(4);:1 J1:X%;:7:H%;:14:PE%;:21:KE%;:28:VEL% T(4);:0 0 1X%,Y% (16384)1557000 I% XI125:22:" QUIT"$ dI0N1XS: nX%I:Y%P%(I1)3A q7N s1X%,Y%\ H%141Y% I22PP(16336):PP(16336)(16336):PP(16336)(16336) 21:4:X%;:18:21:H%;" "; VEL%(19.6Y%)(LS) PE%9.8H%ES KE%(MAX%)PE M/SEC ";:95= [1:22:"P.E. --> KCALS ";e \1:23:"K.E. --> KCALS "; ]1:24:"VEL. --> FT/SEC "; ^LS3.28:ES(14.19) _21:1:"X: ";:15:"Y: " `1:0 aMAX%MAX%ES b25:21:" PAUSE" cE KE V":"- - -- -- -":(4);:0? 9F :7S <I0N1j ?I,P%(I1)6I,141q FI{ H1000 KE$"E"91 LES1:LS1 P1:22:"P.E. --> KJOULES "; U1:23:"K.E. --> KJOULES "; Z1:24:"VEL. --> :"BLOAD CC TITLE PAGE"0I13000:I8:H2000:6000R2200_P%(280)ep D$""z N279 723:15:"PLEASE STAND BY...."I1N1(P%(I)-I7MAX%13829 8PR$"Y"ĺ(4);:1:"80N":"X Y P    0)10;" SEC"+30:5:"L:";(LF);" ";L$F30:6:"D:";D1;" DEG"[ 30:7:"TIME:";%7:202,181219,181:5:253,181270,181*24:30:"VEL. & ACC."/0,191279,191279,180` 54,0:55,96 F " "54,0:55,96WER0183:100ER,0100,19:100ER,0100,19:ER198,0198,191279,191279,00,00,191198,191198,59279,59:198,122279,122:198,91279,9130:2:"PARAMETERS"203,16270,16  30:4:"T:";(T1239,QY157(?7:239,157FX239,FY157FD5:239,157FX239,FY157[IFX0FR16:600NFR(FYFX)323.14:FX0FRFR32SFR0FRFR64U7XFR:2FX239,FY157ROS$54,0:55,9610:11:" ":12:14:" ,157FX239,FY157'2QX239,QY157/FRD2FX239,FY157\FXAX2.7:FYAY2.7n(V).11580QXVX2.5:QYVY2.5&7:239,157QX239,QY157+QX0Ę16:5700QR(QYQX)323.14:QX0QRQR325QR0QRQR64 :QR:2QX ";:33:A GF(A3.22F)10910:11:"G'S FELT:"Q12:14:GF" "PR$"Y"Ĺ54,189:55,158:1:" 80N":"VX:"VX;" VY:"VY;" V:"V;" AX:"AX;" AY:"AY;" A:"A;" T:"((IT2)10)10010:239,157QX239,QY157:QR239:7:" "(35:7:((IT2)10)105IOITSEXAM(WI)UYA(LYB)2lYYA((W2I)1)w YYYBTH(XY)XX140,RTH323.14:R0R65R6RO:M70:1XO40,YO20:100,20XO40,YO20;7=R@1X40,YYBL(D):YOYB:XO140'AML(D)SE1(.25(D2)(D2))(.1406((D2)4))(.097656((D2)6))(.074768((D2)8))G0T0:W0:2000:206T23.14159265(LG)SE2000W23.14159265TL2LLIT2TNUTS 35173DD13.14180L(D)85ĺ:"THE AMPLITUDE OF THIS SWING WILL TAKE ITOFF THE SCREEN; TRY DECREASING ONE OR BOTH OF THE VARIABLES."::172Z$"Y"İ3000:7L(LF)M(M15)2S40NU5:"CALCULATING PERIOD"? (Y/N)";:Z$.Z$"Y"M25:LEE:D160:1746:FMA(160F)10:"INPUT THE NO.OF RIDERS (1-50)";M:M50M1171:"INPUT THE PENDULUM LENGTH (MAX ";MA;")";:L:LMAL.001172:"INPUT THE DISPLACEMENT (MAX 90 DEG.)";D1:(D1)90(32.2F10)10 : "NO. OF RIDERS.........";::25I EE(44F)y :"LENGTH................";::EE;" ";L$: "INIT. DISPLACEMENT....";::"65 DEG."::"GRAVITY...............";::G;" ";L$;"/SEC/SEC": ::"DO YOU WANT DEFAULT VALUES12893 ^ _16368,0 `1 nI76767712@ xA:I,A:I~ 2,0,6,0,20,0,45,45,55,55,63,63,60,60,45,45,5,0,0,0 45,36,52,53,53,61,62,62,38,36,4,0,0,0,0,0 60,60,60,45,45,45,45,45,0,0 232,252:233,29:115,252:116,29 GMETRIC (E/M)?";:U$:U$"M"F.3048:LE$"METRIC":L$"M"j -::"VEL. AND ACC. UNITS ARE STANDARD ";LE$: ." VELOCITY: ";L$;"/SEC" /" ACCELERATION: ";L$;"/SEC/SEC" \23:7:"< HIT ANY KEY TO CONTINUE >":16368,0 ](16384)THIS MENU" $: %".....INPUT NEW VARIABLES"h &:".......DISPLAY ACC. AND VEL."n ' )"THE VELOCITY VECTOR IS SHOWN BY A SOLID" *F1:L$"FT":LE$"ENGLISH" +"LINE, AND ACCELERATION BY A DASHED LINE."7 ,:"ENGLISH OR 1) MASS (NO. OF RIDERS)"3 " 2) LENGTH"V " 3) INIT. DISPLACEMENT" 21:7:"< HIT ANY KEY TO CONTINUE >":16368,0 (16384)12829 :16:"COMMANDS" 16:"--------" !: "16368,0 #"..........RETURN TO  :! 14:"ANCHORS AWAY"9 14:"------------"m:" THE SWINGING BOAT RIDE BEHAVES MUCH ""LIKE A SWINGING PENDULUM. LEARN MORE ""ABOUT THE MOTION OF PENDULUMS BY MANIP- ""ULATING THE VARIABLES:": :"       7683,0232,252:233,294115,252:116,29:eX::11:"DO YOU WANT TO GO AGAIN?";H${]H$"Y"İ2096:55bH$"N"7000l(4);"RUN HELLO" ENERGY, KE IS THE0 KINETIC ENERGY. THISI PROGRAM RUNS ON THEe CONSERVATION OF ENERGY LAW, THAT IS, THE PE + THE KE IS CONSTANT. ---------------------pz7676,1:7677,0:7678,4:7679,07680,60:7681,46:7682,60 ,85,86,87,88,89,89,90,90,90,90,90,90,90,90,90,89,88,88,86,85,84,83,82,81,80,79,78,77,76,75,74,73,72,72y 72,71,71,70 --------------------- THIS PROGRAM WRITTEN BY FARSHID GUILAK --------------------- PE IS THE POTENTIAL114,113,112j 111,110,108,106,104,102,100,98,96,93,91,88,85,83,80,77,75,72,69,66,64,61,59,56,54,52,50 48,46,44,43,41,40,39,38,37,37,36,36,36,36,36,36,37,37,38,39,41,42,44,45,47,48,50,52,54,56,58,60f 62,64,66,67,69,71,73,75,76,78,80,81,83,8479,75,71,68,64,60,56,53,49,46,43,39,37,34 31,29,26,24,23,21,20,19,18,17,17,17,17,17,18,18,19,21,22,24,26,28,30,32,35,38,40,43,46,50,53,56,59,63,66  69,73,76,79,82,85,88,91,94,97,99,102,104,106,108,109,111,112,113,114,115,116,116,116,116,115,115,(16336):PP(16336)(16336)A 21:4:X%;:18:21:H%;" ";j G0VEL%50LS:KE%VEL%VEL%2:229} VEL%(2GY%) PE%GH%ES KE%(MAX%PE%) 10 22:PE%;" "; 10 23:KE%;" "; 10:24:VEL%;" "; 0 1X%,Y. --> FT/SEC ";& ^LS1:ES1D _21:1:"X: ";:15:"Y: "N `1:0_ aMAX%MAX%ES b21:25:" --> END":25:" --> PAUSE" dI0N1XS nX%I:Y%P%(I1)3 q7 s1X%,Y% H%141Y% I22PP(16336):PP(16336) KE$"E"91" LES4.19:LS.305J P1:22:"P.E. --> KJOULES ";r U1:23:"K.E. --> KJOULES "; Z1:24:"VEL. --> M/SEC ";:95 [1:22:"P.E. --> KCALS "; \1:23:"K.E. --> KCALS "; ]1:24:"VEL :20006000'22004P%(280):E D$""O N279X :7{23:15:"PLEASE STAND BY...."I1N1(P%(I)-I77:PE%0<I0N1?I,P%(I1)6I,141FIGMAX%141G:PE%0H1000I16368,0      16368,0 F(6)0& I16:I;")......";G$(I):If ::"WHICH GRAVITY FIELD DO YOU WANT";:CH:CH1CH73000& G(322FGF(CH))100 :"YOUR GRAVITY IS ";G;" ";L$;"/SEC/SEC.": 16368,0D 23:6:"<< HIT ANY KEY TO CONTINUE >>"N (16384)127315024:30:"VEL. & ACC."1/0,191279,191279,180B` 54,0:55,96H N U 4o G$(1)"EARTH":GF(1)1 G$(2)"MARS":GF(2).38 G$(3)"JUPITER":GF(3)2.64 G$(4)"PLUTO":GF(4).47 G$(5)"THE MOON":GF(5)(16) G$(6)"FREE SPACE":GF198,59279,59:198,122279,122:198,91279,91J30:2:"PARAMETERS"]203,16270,16 30:4:"T:";(T10)10;" SEC"30:5:"L:";(LF);" ";L$30:6:"D:";D1;" DEG" 30:7:"TIME:";%7:202,181219,181:5:253,181270,181*FRFR64U7)XFR:2FX239,FY1571RO9S$J54,0:55,96y10:11:" ":12:14:" "54,0:55,96ER0183:100ER,0100,19:100ER,0100,19:ER198,0198,191279,191279,00,00,191198,19117:239,157QX239,QY157++QX0Ę16:570R0QR(QYQX)323.14:QX0QRQR32e5QR0QRQR64~:QR:2QX239,QY157?7:239,157FX239,FY157D5:239,157FX239,FY157IFX0FR16:600NFR(FYFX)323.14:FX0FRFR32 SFR010:11:"G'S FELT:",12:14:GF" "31U0:239,157QX239,QY157:QRp239,157FX239,FY1572QX239,QY157FR2FX239,FY157FXAX2.7:FYAY2.7:(FY)30FY30(FY)(V).11580QXVX2.5:QYVY2.5&AYAY):A(A10)10%54,0:55,96E30:9:"VX: ";:33:VXf30:10:"VY: ";:33:VY30:11:"V : ";:33:V30:13:"AX: ";:33:AX30:14:"AY: ";:33:AY30:15:"A : ";:33:AGF(A3.22F)10------------- SW(WI)*CW(WI):VXWAMSWMVX(VX10)10dVY2WYA(W2I)wVY(VY10)10V(VXVXVYVY)V(V10)10AXWWAMCWAX(AX10)10AY4WWYA(2WI)AY((AYG)10)10A(AXAX5,158:::155w(16384)155Ĺ16368,0::54,189:55,158:::10:"DO YOU WANT TO TRY AGAIN (Y/N)";:G$:G$"Y"30G$"N"ĺ:"RUN SP MENU"16368,0--------------------VX=D/DT X, VY=D/DT YAX=D/DT VX, AY=D/DT VY-------20O100,20X40,Y201T(16384)127İ400?^XOX:YOYHcROROhIXr400w:54,189:55,158:::10:"DO YOU WANT TO TRY AGAIN (Y/N)";:G$:G$"Y"30|G$"N"375:"RUN SP MENU"(16384)160:16368,0::54,189:5     5`H XN7<6NWRU@ TPhhHNɍ-Ɍ+*+*++8 $%ll%J) +%j )* * (je$*h-HJJJ'hH*&'*&'*&')&&OH**hQ**O+i+$$! $%%#"%Nh`W, THAT IS, THE PE- + THE KE IS CONSTANT.H ---------------------Nprz7676,1:7677,0:7678,4:7679,07680,60:7681,46:7682,607683,0232,252:233,29115,252:116,29 72,71,71,70- ---------------------G THIS PROGRAM WRITTEN^ BY FARSHID GUILAKy --------------------- PE IS THE POTENTIAL ENERGY, KE IS THE KINETIC ENERGY. THIS PROGRAM RUNS ON THE CONSERVATION OF ENERGY LA 48,46,44,43,41,40,39,38,37,37,36,36,36,36,36,36,37,37,38,39,41,42,44,45,47,48,50,52,54,56,58,60 62,64,66,67,69,71,73,75,76,78,80,81,83,84,85,86,87,88,89,89,90,90,90,90,90,90,90,90,90,89,88,88,86,85,84,83,82,81,80,79,78,77,76,75,74,73,72,72  6,28,30,32,35,38,40,43,46,50,53,56,59,63,66 69,73,76,79,82,85,88,91,94,97,99,102,104,106,108,109,111,112,113,114,115,116,116,116,116,115,115,114,113,112 111,110,108,106,104,102,100,98,96,93,91,88,85,83,80,77,75,72,69,66,64,61,59,56,54,52,50c2,106,109,112,115,118,121,123,125,127,128,129,130,131 132,132,132,131,131,130,129,127,126,124,122,119,117,114,111,108,105,101,98,94,91,87,83,79,75,71,68,64,60,56,53,49,46,43,39,37,34+ 31,29,26,24,23,21,20,19,18,17,17,17,17,17,18,18,19,21,22,24,25z16368,0:23:6:"<< HIT ANY KEY TO CONTINUE >>"M(16384)1272180SY 71,66,61,56,52,48,43,39,35,31,27,24,21,18,15,12,10,8,7,5,4,3,3,3,3,3,4,5,6,8,10,12,14,17,205 23,26,29,33,37,41,45,49,53,57,61,66,70,74,79,83,87,91,95,99,10G$(5)"THE MOON":GF(5).167:fG$(6)"FREE SPACE":GF(6)0bkLS1:L$"FT":E$"M"LS.305:L$"M"|mI16:I") "G$(I):In::"WHICH GRAVITY FIELD";:CH:CH1CH7ė:2157pG(322GF(CH)LS)10s::u"YOUR GRAVITY IS "G" "L$"/SEC/SEC."16368,0L1:10:"ENGLISH OR METRIC (E/M)?";:E$:E$"E"E$"M"2097212:1:"X STEP VALUE (1-5)";:XS:XS1XS520984:4>G$(1)"EARTH":GF(1)1HG$(2)"MARS":GF(2).38RG$(3)"JUPITER":GF(3)2.64WG$(4)"PLUTO":GF(4).47\DINATES"4 :"ARE DISPLAYED AT THE BOTTOM OF THE"c:"SCREEN. HIT THE 'RETURN' KEY TO STOP" :"THE COASTER AT ANY TIME. ANY OTHER KEY"*:"WILL RESTART IT.":::23:6:"<< HIT ANY KEY TO START >>".16368,0/(16384)1282095 0YL.11:"COASTER CONSERVATION"N11:"--------------------"T:"THIS IS A PROGRAM TO SIMULATE A BRIEF:"RIDE IN A ROLLER COASTER. THE CAR'S":"KINETIC ENERGY, POTENTIAL ENERGY, "::"VELOCITY, AND X AND Y COOR5:Q(16336):E13:Q(16336):E,I2 [I135J ](1)7:Q(16336)y bAX%(1)40:BY%20(1)40:X%,Y%A,B:I  :23:"DO YOU WANT TRY AGAIN (Y/N)";:A$:A$"Y"ĉ:2096::55 0:X02795:X,0X,155:X:Y01555:0,Y279,Y:% (16384)127500( 7:1X%,Y% (16384)155ė:23:"DO YOU WANT TRY AGAIN (Y/N)";:A$:A$"Y"Ē0:1X%,Y%::2096:16304,0:71 A$"N"ĺ:"RUN SP MENU" 16368,0 (16384)127450 16368,0 0:1X%,Y% I& XI1Ѐ H',PP@00@@ȀP@0@Ȁ HЀ HAD   @` ` ` ``` @<fHHfHf@,@,@,@,@,@,:`@ `0> P@0@Ȁ@Ȁ H111111111111111111111111111111111111111111111111111111111111100@HHHH0@000HHrr$$111111111111111111111111111111111111111111111111111111111111111111귍hI  111111111111111111111111111111111111111111111111111 "2*&" " >>  ">> "8""> """"""< >> "׍hI  1111111111111111111111111111111111111111111111""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>">>< (&20 *, **>>b^ZUQLGA<60+% þ %+06""""""""""""">>><2"<""">""" ""  ">"6**"М E`` ~k:;<1 k<:;1E;:8:`< ;`Ii:<IiJFeJIie11`)`>lFl0'JJ)`UU %+06>hIm==>Ъ=.>`1$=8==>>` l== gɠ($( !(!(Lg`%$ɠ"Ɉɍ!` B 7f=C1>D1CLe<= YZ[Le`Q $0p=Q>R` f ih?mC?@mD@8?A1,0 @B1ϭ?=@>Le67 TQ`=>=ȹoɠɫɽɭ=ɰ=ɺ9H f>H=H f fh;`;,0Lf6o;ɍɈ 66`6`65:oɬɠd5odoȌo1 e1ɿɬ<`Lih<`QR`J< 0L-fLcLchhL"f 2` 7f1ɿ`8=?>@ 7f=c c c+ + j2356 7D6d7d 3PWTR;`N ON`LXPYZ[\`:89 bd:89,50L`,50%ɥ;5 :2000:6000:2200,P%(280)2< N279E :7h23:15:"PLEASE STAND BY...."uI1N1(P%(I)-I77:PE%0<I0N1?I,P%(I1)6I,141FIG1000HMAX%141G:PE%0I16368,0KE$"E"91 L     16368,0 I11000:I. "RUN SP MENU" U" COASTER^ " CONNECTED TO TRACK"d "2) STANDARD ROLLER COASTER " NOT CONNECTED TO TRACK" "3) LOOP COASTER" :"4) PARK PENDULUM" :"5) FREE FALLING RIDE" WOULD BEHAVE IN A"6 y:"ZERO-GRAVITY ENVIRONMENT."h z:"THESE ZERO-G EXAMPLES WOULD POINT OUT TO" |"STUDENTS THE IMPORTANCE OF THE FORCE OF" }:"GRAVITY IN A REAL AMUSEMENT PARK." ~ ::"HIT A KEY FOR A MENU OF DEMONSTRATIONS." 0d-i:"BLOAD SPACE PARK TITLE PAGE"Wk"BLOAD HIRES CG":"BLOAD LCLETTER"mn15:"SPACE PARK"o15:"----- ----"s:"SPACE PARK IS A SIMULATION DESIGNED TO"u:"ENABLE STUDENTS TO EXAMINE HOW VARIOUS" x:"AMUSEMENT PARK RIDES SCRAMBLER RU1 DI8# JU0+G 668H ROTOR AR RU1J\ DI6Sf JU0[ 66l ENTERPRISEu RU1~ DI3 JU266 TEACUPRU((250PU)10)AG4$DI10.JU0s66AG3N DI1W JU3_ 66{ WOODEN ROLLER COASTER0 RU((230PU)10)AG4: DI2D JU4 66 LOOP COASTER RU((210PU)10)AG3 DI1 JU2 66 ..5AA5.5AA5..11111  &&..5AA5.5AA5..-!!%-))--4<?<4-- 11111  &&(8);~"";I:!:"%NW,PX,PY"!!!%-))--4<?<4--311111X$""X(X$):XX256(X0)>>Y$""Y(Y$):YY256(Y0)`@Z$""Z(Z$):ZZ251*##*48?<8-(Y"t"ENTER INCREMENT SIZE (NOW ";I;") : ";18?FF?81" ";.21:1#8?FMJ? **8?81""L$"Q"ıL$"-"1000ADAD4:AD28672AD28672AD,255:790Q$(L$,1)     47,48,50,52,54,56,58,60 62,64,66,67,69,71,73,75,76,78,80,81,83,84,85,86,87,88,89,89,90,90,90,90,90,90,90,90,90,89,88,88,86,85,84,83,82,81,80,79,78,77,76,75,74,73,72,72 72,71,71,70 --------------------- THIS PROGRAM WRITTEN ,97,99,102,104,106,108,109,111,112,113,114,115,116,116,116,116,115,115,114,113,112 111,110,108,106,104,102,100,98,96,93,91,88,85,83,80,77,75,72,69,66,64,61,59,56,54,52,50 48,46,44,43,41,40,39,38,37,37,36,36,36,36,36,36,37,37,38,39,41,42,44,45,131,130,129,127,126,124,122,119,117,114,111,108,105,101,98,94,91,87,83,79,75,71,68,64,60,56,53,49,46,43,39,37,34 31,29,26,24,23,21,20,19,18,17,17,17,17,17,18,18,19,21,22,24,26,28,30,32,35,38,40,43,46,50,53,56,59,63,66R 69,73,76,79,82,85,88,91,940 o 71,66,61,56,52,48,43,39,35,31,27,24,21,18,15,12,10,8,7,5,4,3,3,3,3,3,4,5,6,8,10,12,14,17,20 23,26,29,33,37,41,45,49,53,57,61,66,70,74,79,83,87,91,95,99,102,106,109,112,115,118,121,123,125,127,128,129,130,131p 132,132,132,131,E$"M"LS.305:L$"M"0mI16:I") "G$(I):Ign::"WHICH GRAVITY FIELD";:CH:CH1CH7ė:2157pG(322GF(CH)LS)10s::u"YOUR GRAVITY IS "G" "L$"/SEC/SEC."z16368,0:23:6:"<< HIT ANY KEY TO CONTINUE >>"(16384)1272186212:1:"X STEP VALUE (1-4)";:XS:XS1XS42098?4:4Y>G$(1)"EARTH":GF(1)1tHG$(2)"MARS":GF(2).38RG$(3)"JUPITER":GF(3)2.64WG$(4)"PLUTO":GF(4).47\G$(5)"THE MOON":GF(5).167fG$(6)"FREE SPACE":GF(6)0kLS1:L$"FT":'RETURN' KEY TO STOP"E :"THE COASTER AT ANY TIME. ANY OTHER KEY"*:"WILL RESTART IT.":::23:6:"<< HIT ANY KEY TO START >>".16368,0/(16384)1282095016368,0:1:10:"ENGLISH OR METRIC (E/M)?";:E$:E$"E"E$"M"20974:"THIS IS A PROGRAM TO SIMULATE A BRIEFb:"RIDE IN A ROLLER COASTER. THE CAR'S":"KINETIC ENERGY, POTENTIAL ENERGY, "::"VELOCITY, AND X AND Y COORDINATES" :"ARE DISPLAYED AT THE BOTTOM OF THE":"SCREEN. HIT THE Y AGAIN (Y/N)";:A$:A$"Y"ĉ:2096::55/h0:X02795:X,0X,155:X:Y01555:0,Y279,Y:YntL:22:"DO YOU WANT TRY AGAIN (Y/N)";:A$:A$"Y"ĉ:2096:16304,0:7211:"COASTER CONSERVATION"11:"--------------------"1&A$"N"Ā(16368,04*(16384)127554B,16368,0RD0:1Z%,Y%[W470XI15:Q(16336):E13:Q(16336):E,I[I135](1)7:Q(16336)bAZ%25(1)50:B121(1)60:Z%,121A,B:I):23:"DO YOU WANT TRPE%GH%ESKE%(MAX%PE%)522:10:PE%;" ";K10:23:KE%;" ";c10:24:VEL%;" ";s0:1Z%,Y% (16384)127580"7:1Z%,Y%$(16384)155ė:23:"DO YOU WANT TRY AGAIN (Y/N)";:A$:A$"Y"Ē0:1Z%,Y%::2096:16304,0:76384)127450 16368,0+ 0:1X%,Y%2 ID VO%VEL%:X%0R XSXS1.5 X%X%XS:Y%(2.97X%(GX%X%2(VO%VO%.106))31) Z%X%105 Y%117600 7:1Z%,Y% H%141Y% 21:4:X%;:18:21:H%;" "; VEL%(2GY%)  :22:PE%;" ";$ 23:10:KE%;" ";< 10:24:VEL%;" ";L 0:1X%,Y%c (16384)127465s 7:1X%,Y% (16384)155ė:23:"DO YOU WANT TRY AGAIN (Y/N)";:A$:A$"Y"Ē0:1X%,Y%:1500 A$"N"ĺ:"RUN SP MENU" 16368,0 (1DBYE....":R11000:R:1500, q7:1X%,Y%: H%141Y% I22PP(16336):PP(16336)(16336):PP(16336)(16336) 21:4:X%;:18:21:H%;" "; G0VEL%50LS:KE%VEL%VEL%2:230 VEL%(2GY%):PE%GH%ES:KE%(MAX%PE%) 10 "; ^LS1:ES11 _21:1:"X: ";:15:"Y: "; `1:0L aMAX%MAX%ES b21:25:" --> END":25:" --> PAUSE" cLL105:G0LL25 dI0LLXS nX%I:Y%P%(I1)3 oG0Y%62(3.3X%):Y%0āR12000:R::22:"KISS THAT ONE GOOES4.19:LS.3057 P1:22:"P.E. --> KJOULES ";_ U1:23:"K.E. --> KJOULES "; Z1:24:"VEL. --> M/SEC ";:95 [1:22:"P.E. --> KCALS "; \1:23:"K.E. --> KCALS "; ]1:24:"VEL. --> FT/SEC CH$)1(CH$)7208098>G(322LSGF((CH$)))10bH:"YOUR GRAVITY IS "G" "L$"/SEC/SEC"vMG(GLS10)10R23:8:"<< HIT A KEY TO CONTINUE >>":16368,0\(16384)1282140a16368,0fMH(165LS)kMN(55LS)p:6zS":GF(2).38+G$(3)"JUPITER":GF(3)2.64GG$(4)"PLUTO":GF(4).47gG$(5)"THE MOON":GF(5).167 G$(6)"THE SUN":GF(6)28G$(7)"FREE SPACE":GF(7)0 :5:I17*I") "G$(I)/I4::"WHICH GRAVITY FIELD DO YOU WANT?";:CH$:(PP1281200`PP155716*j16368,0Bt(16384)1281140P~16368,0V\::12:"DO YOU WANT ENGLISH OR METRIC (E/M)?";:E$:E$"E"E$"M"2005LS1:L$"FT"E$"M"LS.305:L$"M"G$(1)"EARTH":GF(1)1 G$(2)"MARYYYS:Y159570'>YSYS1:7:1X,Y5H0:1X,Y>R820DU54,0:55,96iV%(2G(YH))wV1%V%LS5:20:V1%" "2:15:(T100)100;" "8:16:((175Y)LS);" "L11:13:(GF10)10;" "VPP(16384) [V%01025%I12000:I:60:1(X),YN54,189:55,158::T:2:12:"DO YOU WANT TO GO AGAIN (Y/N)?";:W$:W$"Y"W$"N"720W$"N"ĺ:"RUN SP MENU"200016304,0:16299,0225 *YS14T3Y%(I)1 8Y190Y191:570)95505:I130\;A(1)4020X:BY(1)45:(1)7m<B190B190z=A2A1>(X),Y4A,B?A(I)A:B(I)BDPP(16336)IIK0NI130S(X),Y4A(I),B(I)XIb7167:1X,YX%(I).5DGT2T2VT2&X12554547:1X,YE(X)MX700TGFDG32.2kV%VO%DGT2:1025y 0:1X,Y475!"T30:X2X&7:1X,Y)T3T3TI:TTTI*GF0:1025+0:1X,Y0XX2V%T33X3800 7Y.5GT3116ST 7:1X%(I),Y%(I)2 GFV%V%RA32.2D YY%(I):1000Z 0:1X%(I),Y%(I)k RTRTST:RTv TTTI} I 16 I16:DG48 V(2G(YH)) MX(X%(I)VV.5DG) XX%(I):YY%(I)1:T2TI:VO%V% TTTI:T2T2TIX0,0 14:10:"COMMANDS"7 16:7:"...QUIT"S 17:7:"...PAUSE"] "4:0j %1255,Ht &2500~ 'TTI ,TTTI:X255 1Y.5GTTH 2YY%(1)RT0:380 67:1X,Y ;GF0 @1000 h0:1X,Y r300 |STV%40:IЂA 54,0:55,963 2:3:"TIME (SEC): "Z 5:3:"VELOCITY ("L$"/S): " 8:3:"HEIGHT ("L$"): " 11:3:"G'S FELT: " 7 0,95168,95 63,112117,111 0,145168,145168,0 0,0279,0279,1910,191260,Y2265,Y2:Y2YēX10,YRA( Y2J 260,38265,38:260,39265,39^ 260,0260,YRAz XRA87,YRAX10,YRA 210 A,BA3,B6A3,B8A2,B8A2,B6A2,B6A2,B8A3,B8A3,B6A,B AXRA87X1014.5:BYRA:200 (XRA)RAX1,YRAY1X,YRA(XRA)RAX1,YRAY1; SR5o N0X%(C)(XRA)(RASR)X1:Y%(C)YY1(RASR)v R~ N1 XRA87,YRA X2602622 X,2X,132:RAX212 Y132 110 X 266,0266,YRA Y20YRA5: 22000*FX%(17),Y%(17),A(30),B(30)5KTI.05QPQ76767686:A:Q,A:QuU 1,0,4,0,36,55,46,36,00,00,00Z232,252:233,29:115,232:116,29_PI3.14159265358d:7:RA57.7m160nR0PI2.1sCC1xX1(R):Y1(R)2       &z7676,1:7677,0:7678,4:7679,0E7680,60:7681,46:7682,60Q7683,0f232,252:233,29{115,252:116,29,232,252:233,29115,252:116,29