Java StarLogo
2.1
English
`turtle`
to mystuff
if breed = pacman
[
 advance
 rt 90
 advance
]
end






























;;;;;;;;;;DO NOT EDIT BELOW THIS LINE

to eat
  if breed = pacman
   [grab one-of-turtles-here [kill partner]]
end

to advance
  if breed = pacman
    [setsteps steps + 1
     fd 1 
     setshape pacman2-shape 
     wait .05
     eat 
     setshape pacman-shape]
end


`observer`
;;;;;;;DO NOT EDIT ANYTHING ON THIS PANE
patches-own [pattern1 pattern2 pattern3]
breeds [pacman]
globals [steps]

to restore1
   ct
   ask-patches [if pattern1 > 0
       [sprout [setc pattern1 setshape mm-shape]]]
   setup-pacmen
end

to restore2
   ct
   ask-patches [if pattern2 > 0
       [sprout [setc pattern2 setshape mm-shape]]]
   setup-pacmen
end

to restore3
   ct
   ask-patches [if pattern3 > 0
       [sprout [setc pattern3 setshape mm-shape]]]
   setup-pacmen
end

to setup-pacmen
  setsteps 0
  create-and-do 1
   [setc black setxy -12 -12 setshape pacman-shape setbreed pacman]
  if number > 1
  [create-and-do 1
   [setc black setxy 12 12 setshape pacman-shape setbreed pacman seth 180]]
  if number > 2
  [create-and-do 1
   [setc black setxy -12 12 setshape pacman-shape setbreed pacman seth 180]]
  if number > 3
  [create-and-do 1
   [setc black setxy 12 -12 setshape pacman-shape setbreed pacman]]
end


`information`
fd 10 rt fd 10
nested repeats
triangles on top of each other


`interface`
SLCanvas
top-left 11 271

SLButton
turtle-or-observer? turtle
top-left 141 83
width-height 59 30
name "seth angle"
line-to-run "if (shape = pacman-shape or shape = pacman2-shape) [seth angle]"
forever? false
button-number 11
show-name? true
whichip 7

SLButton
turtle-or-observer? turtle
top-left 141 153
width-height 46 30
name "rt angle"
line-to-run "if (shape = pacman-shape or shape = pacman2-shape) [rt angle]"
forever? false
button-number 5
show-name? true
whichip 8

SLSlider
top-left 181 23
width-height 169 25
name "slider1"
variable "angle"
min-value 0
max-value 180
current-value 30
slider-number 0
show-name? false

SLMonitor
top-left 221 73
width-height 78 36
name "number m&ms"
list-to-run "count-turtles"
digits 0
delay 0.5
monitor-number 1
show-name? true
whichip 15
onewhichip 16

SLButton
turtle-or-observer? observer
top-left 20 90
width-height 51 30
name "setup 2"
line-to-run "restore2"
forever? false
button-number 9
show-name? true
whichip 9
toolTip-text "Resets to pattern 2"

SLButton
turtle-or-observer? observer
top-left 20 150
width-height 47 30
name "setup 3"
line-to-run "restore3"
forever? false
button-number 10
show-name? true
whichip 10
toolTip-text "Resets to pattern 3"

SLButton
turtle-or-observer? turtle
top-left 141 23
width-height 46 30
name "lt angle"
line-to-run "if (shape = pacman-shape or shape = pacman2-shape)[lt angle]"
forever? false
button-number 4
show-name? true
whichip 11

SLSlider
top-left 66 85
width-height 64 25
name "slider2"
variable "number"
min-value 1
max-value 4
current-value 1
slider-number 1
show-name? false
toolTip-text "Sets number of pacmen to create"

SLMonitor
top-left 272 78
width-height 72 36
name "number steps"
list-to-run "steps"
digits 0
delay 0.5
monitor-number 2
show-name? true
whichip 17
onewhichip 18

SLButton
turtle-or-observer? turtle
top-left 325 92
width-height 43 30
name "button11"
line-to-run "mystuff"
forever? false
button-number 12
show-name? false
whichip 12

SLButton
turtle-or-observer? turtle
top-left 101 73
width-height 85 30
name "advance-button"
line-to-run "advance wait .5"
forever? false
button-number 2
show-name? true
whichip 13
toolTip-text "Advance one space and eat the m&ms"

SLButton
turtle-or-observer? observer
top-left 20 40
width-height 44 30
name "setup 1"
line-to-run "restore1"
forever? false
button-number 1
show-name? true
whichip 14
toolTip-text "Resets to pattern 1"


