[mw3.0 Englishprojectsize[592 322]turtles-have[]globals[]globals-list[globals-vars]ShapesPro shapes!shapeinfoAshape0name[arrow] shapeno0hash9D9CD32D34BE6020Cshape1name[diamond] shapeno1hash3A209E3CCC33FA34Bshape2name[sphere] shapeno2hashB689390532CA96DFBshape3name[square] shapeno3hashC0C76DABF1029109@shape4name[star] shapeno4hashDF409F9F9FDF3F7F@shape5name[lcsi] shapeno5hashC58CF98D3AB3F94F>shape6 name[||] shapeno6hashDF20207F80DF005F>shape7 name[||] shapeno7hashDF20207F80DF005F@shape8name[boat] shapeno8hash8977B62F2B2EAAC5?shape9name[bus] shapeno9hash159708204C551555Ashape10name[car]shapeno10hash7787D1DF64914F8FHshape11name[motorcycle]shapeno11hash2D1002BD23B388B8Cshape12name[plane]shapeno12hashCCBE00459A20B86F@shape13 name[||]shapeno13hashDF20207F80DF005F@shape14 name[||]shapeno14hashDF20207F80DF005FBshape15name[cat1]shapeno15hash57603D410CA120F8Bshape16name[cat2]shapeno16hash3DAA646C434A3165Bshape17name[cat3]shapeno17hashEB1CBC53EFC8C743Bshape18name[dog1]shapeno18hashCABD086A627FA0A0Bshape19name[dog2]shapeno19hashBD7FA0A8CABD7FA8Dshape20name[horse1]shapeno20hash278FD5528617A229Dshape21name[horse2]shapeno21hash17DC6C42A7C9057EDshape22name[horse3]shapeno22hashFA13D8592AD82B70Dshape23name[horse4]shapeno23hash634D69A419C65ECBGshape24name[kangaroo1]shapeno24hashC0AFB040EC072C1BGshape25name[kangaroo2]shapeno25hashDBF28FBE00D40D47Gshape26name[kangaroo3]shapeno26hash7257ADAC5D23CAAACshape27name[lion1]shapeno27hashA877B1FFD9526610Cshape28name[lion2]shapeno28hash52D3B85E15761906@shape29 name[||]shapeno29hashDF20207F80DF005F@shape30 name[||]shapeno30hashDF20207F80DF005FBshape31name[bee1]shapeno31hash1B53CEBF7A01B02ABshape32name[bee2]shapeno32hashC00CCDB26F1416E7Hshape33name[butterfly1]shapeno33hash3FBD2DF11E2AC450Hshape34name[butterfly2]shapeno34hash41083AF35941AEAECshape35name[bird1]shapeno35hash6510C3F2FA569319Cshape36name[bird2]shapeno36hashE07411427667AEAE@shape37 name[||]shapeno37hashDF20207F80DF005F@shape38 name[||]shapeno38hashDF20207F80DF005FFshape39name[dolphin1]shapeno39hashBB5BC4CA91884CCAFshape40name[dolphin2]shapeno40hashE03C2E77CF89F622Fshape41name[dolphin3]shapeno41hash4FBC42AD63B25D5CBshape42name[fish]shapeno42hash3042E26896E189C1@shape43 name[||]shapeno43hashDF20207F80DF005F@shape44 name[||]shapeno44hashDF20207F80DF005FKshape45name[construction1]shapeno45hash797AF8DA6A169FDEKshape46name[construction2]shapeno46hash84C4ED816FC9302AKshape47name[construction3]shapeno47hash3F72A46E5AD5F2FFEshape48name[doctor1]shapeno48hash55120BE94A0052FFEshape49name[doctor2]shapeno49hash0CB72E01102E4BE6Eshape50name[doctor3]shapeno50hash872457C29F9518C3Dshape51name[judge1]shapeno51hash17380520BCB83D5BDshape52name[judge2]shapeno52hash360EED6F37E8FE9CFshape53name[student1]shapeno53hashC40D9F91FE733617Fshape54name[student2]shapeno54hashBE41457ACD45AA89Fshape55name[student3]shapeno55hash725E17746B49574EFshape56name[teacher1]shapeno56hash00D9195A7BA26952Fshape57name[teacher2]shapeno57hashACF0B9FEE8AF2DBEFshape58name[teacher3]shapeno58hash5D4BE516ADE1E1D1Eshape59name[kicker1]shapeno59hash0E8854AB360FDC1EEshape60name[kicker2]shapeno60hash4F4E8F7DDAD6DB36Eshape61name[runner1]shapeno61hash1DA04F18EBD2437CEshape62name[runner2]shapeno62hash53F7F853508D05F5Eshape63name[runner3]shapeno63hashC1F332D5E9E988BEEshape64name[runner4]shapeno64hash6854834099E47194Eshape65name[runner5]shapeno65hash33B1668D9DAC710EEshape66name[runner6]shapeno66hashC61508CE68D89403Bshape67name[ball]shapeno67hashC2017FBC47A49D1C@shape68 name[||]shapeno68hashDF20207F80DF005F@shape69 name[||]shapeno69hashDF20207F80DF005FDshape70name[bamboo]shapeno70hash15094945E4AAF02EDshape71name[baobab]shapeno71hash0C99A40676DF9F08Eshape72name[begonia]shapeno72hash969142BFFDB41A22Dshape73name[cactus]shapeno73hashFA3339D1637E6849Cshape74name[daisy]shapeno74hashF68197FF7FE562CACshape75name[fern1]shapeno75hashEEDC7A6C48D83E0DCshape76name[fern2]shapeno76hashD39FCFB53A041CCABshape77name[iris]shapeno77hashC3AE17949E06640CBshape78name[rose]shapeno78hash3CE370352BDCFB04Eshape79name[sapling]shapeno79hash7B2FD97981F45759Dshape80name[willow]shapeno80hash8E2EBD880F91DE12@shape81 name[||]shapeno81hashDF20207F80DF005F@shape82 name[||]shapeno82hashDF20207F80DF005FCshape83name[cloud]shapeno83hash1E237718D5B15548Hshape84name[lightning1]shapeno84hashD0C6E005DE4522EFHshape85name[lightning2]shapeno85hash64DC361614A043D3Hshape86name[lightning3]shapeno86hash1E4740F7B87CE02CGshape87name[raincloud]shapeno87hashE1A36208BF73CBD8Ashape88name[Sun]shapeno88hash5A438D8138AC3617@shape89 name[||]shapeno89hashDF20207F80DF005F@shape90 name[||]shapeno90hashDF20207F80DF005FCshape91name[Earth]shapeno91hashECD721930F087F55Eshape92name[Jupiter]shapeno92hashFDA0A5D7F6C2FD32Bshape93name[Mars]shapeno93hash730A21F1AC5F5567Eshape94name[Mercury]shapeno94hashF927702B937E1810Bshape95name[Moon]shapeno95hashCDD31EDEB0573767Eshape96name[Neptune]shapeno96hash99C9B41B2B60D9FCCshape97name[Pluto]shapeno97hash9EBCBAE524B66D9EDshape98name[Saturn]shapeno98hashD4C1C7631FAE38E3Dshape99name[Uranus]shapeno99hashA99C40F139931AD7Eshape100name[Venus]shapeno100hash942D6DB6644B5890Fshape101name[rocket]shapeno101hash767C5ABF20623BE8Ishape102name[satellite]shapeno102hashE3EEE401233195CBBshape103 name[||]shapeno103hashDF20207F80DF005FBshape104 name[||]shapeno104hashDF20207F80DF005FKshape105name[eiffeltower]shapeno105hashDAE78C2459165378Gshape106name[liberty]shapeno106hashD02D16E85E4CB664Gshape107name[obelisk]shapeno107hash03814BD94FCBF8BBGshape108name[pyramid]shapeno108hash9DEAD10D786143E9Eshape109name[house]shapeno109hash4DA66216215A9B86Ishape110name[apartment]shapeno110hash3261E00C4FF33033Eshape111name[cabin]shapeno111hash48E6A8ECCF068EEFBshape112 name[||]shapeno112hashDF20207F80DF005FBshape113 name[||]shapeno113hashDF20207F80DF005FHshape114name[balloons]shapeno114hashE6DE2E65F4395218Dshape115name[cake]shapeno115hash0A2B343CEA7073C1Gshape116name[diploma]shapeno116hashC69CBA0E8DFA22C5Hshape117name[partyhat]shapeno117hash474598AD52EB9581Bshape118 name[||]shapeno118hashDF20207F80DF005FBshape119 name[||]shapeno119hashDF20207F80DF005FBshape120 name[||]shapeno120hashDF20207F80DF005FBshape121 name[||]shapeno121hashDF20207F80DF005FBshape122 name[||]shapeno122hashDF20207F80DF005FBshape123 name[||]shapeno123hashDF20207F80DF005FBshape124 name[||]shapeno124hashDF20207F80DF005FBshape125 name[||]shapeno125hashDF20207F80DF005FBshape126 name[||]shapeno126hashDF20207F80DF005FBshape127 name[||]shapeno127hashDF20207F80DF005Fbrusheswbrushno0 maskno0 size1 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]wbrushno1 maskno0 size3 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]wbrushno2 maskno0 size8 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrushno3 maskno0 size15 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]wbrushno4 maskno1 size8 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrushno5 maskno1 size15 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrushno6 maskno0 size15 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade17wbrushno7 maskno1 size15 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade5wbrushno8 maskno5 size15 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade7xbrushno9 maskno3 size15 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade19ybrush no10 maskno0 size2 edge4 fcn0fcnnamemake-airbrush special0 fade67 shade[]ybrush no11 maskno0 size4 edge8 fcn0fcnnamemake-airbrush special0 fade67 shade[]zbrush no12 maskno0 size5 edge10 fcn0fcnnamemake-airbrush special0 fade67 shade[]ybrush no13 maskno1 size3 edge7 fcn0fcnnamemake-airbrush special0 fade70 shade[]zbrush no14 maskno1 size5 edge10 fcn0fcnnamemake-airbrush special0 fade67 shade[]ybrush no15 maskno0 size8 edge0 fcn1fcnnamemake-edgebrush special0 fade0 shade[]zbrush no16 maskno0 size15 edge0 fcn1fcnnamemake-edgebrush special0 fade0 shade[]ybrush no17 maskno1 size6 edge0 fcn1fcnnamemake-edgebrush special0 fade0 shade[]zbrush no18 maskno1 size12 edge0 fcn1fcnnamemake-edgebrush special0 fade0 shade[]xbrush no19 maskno0 size3 edge0 fcn2fcnnamemake-rainbowspecial[] fade0 shade[]xbrush no20 maskno0 size8 edge0 fcn2fcnnamemake-rainbowspecial[] fade0 shade[]ybrush no21 maskno0 size15 edge0 fcn2fcnnamemake-rainbowspecial[] fade0 shade[]xbrush no22 maskno1 size8 edge0 fcn2fcnnamemake-rainbowspecial[] fade0 shade[]ybrush no23 maskno1 size15 edge0 fcn2fcnnamemake-rainbowspecial[] fade0 shade[]ybrush no24 maskno2 size12 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]ybrush no25 maskno3 size12 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]ybrush no26 maskno4 size12 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]ybrush no27 maskno5 size12 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrush no28 maskno0 size3 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrush no29 maskno0 size3 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrush no30 maskno0 size3 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrush no31 maskno0 size3 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrush no32 maskno0 size3 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrush no33 maskno0 size3 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrush no34 maskno0 size3 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]xbrush no35 maskno0 size3 edge0 fcn0fcnnamemake-airbrush special0 fade0 shade[]Lprocedures=text{\rtf1\ansi\deff0\deftab720{\fonttbl{\f0\fswiss MS Sans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fmodern Courier New;}{\f3\fmodern Courier New;}{\f4\fmodern\fcharset1 Courier New;}} {\colortbl\red0\green0\blue0;} \deflang1033\pard\plain\f2\fs20\cf0 Mr Wilson for Robotics and Intro Classes May 13, 2003 \par \par to showtime \par setup \par forever [bounce] \par end \par \par to setup \par make "xmax 295 \par make "xmin -296 \par make "ymax 161 \par make "ymin -160 \par make "diff 20 \par newturtle "redball border setpos[-150 0] seth random 360 setc 15 st \par \plain\f4\fs20\cf0 newturtle "bluball setpos[ 150 0] seth random 360 setc 105 st\plain\f2\fs20\cf0 \par end \par \par to border \par pu setpos se :xmin :ymax pd \par setpos se :xmax :ymax \par setpos se :xmax :ymin \par setpos se :xmin :ymin \par setpos se :xmin :ymax pu \par end \par \par to cleanup \par remove "redball \par remove "bluball \par end \par \par to bounce \par redball, fd 1, make "xr xcor make "yr ycor make "hr heading \par bluball, fd 1, make "xb xcor make "yb ycor make "hb heading \par \par if ((:xr - :xb) * (:xr - :xb) + (:yr - :yb) * (:yr - :yb)) < :diff * :diff \par [redball, seth :hb bluball, seth :hr] \par \par if ((abs (:ymax - :yr)) < :diff) [redball, seth(180 - :hr)] \par \plain\f4\fs20\cf0 if ((abs (:ymax - :yb)) < :diff) [bluball, seth(180 - :hb)] \par \par if ((abs (:xmax - :xr)) < :diff) [redball, seth(360 - :hr)] \par if ((abs (:xmax - :xb)) < :diff) [bluball, seth(360 - :hb)] \par \plain\f2\fs20\cf0 end \par \par to vlim :size \par pu home pd fd :size rt 90 fd 5 bk 10 \par end \par \par to hlim:size \par \plain\f4\fs20\cf0 pu home pd fd pd :size rt 90 fd 5 bk 10\plain\f2\fs20\cf0 \par end \par \par } Q pagenamepage1curturtle||curtext||transition0Dturtle-deamons[[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []]Cmouse-deamons[[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []]bg0}bufferPBf$9Ncx  5J_t1F[p-BWl)>Sh}%:Ody !6K`u2G\q.CXm  * ? T i ~  & ; P e z " 7 L a v  3 H ] r   / D Y n +@Uj'<Qf{#8Mbw 4I^s0EZo,AVk(=Rg|$9Ncx  5J_t1F[p-BWl)>Sh}%:O