0mw2.0 Englishprojectsize[592 322]turtles-have[]globals[]globals-list[globals-vars] shapesprocedurestext{\rtf1\ansi\deff0\deftab720{\fonttbl{\f0\fswiss MS Sans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fswiss\fprq2 System;}{\f3\fswiss Arial;}{\f4\fswiss\fprq2 Arial;}{\f5\fmodern\fprq2 Courier New;}{\f6\fmodern Courier New;}} {\colortbl\red0\green0\blue0;} \deflang3081\pard\plain\f5\fs20\cf0 to startup \par presentationmode \par setup \par end \par \plain\lang1033\f6\fs20\cf0 \par to setup \par pu home seth 90 \par resett \par time, ct \par end \par \par to doit \par setup \par forever [fd 1 settime timer / 10\plain\f5\fs20\cf0 \plain\lang1033\f6\fs20\cf0 check] \par end \par \par to check \par if colorunder = 45 \par \tab [bk 10 rt sum \plain\f5\fs20\cf0 int \plain\lang1033\f6\fs20\cf0 turn / 2 random \plain\f5\fs20\cf0 int\plain\lang1033\f6\fs20\cf0 (turn / 2)] \par if colorunder = 55 \par \tab [bk 10 lt sum turn / 2 random \plain\f5\fs20\cf0 int\plain\lang1033\f6\fs20\cf0 (turn / 2)] \par if colorunder = 9 \par \tab [settime se timer / 10 "sec stopall] \par end \par } d,pagenamepage1curturtlet1curtexttimetransition0Dturtle-deamons[[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []]Cmouse-deamons[[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []]bg0'bufferPB'-<KZix,>Pbt1F[p?`&Gh .Op6Wx>_%Fg - N l  > \ z  1 R s  9 Z { A e 7Us6]&Mt7^ 3Z&Gh (Fd0H`x 8Ph4Oj 'B]~#De +LmBf>_"Cd *Kl)>Sh}  % 4 C R a p  !!$!3!B!Q!`!o!~!!!!!!!!!""#"2"A"P"_"n"}"""{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{@?{{{{{@?{{{{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{{@?{{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{{{@?{{@?{@?{{@?{{@?{@?{@?{{@?{@?{@?{{@?{@?@?{{@?{@?@?{{@?{@?@?{{@?{@?@?{{@?@?@?{{@?@?@?{{@?@?@?{{@?@?@?{{@?@?@?{{@?@?@?{{@?@?@?{{@?@?@?{{@?@?@?{{@?@?@?{{@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?@?{@?{{@?@?{@?{{@?@?{@?{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{@?{{{@?{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{object typet namet1locked?false xpos296 ypos161 shape0penstate0 size40pencolor0heading90pensize16shown?true fcn[] kind1 shapein0have-list[has] colorin9~objecttypebuttonnamebutton1rect[16 284 83 27]show-name?falselocked?falsefcn[doit] kind1objecttypeslider nameturnrect[272 12 120 18]show-name?truelocked?falsevisible?true min1 max90current30value| 30|object typetext nametimerect[285 53 93 31]show-name?truelocked?falsevisible?truesnaped?false8text{\rtf1\ansi\deff0\deftab720{\fonttbl{\f0\fswiss MS Sans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fswiss\fprq2 System;}{\f3\fswiss Arial;}{\f4\fswiss\fprq2 Arial;}{\f5\fmodern\fprq2 Courier New;}{\f6\fmodern Courier New;}} {\colortbl\red0\green0\blue0;} \deflang3081\pard\plain\f4\fs20\cf0 \par }