`turtle shapes`
H4sIAAAAAAAAAO3cy5Ik133Y4RRISRA1vFiWr7SsMiVbsmXIwAAYAL6pV9w4uPXC
oQUBeWwygiBpAAyFvaoH9QPoLWxmEV01c6arMrPy3M/3Rah+quzOOnlqsnt6hoP/
9N0ff/WrL7762cvDlz/59Jcvv/zxw9vTo4fT47PffPyd08fnA7/16//7xq//7+3z
pzCy4/zw/34tbHjs2ufFOn/Laz/1envPX/s6e/dR4f6/95tvCwDAeN46PW79OaKG
bv0ZLdW6ua8j1/rXXnft+vdeV+pfw1LXEevXIde61h97/b3r3nsdsdeNdR1rr2/p
/Ap7mKZvTgAAAAAAAABAD37z3xFV8m8SdIAufU7p67P/vPvt/f2wf/vvaf9brzf2
/ku/X6PtP+V7maP2P9b9kHqN0vsrvf/a3o/S77n927/927/927/923/v+y+939Lv
R+n95d5/6f2Ufj9KX3/p/W99P2K/f3vXt3/Vm/2t6dmX/+tXn35xGR96GhNofCiP
jpXcqlqok/GhADCwt4r/LKKqqqr5OxkfCgAAAAAAAAAdebv4v0VQVVVVVVVVVVVV
VVVVVVXV/Z3mgUDPfvnyiy9/8fPz+NC35jmBxofy6Dg/PHULPXE73fy8redHvM13
XX/s8++93rXv573Xe+PjxocCwLDeOj3u+Rlp789cpde/92e1e9ev/fzRuvWc2K9n
/brX3/sava0f+/NrW3/v+9ng+QfjQwEAAAAAAACgF2+fHvf8W42l7n2N1Ndn//Y/
8v5Tr196/9a3vvXTfg9R1Tabeo3ar8/+7d/+7d/+7d/+8++v9ffH/u3f/tNdn/3b
v/2X2//e17C+9a1f9frfmL791csvPv/pVy/P80O/0eX80IfvHl/r1o+3vv4Ox/lh
77245v7Ocf6rbn3s1uvt+borvf6d75/5oVCpvb93VPx7zyr2f3yyqc5jVNvnh47e
WD+rxV439XWUXr/0+19i/VftOTfGdZX49a9p/2vfh1jr3LuHW1r79bd+lvvvYH4o
AAAA11z73xpy/W8OpdeHkZX++iu9Poxs6esv9tdj7vUAAPqXfn6oqo7bva9R+vpL
7bvV9yH1GqX3Z//2b//534fS+yn1PpS+fvt3/z91LdeUXLuG9ynH/kv/+tv/2Pu/
peTaNbw/I/z6l3gfSu+n1PtQ+vqvXdNaOdeKtaZf//L7bvV9SL1G6f3Zv/3bv/3n
fh9K76fU+5DhOr85/cHj/NC//cUv/vt5iOg3bw4RffjhX9/skr3n36v0EM/S6+9w
nB+eukFvWXOD7zn/qS+yreuuuaZ7vrhrXv/O92/VENGlr+3UX/ujr8+YDNE8vtbc
55dmiCh5rBsiutfOP9gMv/6anxHv/ZmxlfXXXkeqdUus/6o958a4rhK//jXtf+37
EGude/dwS2u//tbPcv8dYgwR3ftn5db/rG3/9l+ypdn/2PsHAPpXeohX6fVhZKW/
/kqvDyMzRBQAoHVxhoiWluLfXGxpafZv/yVbmv2X3f+rzfFe17BP+7d/+7f/XO9D
6f2Ueh9KX3+pfdf8PtxScu0a3qcc+y/962//Y+//lpJr1/D+jPDrX+J9KL2fUu9D
6eu/dk1r5Vwr1po1/Lq3cB/k2Hdr74P927/92/+o+0/1PpTeT6n3IcN1/vb07ItP
P/vsp1+dx4f+9u3xoY//7PLHf/Ta82sevj89+XnXnj9+/tLrvNEr5109/8rz2Oef
P29jw/OXXu/a51/z8KO/W/eJG8eH3rqVw8+59vzW66215jpynn+vLe/Vrc9f2s/C
560bHxp+TT5+jwi+V9w95u/aPb/xn4pfu45rr3/t43vXvfY97N713/j8jR9fWv/q
9UTa91bVrH/tOjZ+3Po717/2e/TS8Y3r3/t7+tbf+3Ovu/X7T6zrWnr9ez8ea39r
vbHO1z9jnbvz9TdfT7D+fmnGh97zx6Knzt9r6fVjrbPVlvXXvldb9hL713vveta3
fg3rp1Zq3aXruPbxWOvcu/6917H19WPfF1tff+/17Hy9Q4zxoY9i/xm6Fav39eM/
/rpP/x1K6fdh9Z9dtv56nvd9pZHui1R/Bnzj82P/XdHO/d/7Z9C15yf7O7LIf8eW
bP+l97nzfVgSa/9vvO7e+zrT/s/r7Xwf7r7+e8+PtO/zeq19HUTe/zW17z+16u6D
3H/3VvrrItN9fs3u/Sc+PzX7X9nY+4/0891e9r+y9v90R9n/tf3E/nz7f62xbd5v
Zb1X6esu/T6Uvt5S+y99naXfh+XXeQhael/brmfJ2vXWf37aXq7jIejtz7/m3vcv
3/3wkOT6l15n+fMfVq2fev/3Xn8sq/fxo//7eiN/Hy9t9b5Xvg+9WNr/KOrdd5zx
oaX/DU/pplZqH6X2uyT2v5HZul5pe6+/tv2kZv/p97/3NVP+muT4Pl7j/mv7fSy3
VL8v1ibWPu3f/p9q7ezf/lO2dvZv/ylbO/sfa79LRt13yP7H3HfI/uPsv5b3697r
vnf/tdw3sa9/6XVq+7qJff2t/LyQax+1vQ+l95PrfSl9faXeh9LX83V/Z/rOz17+
j6/e+ZtPvzgPEP2d+eNXB4ju9fBf73vJx/PuPZ+7HeeHV2+cWzf5li+Iez+2dq2l
622l1/a/9P5E/PiqAaLUpdT3ylLfq8N1c61/bV2/VwH9WDdAVOtqqs9d81ol1n9K
yvfs1rp797T0ObnuIdXpa7c+9qp7Xvue85f0fn7m9/8Qc4AoALxq9L9DG3X/o/4d
6qh/h7y07173v3bfve1/67572f+9++5l/wAAAAC0Ju4AUVVV1Vf7qhivVXo/Jfff
0vvwlBH2f0uKtUrvd82+U19r7fvOdY217rvEtdW079z7j/0+5L7uWt6f0tdXav+l
r0tVVVXT9d5zbslxzSXW36qX9feyvvWt3+76915HrHVrWX/tdaRaN9H6vzt994uf
/s+fvD5B9HfnT0g2QfSavf+ljP/iJpnj/PDUHXTrLr115625u7ecd+urY815tffW
Hpfeg0gfN0G0I6W/R5b+Xl36v9L0X4sC7TFBtPau/dxXlV4/xnVsPeeWlOuuWf/W
dcT8tVp7nSXX17q69LFX3fPa95y/pPfzM7//BxNEAajF6H+HZv8PT3YUo/+d8uiT
GEefSDn6ZE4TSgEAAACIywRRVVWN072v8ZQa9pV63/Z/ff81vw+xX3ONHve9Zf8l
34fUa9yjh33v2X/K9yHXvmPs/573Iff+cr6PI+9/7ftQ+vpKvw+lr0tVVbVE7z3n
lhzXXGL9rXpZfy/rW9/67a5/73XEWreW9ddeR6p1E63/9vStL//205+fh4ee/lHA
3cNDH36w9YzXzzv3xbrPWzp+9fUXeu95sXrv9S8J39dr7/MrjvPDvTdprJt76fOW
ju/9JlLKvde/9ddn4bwhhodu/VpKte7S98Dc66e+jtjv+9bvjXvXj/29PdW6W3+P
S7Vuq78Xt/IzQKr1U1/PvUqt+8Z1LHyfTP59dOH79f7v52+dHlP/Aad0Q6XWzX0d
a7Xyvm+9/r3rbxVr/b1ivV+plVq39Pq1vO+57oPU379ir3vtOu79eOzve5G/zx0M
D6V1uf5MUJvcfyaqxeY/G2b6u69c7H9jX9xua+z/dntX+/5T/51drfuv5e9qUyv9
d9b2f99598q137X7yf2/CZTef7iPVN9X9r5+K11S+vpq/b7SS0Olr8f+8/Sa0tdl
/2m7VunrLL3/UOnrzrXPJaX3VWrf14y239Do+w/t/fvE5v8+0v5vNvX5pbW/f8ND
tf0uKX19pfbd6/73Kn399l92/62/H/bf13562/9Wvew/ltr3n4v917H/0vZeT+v7
f7T3elrbbyr2P+a+H42670ej7t99P+b+R/99r/Wfe9aK/XNvK+9Dqn3X+n7k3q/9
b3s/cp9fuvZ/W+rzS7fx/f/e9Ozlz//P//785Xl86O/NcwLP40Mf/stXp8t4+OFP
VjX0eP6StefvXT/8vHvPj7X/xfd15ft39XUff/3u7PT1+NCtrt3ma78clo7vXX/p
9VKvv/XbwNL5e193wWl86Bv3yA//OmqX1Lb+Xr2tX/r9r239rdfX2/ql3//avv53
f59qfP3d11vZ+qP1cXxoapl+pom2fuw/Qra+/l69rb/1+npbf6vW1996furrrW39
2Ndbev3BHObxoYs/M0T+s3nuP+svsX/7v9lK9llq/6XZv/3f6u7Xt/+b3Xt9vX//
s3/7L9m9Uu9/7/n2b/97Xn9xffu/2cXzff8r2r3s3/5vNbXS75/92/+tpjb6/lOz
f/u/WftX1UH7OD60daP/2xD7t/89Tf36tV+f/du//d//+qXZv/3v6d7XL632/ad+
/+zf/vc09fWPvv/U7N/+93Tv65dWev+p1y/N/u0/ZWuXev+1v7+lr9/+7b/k/oFu
fWv61k+e/+L5eXjot14bHvr4WQ/v/PK1hkb5+JKlzwvXWVz3v/3lk137eXvPn74e
HnrtN5Ol32x6/fja33Tv/U157efv/c1+5fmn4aGhrfey853v/H7P36u19ZfO39q9
Uq+/92eMva9n/bLrPw4P3fuzjPOd7/x+z1/6/NivV3r9re/nktjXH3v90q9n/aLr
H+bhoUt6/1nY+ta3vvWtb33rW9/61re+9a1vfeunf/297N/+b7X219+r9PXt/f5U
+vvbXvZv/yW7+/oL/9uF0tdn//afsnuVvn77t/893av09fe+/8fhoaX/LYr1rW99
61vf+ta3vvWtb33rW9/61q9//b2vX/v12b/9j7z/veunVvv7n5r92/+ejn59qdm/
/e9p6+zf/ve0dZXv//enZ5/96rPPfvbyPD70958cH/ro4fu3e83Sedde542P/+jv
Xu/G1919fuY+uve80B3nHeeHrbdlrNu5l28De+19/3b++n3vqfGhoVj3+r1yr5/r
a7+W9Td/b839vdb6ZdfXrhvKvV5t68e+nr3Sr//0+NDYf2Qp/Uemyv6IVt36wLhK
f/+pbf3Sv/9kXv+wZnzoktp+ls3N/su2tN73X3p/pd+f0tdv//u6V+nrT73/3ess
/V1l73+Xaf/2b//2b//2P+L+VVVVtbkuKX19qfe3pPT12/++7lX6+kvvf0nv+1ti
/2VbWvv7Xzc+tPS/3Viy9/rt3/73tLTe97eX/dv/nrau9/0BAAAAy3r/+wF//2P/
e9q6vfuv/f1JvT/7t/9bLW3n9T+b3v788/Po0GfzR66ODmU4x/mh9JdYij71ZZzz
/Ia6anRoLR4Ofa9Xet3aPPzgdmOft/Q6sY/fu/61j6/9vFjrh5+393WAEtaNDn3q
Z6OlbvnctT+L7XnNrevG2MOW60i97tJ1pF7v2vq3Pn5L7POWXif28XvXX9rn1te5
d/219+u964/Sx/+/1Lq1rJ/rOtZ+bql1Y13Phs89xBgdCgAAAAAAAADUIM7oUFVV
VVVVVVV9uuGx0tdj/6qqqqqqqqpd99vTs19++jeff/rz8/jQb89zAo0P5dFxfqjk
do3a8Fju8xtq1eNDH354fK25zg/Pi/06964b+3Wunbf19fZe/9rrUu2xj0qtW8v6
ua5jrVLrxrqe9d46PVbyM8kbDeU6f8ne17l33divs3f98HVynQc9KfV1EOvrP9b6
ua4j1u8DqdZN/ftD0IPxoQAAAAAAAADQC+NDVVVVVVVVVVM2PFb6euxfVVVVVVVV
tet+Z/r2b8aHPj/PD/2O+aG86jg/VHK/Rm14LPf5DXXT/NDa56XVOjeulrl5a+cH
5rqua6+fa33VGvqolq//Uuvnuo61Sq0b63rWe+v0uPZnh632/qwSW6l1115HbrWs
DyMr/fVXy/qlv//W8vtP5t9/D+aHAgAAAAAAAEAvzA9VVVVVVVVVTdnwWOnrsX9V
VVVVVVXVrvvd6e3T3NB33vvw9GwyOpSL4/xQya0ateGx3Oc31E2jQwGAnmwbHaqq
dTQ8Ntr6qhqlB6NDAQAAAAAAAKAXRoeqqqqqqqqqpmx4rPT12L+qqqqqqqpq1/3e
eXToi9OzyehQLo7zQyW3atSGx3Kf31CNDgWAYRkdqtpiw2Ojra+qUXowOhQAAAAA
AAAAemF0qKqqqqqqqmrKhsdKX4/9q6qqqqqqqnbdv3ceHfrR6dlkdCgXx/mhkls1
asNjuc9vqEaHAsCwjA5VbbHhsdHWV9UoPRgdCgAAAAAAAAC9MDpUVVVVVVVVNWXD
Y6Wvx/5VVVVVVVVVu+4fnEeHfnx6NhkdysVxfqjkVo3a8Fju8xuq0aEAMCyjQ1Vb
bHhstPVVNUoPRocCAAAAAAAAQC+MDlVVVVVVVVVN2fBY6euxf1VVVVVVVdWu+/fP
o0M/OT2bjA7l4jg/VHKrRm14LPf5DdXoUAAYltGhqi02PDba+qoapQejQwEAAAAA
AACgF0aHqqqqqqqqqqZseKz09di/qqqqqqqqatf9w8fRoc/fPT2bjA7l4jg/VHKr
Rm14LPf5DdXoUAAYltGhqi02PDba+qoapQejQwEAAAAAAACgF0aHqqqqqqqqqqZs
eKz09di/qqqqqqqqatf9B+fRoe+dnk1Gh3JxnB8quVWjNjyW+/yGanQoAAzL6FDV
FhseG219VY3Sg9GhAAAAAAAAANALo0NVVVVVVVVVUzY8Vvp67F9VVVVVVVW16/7D
8+jQ56dnk9GhXBznh0pu1agNj+U+v6EaHQoAwzI6VLXFhsdGW19Vo/RgdCgAAAAA
AAAA9MLoUFVVVVVVVdWUDY+Vvh77V1VVVVVVVe26/+g8OvT907PJ6FAujvNDJbdq
1IbHcp/fUI0OBYBhGR2q2mLDY6Otr6pRejA6FAAAAAAAAAB6YXSoqqqqqqqqasqG
x0pfj/2rqqqqqqqqdt1/fB4d+sHp2WR0KBfH+aGSWzVqw2O5z2+oRocCwLCMDlVt
seGx0dZX1Sg9GB0KAAAAAAAAAL0wOlRVVVVVVVU1ZcNjpa/H/lVVVVVVVVW77j85
jw798PRsMjqUi+P8UMmtGrXhsdznN1SjQwFgWEaHqrbY8Nho66tqlB6MDgUAAAAA
AACAXhgdqqqqqqqqqpqy4bHS12P/qqqqqqqqql33n55Hh744PZuMDuXiOD9UcqtG
bXgs9/kN1ehQABiW0aGqLTY8Ntr6qhqlB6NDAQAAAAAAAKAXRoeqqqqqqqqqpmx4
rPT12L+qqqqqqqpq1/3+eXToR6dnk9GhXBznh0pu1agNj+U+v6EaHQoAwzI6VLXF
hsdGW19Vo/RgdCgAAAAAAAAA9MLoUFVVVVVVVdWUDY+Vvh77V1VVVVVVVe26/+w8
OvTj07PJ6FAujvNDJbdq1IbHcp/fUI0OBYBhGR2q2mLDY6Otr6pRejA6FAAAAAAA
AAB6YXSoqqqqqqqqasqGx0pfj/2rqqqqqqqqdt0/Oo8O/eT0bDI6lIvj/FDJrRq1
4bHc5zdUo0MBYFhGh6q22PDYaOurapQejA4FAAAAAAAAgF4YHaqqqqqqqqqasuGx
0tdj/6qqqqqqqqpd958/jg59/93Ts8noUC6O80Mlt2rUhsdyn99QjQ4FgGEZHara
YsNjo62vqlF6MDoUAAAAAAAAAHphdKiqqqqqqqpqyobHSl+P/auqqqqqqqp23T8+
jw597/RsMjqUi+P8UMmtGrXhsdznN1SjQwFgWEaHqrbY8Nho66tqlB6MDgUAAAAA
AACAXhgdqqqqqqqqqpqy4bHS12P/qqqqqqqqql33cB4d+vz0bDI6lIvj/FDJrRq1
4bHc5zdUo0MBYFhGh6q22PDYaOurapQejA4FAAAAAAAAgF4YHaqqqqqqqqqasuGx
0tdj/6qqqqqqqqpd91+cR4e+f3o2GR3KxXF+qORWjdrwWO7zG6rRoQAwLKNDVVts
eGy09VU1Sg9GhwIAAAAAAABAL4wOVVVVVVVVVU3Z8Fjp67F/VVVVVVVV1a77g/Po
0A9OzyajQ7k4zg+V3KpRGx7LfX5DNToUAIZldKhqiw2Pjba+qkbpwehQAAAAAAAA
AOiF0aGqqqqqqqqqKRseK3099q+qqqqqqqradf/kPDr0w9OzyehQLo7zQyW3atSG
x3Kf31CNDgWAYRkdqtpiw2Ojra+qUXowOhQAAAAAAAAAemF0qKqqqqqqqmrKhsdK
X4/9q6qqqqqqqnbdPz2PDn1xejYZHcrFcX6o5FaN2vBY7vMbqtGhADAso0NVW2x4
bLT1VTVKD0aHAgAAAAAAAEAvjA5VVVVVVVVVTdnwWOnrsX9VVVVVVVXVrvsvz6ND
Pzo9m4wO5eI4P1Ryq0ZteCz3+Q3V6FAAGJbRoaotNjw22vqqGqUHo0MBAAAAAAAA
oBdGh6qqqqqqqqqmbHis9PXYv6qqqqqqqmrX/Vfn0aEfn55NRodycZwfKrlVozY8
lvv8hmp0KAAMy+hQ1RYbHhttfVWN0oPRoQAAAAAAAADQC6NDVVVVVVVVVVM2PFb6
euxfVVVVVVVVtev+2Xl06CenZ5PRoVwc54dKbtWoDY/lPr+hGh0KAMMyOlS1xYbH
RltfVaP0YHQoAAAAAAAAAPTC6FBVVVVVVVXVlA2Plb4e+1dVVVVVVVXtun/+ODr0
g3dPzyajQ7k4zg+V3KpRGx7LfX5DNToUAIZldKhqiw2Pjba+qkbpwehQAAAAAAAA
AOiF0aGqqqqqqqqqKRseK3099q+qqqqqqqradf/1eXToe6dnk9GhXBznh0pu1agN
j+U+v6EaHQoAwzI6VLXFhsdGW19Vo/RgdCgAAAAAAAAA9MLoUFVVVVVVVdWUDY+V
vh77V1VVVVVVVe26/+Y8OvT56dlkdCgXx/mhkls1asNjuc9vqEaHAsCwjA5VbbHh
sdHWV9UoPRgdCgAAAAAAAAC9MDpUVVVVVVVVNWXDY6Wvx/5VVVVVVVVVu+5fnEeH
vn96NhkdysVxfqjkVo3a8Fju8xuq0aEAMCyjQ1VbbHhstPVVNUoPRocCAAAAAAAA
QC+MDlVVVVVVVVVN2fBY6euxf1VVVVVVVdWu+2/Po0M/OD2bjA7l4jg/VHKrRm14
LPf5DdXoUAAYltGhqi02PDba+qoapQejQwEAAAAAAACgF0aHqqqqqqqqqqZseKz0
9di/qqqqqqqqatd95zw69MPTs8noUC6O80Mlt2rUhsdyn99QjQ4FgGEZHaraYsNj
o62vqlF6MDoUAAAAAAAAAHphdKiqqqqqqqpqyobHSl+P/auqqqqqqqp23b88jw59
cXo2GR3KxXF+qORWjdrwWO7zG6rRoQAwLKNDVVtseGy09VU1Sg9GhwIAAAAAAABA
L4wOVVVVVVVVVU3Z8Fjp67F/VVVVVVVV1a77786jQz86PZuMDuXiOD9UcqtGbXgs
9/kN1ehQABiW0aGqLTY8Ntr6qhqlB6NDAQAAAAAAAKAXRoeqqqqqqqqqpmx4rPT1
2L+qqqqqqqpq1333PDr049OzyehQLo7zQyW3atSGx3Kf31CNDgWAYRkdqtpiw2Oj
ra+qUXowOhQAAAAAAAAAemF0qKqqqqqqqmrKhsdKX4/9q6qqqqqqqnbd986jQz85
PZuMDuXiOD9UcqtGbXgs9/kN1ehQABiW0aGqLTY8Ntr6qhqlB6NDAQAAAAAAAKAX
Roeqqqqqqqqqpmx4rPT12L+qqqqqqqpq133+ODr0w3dPzyajQ7k4zg+V3KpRGx7L
fX5DNToUAIZldKhqiw2Pjba+qkbpwehQAAAAAAAAAOiF0aGqqqqqqqqqKRseK309
9q+qqqqqqqradd8/jw597/RsMjqUi+P8UMmtGrXhsdznN1SjQwFgWEaHqrbY8Nho
66tqlB6MDgUAAAAAAACAXhgdqqqqqqqqqpqy4bHS12P/qqqqqqqqql33g/Po0Oen
Z5PRoVwc54dKbtWoDY/lPr+hGh0KAMMyOlS1xYbHRltfVaP0YHQoAAAAAAAAAPTC
6FBVVVVVVVXVlA2Plb4e+1dVVVVVVVXtuh+eR4e+f3o2GR3KxXF+qORWjdrwWO7z
G6rRoQAwLKNDVVtseGy09VU1Sg9GhwIAAAAAAABAL4wOVVVVVVVVVU3Z8Fjp67F/
VVVVVVVV1a774jw69IPTs8noUC6O80Mlt2rUhsdyn99QjQ4FgGEZHaraYsNjo62v
qlF6MDoUAAAAAAAAAHphdKiqqqqqqqpqyobHSl+P/auqqqqqqqp23Y/Oo0M/PD2b
jA7l4jg/VHKrRm14LPf5DdXoUAAYltGhqi02PDba+qoapQejQwEAAAAAAACgF0aH
qqqqqqqqqqZseKz09di/qqqqqqqqatf9+Dw69MXp2WR0KBfH+aGSWzVqw2O5z2+o
RocCwLCMDlVtseGx0dZX1Sg9GB0KAAAAAAAAAL0wOlRVVVVVVVU1ZcNjpa/H/lVV
VVVVVVW77ifn0aEfnZ5NRodycZwfKrlVozY8lvv8hmp0KAAMy+hQ1RYbHhttfVWN
0oPRoQAAAAAAAADQC6NDVVVVVVVVVVM2PFb6euxfVVVVVVVVtev++/Po0I9Pzyaj
Q7k4zg+V3KpRGx7LfX5DNToUAIZldKhqiw2Pjba+qkbpwehQAAAAAAAAAOiF0aGq
qqqqqqqqKRseK3099q+qqqqqqqradf/DeXToJ6dnk9GhXBznh0pu1agNj+U+v6Ea
HQoAwzI6VLXFhsdGW19Vo/RgdCgAAAAAAAAA9MLoUFVVVVVVVdWUDY+Vvh77V1VV
VVVVVe26//FxdOiLd0/PJqNDuTjOD5XcqlEbHst9fkM1OhQAhmV0qGqLDY+Ntr6q
RunB6FAAAAAAAAAA6IXRoaqqqqqqqqopGx4rfT32r6qqqqqqqtp1/9N5dOh7p2eT
0aFcHOeHSm7VqA2P5T6/oRodCgDDMjpUtcWGx0ZbX1Wj9GB0KAAAAAAAAAD0wuhQ
VVVVVVVV1ZQNj5W+HvtXVVVVVVVV7br/+Tw69Pnp2WR0KBfH+aGSWzVqw2O5z2+o
RocCwLCMDlVtseGx0dZX1Sg9GB0KAAAAAAAAAL0wOlRVVVVVVVU1ZcNjpa/H/lVV
VVVVVVW77l+dR4e+f3o2GR3KxXF+qORWjdrwWO7zG6rRoQAwLKNDVVtseGy09VU1
Sg9GhwIAAAAAAABAL4wOVVVVVVVVVU3Z8Fjp67F/VVVVVVVV1X77/wFKplZQHg8V
AAAVDx4=

`template`
null

`settings`
patch-size 16
num-shapes 64
screen-half-width 12
screen-half-height 12
interface-window-xcor 178
interface-window-ycor 53
interface-window-size 702 426
output-window-xcor 0
output-window-ycor 0
output-window-width 300
output-window-height 200
info-window-xcor 0
info-window-ycor 0
info-window-width 500
info-window-height 400
control-center-xcor 25
control-center-ycor 22
control-center-width 562
control-center-height 706
shape-chooser-xcor 100
shape-chooser-ycor 100
shape-chooser-width 298
shape-chooser-height 155
turtle-command-center-height 150
observer-command-center-height 150
background-image ""

`string table`
H4sIAAAAAAAAAGNgYGAAABzfRCEEAAAAAAAABA==

`symbol table`
H4sIAAAAAAAAAGNgYGAAABzfRCEEAAAAAAAABA==

`double table`
H4sIAAAAAAAAAGNgYOBx8G5gAAEHRyhtyQChoxwgtB6U7waV14DwD0BpBy0orQOh
7VfOBIFZ9g8gfADIFuy7ZAAAAAAAAGQ=

`list table`
H4sIAAAAAAAAAHWQXQ6AMAiDCzP+P3gGj+U5PaDDlKwm86FjfFDIBuAAMFg9Ug6M
ZEZmwpzMyU7xGv0TNZOpom8PSf1mdJ3x01N0ju5B81/gPjQ/7PuepWoNb0UlYrCo
d/Ieixlb7uQ9d5b8J+l58weEb5a4cAEAAAAAAXA=

`bytecodes`
H4sIAAAAAAAAAM2VzXLaMBDHVzbGFAi2Q8VX2uIkTG8cktxy6vTedwghStsZYhgs
dyYzfcT2nSKklbXYlF5yiA5efaz3/9v1CqBzd/8sxXL9IPK7L/BnN/4CQB9aW5HL
9VZcqdU5lOPCB/B2kwEAM1usz3DOgMUcz7toW3jmKT9leIxrFYd/1gZGvrGRZ+xl
AyBEHzsiCHQ0pLp+Q1SspLp5Q1QedHMhi818s1g+iUxt/3YejFr1SLxS2ZBERNlS
NNCq4LyJ86Yh03OFwS+Q0p63gM2szjuS8Qj32rg+xXWH6HXRnhC9HtGLjJ6eq3f4
yGnbCumzhDCcHmDoVxjeEwaOdkAYhoRhRBjGRxgmhOGMMNj4Hyp1/0gYPqGdEoaU
MJzv193q6i7wIXx6zmXx+GiSsN+dp64l46FrwxA/6l6jqAcf18/2hBrgi4U0VTwq
ojrizHaZD2yqHEbMBJtWgwYQLh5+LbKlULuz/wSeuIuV2EumLlJss1CRE9+1Mrft
FZBSquyiNmYaVKoQuktYAjah/7WQcp3dpqm6bT/SRfZ9JXQVGJ/tQbo1M+t4iuCB
g93laHsosochJKXIVr6KxLgi0YKY5lFs0murDaWEGcHuIle9b4i3V/N2+KvXwZ9U
8NsEyLW7BWrUgIalN7bX/F5vgP4JPngHwHSGDtCp5X9F5PaGlht8W2c/1f/Dbbpc
F5mcy2IrVyKH+g+/MmM1n/llIbSqTraJ8bpH4gX1OHrzBHrlO7kUm51vD7Xbtb8D
lgBh8A4w9A7EC/8dR78TvQDudEO2bAgAAAAACGw=

`observer world`
H4sIAAAAAAAAAGMQSMhPKk4tKkstUiguSSxJTXBggAMrBq6CnPyS8syU9NQSIJ+F
gS0nNS+9JAPI5mFgB8kVpOaBlXKDNcNlOYCYkYG1uCS1oBhqGCMIgwgAJTV1AXMA
AAAAAABz

`patch world`
H4sIAAAAAAAAAJXczYrryBnGcbXaTkQ+QAsttPBCCCGMMcbWhyWtMleR9QwnzUxg
OHOYNCS561xC3LL9uuvYrnr+DcI2/M7bpbL0VKmkPtFff/z20/uXX4p/vf/0/vbj
D5H9/D1a/OfLb7/P7//07dff3v/9z3/8/PZ++rSK4m9fTq9p9Idf377+/P7L6f02
+uOH+fb29fQhjxb/Pf/TJPrzXNhccdr+ctleo+T0u9/ffv96mH/L9VNzev9in9rT
p/hv/zs36vr66eflY3u5vjlt132QbAJsCmwGbA7sCtgC2BLYCtga2DWwG2C3wO6A
3QN7ALYBtgW2A7b32/izPYK6A7AjsJNur+aHO/o8SySbAJsCmwGbA7sCtgC2BLYC
tgZ2DewG2C2wO2D3wB6AbYBtge2A7f32UZZIdQdgR2An3VqWJELdCNgE2BTYDNgc
2BWwBbAlsBWwNbBrYDfAboHdAbsH9gBsA2wLbAds77cPs0SpOwA7Ajvp1rIkFepG
wCbApsBmwOZhG19eLUsUW0jWzRK/jZ0sUdpQS9bNEqXPNsBugd0Bu/fb0369nraF
kyXPbWz92wTtrX/boF1+tMPJEn8b3Czx1106WaL02QDsCOykW8uSTKgbAZsAmwKb
AZuHrR1nq7C1ugWwJbAVsHXY2nmxDtu7LAnYj36zLFHq7oDd++3lnHfnJUrdBtgW
2A7YPmwto45he5clih2BnXRrWZILdSNgE2BTYDNg87C1720VtndZotgS2ArYOmxt
fFuH7V2WBOxHbcuSsI0tS5Q27P32MnbHTpYodRtgW2A7YPuwvZuXKHUHYEdgJ91a
lqyEuhGwCbApsBmwedjezUuUugWwJbAVsHXY2nXAOmwtHzaanetuNfvRDssSpe7e
bx/OS5S6DbAtsB2wfdjavh3D9i5LFDsCO+nWsqQQ6kbAJsCmwGbA5mF7t16i1C2A
LYGtgK3DNj6fd0vLkkDdj2PYskRpwxbYnWY/5omWJU/sZV7y4mSJ0oYG2BbYDtg+
bO/mJUrdAdgR2Em3liWlUDcCNgE2BTYDNg/buyxRbCHZ2MkSv104WaLY2m8/3PWc
syx5bl+tzzbAboPWvg/Lkuf2fl7y3MbXdVLLEuV7ayTrZonfumuvyvfWS9bNEuVY
H4AdgZ10a1lSCXUjYBNgU2AzYHNgV8AWwJbAVpqd5xq138afNssST93r/Q7LEr89
193K9naN47fzOohlSdguLUuU/m2AbYHtgO2BPQI7ADsCO+nWsqQW6kbAJsCmwGbA
5sCugC2ALYGtNDufx7XfXtcUnCxR2rABdgvsDth92F6y75Yl4T57tSxR2tAC2wHb
A3sEdgB2BHbSrWXJWqgbAZsAmwKbAZsDuwK2ALbU7DweV5qd69Z+e50PzHXXfvsw
SxS7BXanWWe9xGPv1l7DdReWJUp7W2A7YHtgj8AOwI7ATrq1LNkIdSNgE2BTYDNg
c2BXwBaanc+LEthKs06WPLGXcft8Pb/2WyfPNpp1siRc98WyJGwXliUee5clSnsb
zc5r0K1mnSxRbA/sEdgB2BHYSbeWJVuhbgRsAmwKbAZs7rfOet8K2CJo7Xi3LHlu
F1a3CtrbumcdtMu7e8JKn200G39+Vi1sl5YlShv2YXt3H0ep2wDbanbOyU6zTpYo
9gjsAOwI7KRby5KdUDcCNgE2BTYDNvfb63q5kyWBuvO4Wcg2tiwJ26VlSdje1ks8
9u4ax29j555wuO6rZYnfRs7aq98unXlJ2N7WS5T+bWQbW5YodTvNOlmi2COwA7Aj
sJNuLUv2Qt0I2ATYFNgM2Nxv4/PfdbjPvXrq2jlUSDZ2rnH89jzGVpI9t7eW7Lnu
OmytzzaadeYlit1p9uWTCezb2R4ke+6zBthWsss5fzvJxvMY0Ev2xckSpc8GYEdg
J91alhyEuhGwCbApsBmwud9exsx4HgtXfuvULTQ7j1mlZp0sUWwdtvH3z9Ar7d1o
dq671axzjaPU3Ydt/P0z9ErdRrPOvESp22nWyRL/vi2cLFHaMAA7Ajvp1rKkEepG
wCbApsBmmp3nBLnfXucO89iy8tuHWaLYUrNzGyrNOlnisXbfdB221mcbzTpZotid
Zuf27sPWcvIQtrZvjWyXliXKvnXA9mFr899j2N5liWJHYCfdWpa0j62z5hgF7W1t
MAna21pFCmwWtK92PORBu7DxbeW3D7NEsSWwlWbjz8+qeWx8ffZrHbbWhg2wW2B3
wO7D9jIGLCxLwn12m5cobWiB7YDtwzb+/rlXZd8GzTpZothJt5Yl3WN7PdecLHli
nTYkwKaaneeIGbB52MbX58xXYXs9hi1LwnZhWRK2tyxR2lCH7eV8u81LwnVv1zhK
e7eyfbUsCdvbc6/+fTs/p3sIW2tDA2wr21uWKLYP28u194tlifK9DZp1skSxk24t
S/rH9mGWPLEPs0SxKbAZsHnY3s1L/PY8XhSSPa+flZJ15yVK3Vqy531bh6312QbY
LbA7YPdhe7f2qvRDI1l3XqLYTrLnY6eXrPv/lyh9NgA7Ajvp1rLk+Ng61y2R3z7M
EsWmwGbA5sCugC2ALYGtgK2BXQO7AXYL7A7YPbAHYBtgW2A7YHtgj8AOwI7ATrq1
LBke24dZ8sQ+zBLFpsBmwObAroAtgC2BrYCtgV0DuwF2C+wO2D2wB2AbYFtgO2B7
YI/ADsCOwE66tSwZH9uHWfLEPswSxabAZsDmwK6ALYAtga2ArYFdA7sBdgvsDtg9
sAdgG2BbYDtge2CPwA7AjsBOurUsmYS6EbAJsCmwGbA5sCtgC2BLYCtga2DXwG6A
3QK7A3YP7AHYBtgW2A7YHtgjsAOwI7CTbv8P06xHMBNsAAAAAGwT

`turtle world`
H4sIAAAAAAAAAJ2WXzPDQBDAt/RPUBRBUURV/feAB56cFy++gSfR3jSdqSbTxpQ3
38RHcR/JN+CkyY4et3W9mSS7mf3t7m32Lgcz9+FTJ2xxpxu6Ib9ngOMNsi3eboSe
lC8g89DhvC7FCkwGLT/sNesNHkr9HHLfesDbUjmBTM1v+R0pliD9UoukPExFzn94
s6R53e+1A6mdQqbruQGX4gGkn/tMGsZ7nh/lke16seUZ5Dzu1pvthlTsOM0UZAO3
9uh+h099yiGfx/I6Ent9g+SpjquPWJiOvKSiO8Ahc/qvmcKx29fBF/kB7gC5qhG3
j1zFiNtjVmxXVrg7RnG7rKDhLoHiqszWcHSeO6yo4W5IrsJKI+W5jfU0i1fGejoK
R89vC7mSUTwHuaJRvE3kbIWj422IxK6gcCeDusKtv39oOLrPsBqG3NqVLt71K8Wt
Jl5/cXQ9V7CeKkf3WVEkdpZRnsvIKe6H5LmUcLhv/S/eooC/x5D52SL+gu9qPDrP
BVEciZsXtoaj5zcnChqO7uuCsDQc3Z+zAjQcvf5mknqKQath3DRyap/ReeaRM1sP
U8ip+wvdL5P4vzXbzyZEVcPR87NERcPR9cyJ8khcVjgj5ZnBeqoc3Z9prKf6X6G/
wzhyjhE3hpzZeSKFnHp+oTk8lwn1vERwX+MvFXuvCgAAAAAKrw==