Java StarLogo
2.0
english
`turtle`
turtles-own [angel devil xdiff ydiff angx angy devx devy]

to choose-angel
   setangel random (number)
   if angel = who [choose-angel]
end

to choose-devil
   setdevil random (number)
   if (devil = who) or (devil = angel) [choose-devil]
end

to reposition
      setxy random screen-width random screen-height
      if pc = red [reposition]
end

to go
  ifelse angel = number
      [setangx mouse-xcor    setangy mouse-ycor]
      [setangx xcor-of angel setangy ycor-of angel]
  ifelse devil = number
      [setdevx mouse-xcor    setdevy mouse-ycor]
      [setdevx xcor-of devil setdevy ycor-of devil]
   set ydiff ((angy) - (devy)) 
   set xdiff ((angx) - (devx))
   checkbounds
   ifelse (random 100) < randomness 
   [seth towards-nowrap 0 0]
   [seth towards-nowrap ((angx) + xdiff) ((angy) + ydiff)]
   lt random 5 rt random 5
   ;if (random 100) < randomness [reposition]
   if pc-ahead = red [seth towards 0 0]
   fd 1 if count-turtles-here > 1 [if pc-ahead != red [seth towards 0 0 fd 1]]
end

to checkbounds
   if ((abs ((angx) + xdiff)) > screen-half-width - 1
      or (abs ((angy) + ydiff)) > screen-half-height - 1)
   and (xdiff > 1 or ydiff > 1)
  [set xdiff xdiff / 2 set ydiff ydiff / 2 checkbounds]
  ;make sure this doesn't go too deep
end

;develop give up strategy
;make sure don't get in red
;don't let them pile up


`observer`
to setup
   ca
   create-and-do 1
   [
     setxy (0 - screen-half-width) screen-half-height
     setc red pd
     seth 90
     repeat 2
     [fd screen-width - 1 rt 90 fd screen-height - 1 rt 90]
     setxy (0 - screen-half-width + 1) (0 - screen-half-height + 1) stamp red
     setxy (screen-half-width - 1) (0 - screen-half-height + 1) stamp red
     setxy (0 - screen-half-width + 1) (screen-half-height - 1) stamp red
     setxy (screen-half-width - 1) (screen-half-height - 1) stamp red
     die
     
   ]
   create-and-do number
   [
     reposition 
     choose-angel
     choose-devil
     seth random 360
   ]
end


`information`



`interface`
SLCanvas
top-left 20 234

SLSlider
top-left 195 97
width-height 96 25
name "slider2"
variable "randomness"
min-value 0
max-value 99
current-value 0
slider-number 1
show-name? false

SLSlider
top-left 51 98
width-height 76 25
name "slider1"
variable "number"
min-value 0
max-value 99
current-value 23
slider-number 0
show-name? false

SLButton
turtle-or-observer? observer
top-left 91 114
width-height 40 30
name "button1"
line-to-run "setup"
forever? false
button-number 1
show-name? false
whichip 6

SLButton
turtle-or-observer? turtle
top-left 140 115
width-height 40 30
name "button2"
line-to-run "go"
forever? true
button-number 2
show-name? false
whichip 7


`turtle shapes`
H4sIAAAAAAAAAO3c2bIkR33A4UJsAgTCeDfGlPG+CEsz0kjyeq64cXDrCwcXkuyx
RQQgLIkg7Kt+UD8Ab2FThU73TOp0V3VXZuX2fRHuX3TNqc7Kmpozi8V/ePmdj3/2
4cc/ejp+9P67P3360Tt3Lw737ubXl37146/MPz4d+Mwv/++zv/y/F49fQs8O08v/
/VLY8Ni5r4t1/jWf/dDnbT1/7eds3UeB+//6r74tAAD9eWF+vfbPESX02j+jpVp3
7+vYa/1zn7t2/VuvK/XPYa7riPXzsNe61u97/a3r3nodsdeNdR1rr2/p/AI7DsPn
BgAAAAAAAACgBb/63xEV8t8kaAdd+prc12f/++639fth//bf0v6vvd7Y+899v3rb
f8p7uUftv6/nIfUaufeXe/+l3Y/c99z+7d/+7d/+7d/+7b/1/efeb+77kXt/e+8/
935y34/c1597/9fej9j3b+v69q96sZ8ZXvrov3727oen8aHzmEDjQ7l3KORR1Uwd
jA8FgI69kP3PIqqqqrp/B+NDAQAAAAAAAKAhL2b/bxFUVVVVVVVVVVVVVVVVVVV1
e4dpINBLP3364Ucf/OQ4PvSFaU6g8aHcO0wvDz1CDzxOF7/u2vMjPuabrj/2+bde
79r7eev1Xvhx40MBoFsvzK9b/oy09c9cude/9c9qt65f+vm99dpzYn+e9ctef+tn
tLZ+7K8vbf2t97PC80fjQwEAAAAAAACgFS/Or1v+W42lbv2M1Ndn//bf8/5Tr597
/9a3vvXTfg9R1Tqbeo3Sr8/+7d/+7d/+7d/+999f7ffH/u3f/tNdn/3bv/3n2//W
z7C+9a1f9PqfHb768dMPf/zDj58e54d+tsn5oXcvH57rtT9e+/obHKaXrc/imud7
j/OfdenHLn3ell93ude/8f6ZHwqF2vp7R8G/96xi/4cHm+o8enX9/NDeG+vParHX
TX0dudfPff9zrP+sLefGuK4cP/8l7X/tfYi1zq17uKS2n3/r7/L8jeaHAgAAcM65
/1/DXv8/h9zrQ89y//rLvT70bOnXX+xfj3uvBwDQvvTzQ1W13279jNzXn2vftd6H
1Gvk3p/927/9738fcu8n133Iff327/l/6FrOybl2Cfdpj/3n/vm3/773f0nOtUu4
Pz38/Oe4D7n3k+s+5L7+c9e01p5rxVrTz3/+fdd6H1KvkXt/9m//9m//e9+H3PvJ
dR92uM7PDd+4nx/68w8++PfjENHPXRwieve9H1zskq3n3yr3EM/c629wmF4eekAv
WfOAbzn/oV9k16675ppu+cVd8vo33r9VQ0SXfm2n/rXf+/r0yRDNw3Pd+/zcDBFl
H+uGiG618S823a+/5s+It/6ZsZb1115HqnVzrP+sLefGuK4cP/8l7X/tfYi1zq17
uKS2n3/r7/L8jTGGiG79u3Ltf9e2f/vP2dzsv+/9AwDtyz3EK/f60LPcv/5yrw89
M0QUAKB2cYaI5pbiv7m4prnZv/3nbG72n3f/z3aPe13CPu3f/u3f/ve6D7n3k+s+
5L7+XPsu+T5cknPtEu7THvvP/fNv/33v/5Kca5dwf3r4+c9xH3LvJ9d9yH39565p
rT3XirVmCT/vNTwHe+y7tvtg//Zv//bf6/5T3Yfc+8l1H3a4zs8PL3347nvv/fDj
4/jQz18eH3r/n12+863n3p9z983hwa879/7+65c+51M9c97Z88+8j33+8euubHj+
0ued+/pz7r7/i3VfeOX40EuPcvg1595f+ry11lzHnuff6pp7denrl/az8HXrxoeG
vybvv0cE3ytuHvN37pm/8j8VP3cd5z7/3I9vXffc97Bb1//U11/540vrn72eSPu+
VjHrn7uOK3/c+hvXP/d79NLxK9e/9ff0a3/v33vda7//xLqupc+/9cdj7W+tT63z
yZ+xjt34+VdfT7D+dmnGh97y16KHzt9q6fNjrXOta9Zfe6+u2Uvsn++t61nf+iWs
n1qudZeu49yPx1rn1vVvvY5rPz/2c3Ht52+9no2fN8YYH3ov9t+ha7F6X+98+5M+
/G8oue/D6r+7XPvzedz3mUZ6LlL9HfBTXx/734o27v/Wv4OuPT/Zv5FF/je2ZPvP
vc+N92FJrP1/6nO3Ptc77f+43sb7cPP133p+pH0f16vt10Hk/Z9T+v5TK+452Pvf
3nL/utjpOT9n8/4Tn5+a/a9s7P1H+vPdVva/svb/cHvZ/7n9xP56+3+usV2938J6
q9zXnfs+5L7eXPvPfZ2578Py59wFzb2v665nydr11n992p6u4y7o5a8/59b7t9/z
cJfk+pc+Z/nr71atn3r/t15/LKv38f3/fb6Rv4/ntnrfK+9DK5b234ty9x1nfGju
/4Ynd1PLtY9c+10S+7+RuXa93LZef2n7Sc3+0+9/62em/DnZ4/t4ifsv7fexvaX6
fbE0sfZp//b/UEtn//afsqWzf/tP2dLZf1/7XdLrvkP23+e+Q/YfZ/+l3K9br/vW
/Zfy3MS+/qXPKe3XTezrr+XPC3vto7T7kHs/e92X3NeX6z7kvp5P+oXhaz96+h8f
v/Jv7354HCD6henHzw4Q3eruX277yPvzbj2fmx2ml2cfnEsP+TW/IG79sbVrLV1v
LT23/6X7E/HHVw0QpSy5vlfm+l4drrvX+ufW9XsV0I51A0S1rKb62jWflWP9h6S8
Z5fW3bqnpa/Z6xlSHT5x6ceedctn33L+ktbP3/n+jzEHiALAs3r/N7Re99/rv6H2
+m/IS/tudf9r993a/q/ddyv7v3XfrewfAAAAgNrEHSCqqqr6bJ8V47Ny7yfn/mu6
Dw/pYf+XpFgr937X7Dv1tZa+772usdR957i2kva99/5j34e9r7uU+5P7+nLtP/d1
qaqqarrees4le1xzjvWv1cr6W1nf+tavd/1bryPWuqWsv/Y6Uq2baP0vDi9/+MP/
fP/5CaJfnL4g2QTRc7b+L2X8L26SOUwvDz1Bl57SS0/emqf7mvMu/epYc17pvbTH
pXsQ6cdNEG1I7u+Rub9X5/5fafpfiwL1MUG09K792mflXj/GdVx7ziUp112z/qXr
iPlztfY6c66vZXXpx551y2ffcv6S1s/f+f6PJogCUIre/w3N/u8ebC96/zfl3icx
9j6RsvfJnCaUAgAAABCXCaKqqhqnWz/jISXsK/W+7f/8/ku+D7E/c40W933N/nPe
h9Rr3KKFfW/Zf8r7sNe+Y+z/lvuw9/72vI8973/tfch9fbnvQ+7rUlVVzdFbz7lk
j2vOsf61Wll/K+tb3/r1rn/rdcRat5T1115HqnUTrf/i8OWPfv7uT47DQ+f/KODm
4aF337n2jOfPO/bJuq9bOn728xd663mxeuv1Lwnv67n7/IzD9HLrQxrr4V76uqXj
W7+J5HLr9V/787NwXhfDQ6/9tZRq3aXvgXuvn/o6Yt/3a783bl0/9vf2VOte+3tc
qnVr/b24lj8DpFo/9fXcKte6n7qOhe+Tyb+PLny/3v79/IX5NfVfcHI3lGvdva9j
rVru+7XXv3X9a8Vaf6tY9yu1XOvmXr+U+77Xc5D6+1fsdc9dx60/Hvv7XuTvc6Ph
odRur78TlGbvvxOV4uq/G+70b197sf8r++Rya2P/l9u60vef+t/sSt1/Kf9Wm1ru
f7O2/9vOu9Ve+127n73/fwK59x/uI9X3la2fX0uX5L6+Ur+vtNJQ7uux/316Tu7r
sv+0XSv3debefyj3de+1zyW595Vr3+f0tt9Q7/sPbf33xOr/PdL+Lzb1+bnVv3/D
Q7X+Lsl9fbn23er+t8p9/fafd/+13w/7b2s/re3/Wq3sP5bS978X+y9j/7ltvZ7a
939v6/XUtt9U7L/Pfd/rdd/3et2/577P/ff++17tf+5ZK/afe2u5D6n2Xer92Hu/
9n/d/dj7/Ny1/8tSn5+7le//S8NLT3/yP//946fH8aFfmuYEHseH3v3zx/Nl3H3v
/VUN3Z+/ZO35W9cPv+7W82Ptf/G+rrx/Zz/3/ufvxg6fjA+91rnHfO0vh6XjW9df
+rzU61/7bWDp/K2fu2AeH/qpZ+R7P4jaJaWtv1Vr6+e+/6Wtf+31tbZ+7vtf2q//
zd+nKl9/8/UWtn5vvR8fmtpOf6aJtn7sv0LWvv5Wra1/7fW1tv61al//2vNTX29p
68e+3tzrd2acxocu/pkh8t/N9/67/hL7t/+LLWSfufafm/3b/6Vu/nz7v9it19f6
9z/7t/+c3Sr1/reeb//2v+XzF9e3/4tdPN/3v6zdyv7t/1JTy33/7N/+LzW13vef
mv3b/8Xav6p22vvxobXr/b8NsX/739LUn1/69dm//dv/7Z+fm/3b/5Zu/fzcSt9/
6vtn//a/pamvv/f9p2b/9r+lWz8/t9z7T71+bvZv/ylbutT7L/3+5r5++7f/nPsH
mvXl4cvvP/rg0XF46JefGx56/1V3r/z0uYZ6+fElS18XrrO47r9+98Gu/bqt5w+f
DA8995vJ0m82rf742t90b/1Nee3Xb/3NfuX58/DQ0LXPsvOd7/x2z9+qtvWXzr+2
W6Vef+ufMbZ+nvXzrn8/PHTrn2Wc73znt3v+0tfH/rzc6197P5fEvv7Y6+f+POtn
XX+chocuaf3Pwta3vvWtb33rW9/61re+9a1vfetbP/3nb2X/9n+ppX/+Vrmvb+v3
p9zf37ayf/vP2c3Xn/m/Xch9ffZv/ym7Ve7rt3/739Ktcl9/6/u/Hx6a+79Fsb71
rW9961vf+ta3vvWtb33rW9/65a+/9fNLvz77t/+e9791/dRKv/+p2b/9b2nv15ea
/dv/ltbO/u1/S2tX+P6/Mrz03s/ee+9HT4/jQ7/y4PjQe3ffvNxzls479zmf+vHv
/+L5Xvm5m8/fufduPS90w3mH6eXaxzLW49zKt4Gttt6/jT9/X39ofGgo1rN+q73X
3+vXfinrX/29de/vtdbPu7423dDe65W2fuzr2Sr9+g+PD439V5bcf2Uq7K9oxa0P
9Cv395/S1s/9+8/O649rxocuKe3Psnuz/7zNrfX9595f7vuT+/rtf1u3yn39qfe/
eZ2lf6ts/d8y7d/+7d/+7d/+e9y/qqqqVtclua8v9f6W5L5++9/WrXJff+79L2l9
f0vsP29zq3//68aH5v5vN5ZsvX77t/8tza31/W1l//a/pbVrfX8AAADAstb/fcC/
/9j/ltZu6/5Lvz+p92f/9n+puW28/peGF+e5oa+89mh+N1wYHUp3DtNL7l9iKfrQ
L+M9z6+oq0aHAgAtWjc6VFXLanist/VVNUrHGKNDAQAAAAAAAIASxBkdqqqqqqqq
qqoPNzyW+3rsX1VVVVVVVbXpfvU4OvTx/G4wOpSTw/RSyKMateGxvc+vqEaHAkC3
jA5VrbHhsd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+qqqqqqqqq
Tfdrx9Ghr8/vBqNDOTlML4U8qlEbHtv7/IpqdCgAdMvoUNUaGx7rbX1VjdLR6FAA
AAAAAAAAaIXRoaqqqqqqqqopGx7LfT32r6qqqqqqqtp0Xz6ODn1jfjcYHcrJYXop
5FGN2vDY3udXVKNDAaBbRoeq1tjwWG/rq2qUjkaHAgAAAAAAAEArjA5VVVVVVVVV
TdnwWO7rsX9VVVVVVVXVpvv14+jQJ/O7wehQTg7TSyGPatSGx/Y+v6IaHQoA3TI6
VLXGhsd6W19Vo3Q0OhQAAAAAAAAAWmF0qKqqqqqqqmrKhsdyX4/9q6qqqqqqqjbd
XzuODn1zfjcYHcrJYXop5FGN2vDY3udXVKNDAaBbRoeq1tjwWG/rq2qUjkaHAgAA
AAAAAEArjA5VVVVVVVVVTdnwWO7rsX9VVVVVVVXVpvuN4+jQt+Z3g9GhnByml0Ie
1agNj+19fkU1OhQAumV0qGqNDY/1tr6qRulodCgAAAAAAAAAtMLoUFVVVVVVVdWU
DY/lvh77V1VVVVVVVW26v34cHfr2/G4wOpSTw/RSyKMateGxvc+vqEaHAkC3jA5V
rbHhsd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+qqqqqqqqqTfc3
7keHPnp1fjcYHcrJYXop5FGN2vDY3udXVKNDAaBbRoeq1tjwWG/rq2qUjkaHAgAA
AAAAAEArjA5VVVVVVVVVTdnwWO7rsX9VVVVVVVXVpvubx9Ghr83vBqNDOTlML4U8
qlEbHtv7/IpqdCgAdMvoUNUaGx7rbX1VjdLR6FAAAAAAAAAAaIXRoaqqqqqqqqop
Gx7LfT32r6qqqqqqqtp0f+s4OvTR/G4wOpSTw/RSyKMateGxvc+vqEaHAkC3jA5V
rbHhsd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+qqqqqqqqqTfe3
j6NDH8/vBqNDOTlML4U8qlEbHtv7/IpqdCgAdMvoUNUaGx7rbX1VjdLR6FAAAAAA
AAAAaIXRoaqqqqqqqqopGx7LfT32r6qqqqqqqtp0f+c4OvT1+d1gdCgnh+mlkEc1
asNje59fUY0OBYBuGR2qWmPDY72tr6pROhodCgAAAAAAAACtMDpUVVVVVVVVNWXD
Y7mvx/5VVVVVVVVVm+7vHkeHvjG/G4wO5eQwvRTyqEZteGzv8yuq0aEA0C2jQ1Vr
bHist/VVNUpHo0MBAAAAAAAAoBVGh6qqqqqqqqqmbHgs9/XYv6qqqqqqqmrT/b3j
6NAn87vB6FBODtNLIY9q1IbH9j6/ohodCgDdMjpUtcaGx3pbX1WjdDQ6FAAAAAAA
AABaYXSoqqqqqqqqasqGx3Jfj/2rqqqqqqqqNt1vHkeHvjm/G4wO5eQwvRTyqEZt
eGzv8yuq0aEA0C2jQ1VrbHist/VVNUpHo0MBAAAAAAAAoBVGh6qqqqqqqqqmbHgs
9/XYv6qqqqqqqmrT/f3j6NC35neD0aGcHKaXQh7VqA2P7X1+RTU6FAC6ZXSoao0N
j/W2vqpG6Wh0KAAAAAAAAAC0wuhQVVVVVVVV1ZQNj+W+HvtXVVVVVVVVbbrfOo4O
fXt+NxgdyslheinkUY3a8Nje51dUo0MBoFtGh6rW2PBYb+urapSORocCAAAAAAAA
QCuMDlVVVVVVVVVN2fBY7uuxf1VVVVVVVdWm+wf3o0Mfvzq/G4wO5eQwvRTyqEZt
eGzv8yuq0aEA0C2jQ1VrbHist/VVNUpHo0MBAAAAAAAAoBVGh6qqqqqqqqqmbHgs
9/XYv6qqqqqqqmrT/fZxdOhr87vB6FBODtNLIY9q1IbH9j6/ohodCgDdMjpUtcaG
x3pbX1WjdDQ6FAAAAAAAAABaYXSoqqqqqqqqasqGx3Jfj/2rqqqqqqqqNt3xODr0
0fxuMDqUk8P0UsijGrXhsb3Pr6hGhwJAt4wOVa2x4bHe1lfVKB2NDgUAAAAAAACA
Vhgdqqqqqqqqqpqy4bHc12P/qqqqqqqqqk33D4+jQx/P7wajQzk5TC+FPKpRGx7b
+/yKanQoAHTL6FDVGhse6219VY3S0ehQAAAAAAAAAGiF0aGqqqqqqqqqKRsey309
9q+qqqqqqqradL9zHB36+vxuMDqUk8P0UsijGrXhsb3Pr6hGhwJAt4wOVa2x4bHe
1lfVKB2NDgUAAAAAAACAVhgdqqqqqqqqqpqy4bHc12P/qqqqqqqqqk33j46jQ9+Y
3w1Gh3JymF4KeVSjNjy29/kV1ehQAOiW0aGqNTY81tv6qhqlo9GhAAAAAAAAANAK
o0NVVVVVVVVVUzY8lvt67F9VVVVVVVW16f7xcXTok/ndYHQoJ4fppZBHNWrDY3uf
X1GNDgWAbhkdqlpjw2O9ra+qUToaHQoAAAAAAAAArTA6VFVVVVVVVTVlw2O5r8f+
VVVVVVVVVZvunxxHh745vxuMDuXkML0U8qhGbXhs7/MrqtGhANAto0NVa2x4rLf1
VTVKR6NDAQAAAAAAAKAVRoeqqqqqqqqqpmx4LPf12L+qqqqqqqpq0/3T4+jQt+Z3
g9GhnByml0Ie1agNj+19fkU1OhQAumV0qGqNDY/1tr6qRulodCgAAAAAAAAAtMLo
UFVVVVVVVdWUDY/lvh77V1VVVVVVVW26f3YcHfr2/G4wOpSTw/RSyKMateGxvc+v
qEaHAkC3jA5VrbHhsd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+q
qqqqqqqqTffP70eHvv7q/G4wOpSTw/RSyKMateGxvc+vqEaHAkC3jA5VrbHhsd7W
V9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+qqqqqqqqqTfcvjqNDX5vf
DUaHcnKYXgp5VKM2PLb3+RXV6FAA6JbRoao1NjzW2/qqGqWj0aEAAAAAAAAA0Aqj
Q1VVVVVVVVVTNjyW+3rsX1VVVVVVVbXp/uVxdOij+d1gdCgnh+mlkEc1asNje59f
UY0OBYBuGR2qWmPDY72tr6pROhodCgAAAAAAAACtMDpUVVVVVVVVNWXDY7mvx/5V
VVVVVVVVm+5fHUeHPp7fDUaHcnKYXgp5VKM2PLb3+RXV6FAA6JbRoao1NjzW2/qq
GqWj0aEAAAAAAAAA0AqjQ1VVVVVVVVVTNjyW+3rsX1VVVVVVVbXp/vVxdOjr87vB
6FBODtNLIY9q1IbH9j6/ohodCgDdMjpUtcaGx3pbX1WjdDQ6FAAAAAAAAABaYXSo
qqqqqqqqasqGx3Jfj/2rqqqqqqqqNt1XjqND35jfDUaHcnKYXgp5VKM2PLb3+RXV
6FAA6JbRoao1NjzW2/qqGqWj0aEAAAAAAAAA0AqjQ1VVVVVVVVVTNjyW+3rsX1VV
VVVVVbXpfvc4OvTJ/G4wOpSTw/RSyKMateGxvc+vqEaHAkC3jA5VrbHhsd7WV9Uo
HY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+qqqqqqqqqTfdvjqND35zfDUaH
cnKYXgp5VKM2PLb3+RXV6FAA6JbRoao1NjzW2/qqGqWj0aEAAAAAAAAA0AqjQ1VV
VVVVVVVTNjyW+3rsX1VVVVVVVbXpvnocHfrW/G4wOpSTw/RSyKMateGxvc+vqEaH
AkC3jA5VrbHhsd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+qqqqq
qqqqTfe14+jQt+d3g9GhnByml0Ie1agNj+19fkU1OhQAumV0qGqNDY/1tr6qRulo
dCgAAAAAAAAAtMLoUFVVVVVVVdWUDY/lvh77V1VVVVVVVW26j+5Hh77x6vxuMDqU
k8P0UsijGrXhsb3Pr6hGhwJAt4wOVa2x4bHe1lfVKB2NDgUAAAAAAACAVhgdqqqq
qqqqqpqy4bHc12P/qqqqqqqqqk338XF06Gvzu8HoUE4O00shj2rUhsf2Pr+iGh0K
AN0yOlS1xobHeltfVaN0NDoUAAAAAAAAAFphdKiqqqqqqqpqyobHcl+P/auqqqqq
qqo23dePo0Mfze8Go0M5OUwvhTyqURse2/v8imp0KAB0y+hQ1RobHuttfVWN0tHo
UAAAAAAAAABohdGhqqqqqqqqqikbHst9Pfavqqqqqqqq2nTfOI4OfTy/G4wO5eQw
vRTyqEZteGzv8yuq0aEA0C2jQ1VrbHist/VVNUpHo0MBAAAAAAAAoBVGh6qqqqqq
qqqmbHgs9/XYv6qqqqqqqmrTfXIcHfr6/G4wOpSTw/RSyKMateGxvc+vqEaHAkC3
jA5VrbHhsd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+qqqqqqqqq
TffN4+jQN+Z3g9GhnByml0Ie1agNj+19fkU1OhQAumV0qGqNDY/1tr6qRulodCgA
AAAAAAAAtMLoUFVVVVVVVdWUDY/lvh77V1VVVVVVVW26bx1Hhz6Z3w1Gh3JymF4K
eVSjNjy29/kV1ehQAOiW0aGqNTY81tv6qhqlo9GhAAAAAAAAANAKo0NVVVVVVVVV
UzY8lvt67F9VVVVVVVW16b59HB365vxuMDqUk8P0UsijGrXhsb3Pr6hGhwJAt4wO
Va2x4bHe1lfVKB2NDgUAAAAAAACAVhgdqqqqqqqqqpqy4bHc12P/qqqqqqqqqk33
b4+jQ9+a3w1Gh3JymF4KeVSjNjy29/kV1ehQAOiW0aGqNTY81tv6qhqlo9GhAAAA
AAAAANAKo0NVVVVVVVVVUzY8lvt67F9VVVVVVVW16f7dcXTo2/O7wehQTg7TSyGP
atSGx/Y+v6IaHQoA3TI6VLXGhsd6W19Vo3Q0OhQAAAAAAAAAWmF0qKqqqqqqqmrK
hsdyX4/9q6qqqqqqqjbdv78fHfrk1fndYHQoJ4fppZBHNWrDY3ufX1GNDgWAbhkd
qlpjw2O9ra+qUToaHQoAAAAAAAAArTA6VFVVVVVVVTVlw2O5r8f+VVVVVVVVVZvu
PxxHh742vxuMDuXkML0U8qhGbXhs7/MrqtGhANAto0NVa2x4rLf1VTVKR6NDAQAA
AAAAAKAVRoeqqqqqqqqqpmx4LPf12L+qqqqqqqpq0/3H4+jQR/O7wehQTg7TSyGP
atSGx/Y+v6IaHQoA3TI6VLXGhsd6W19Vo3Q0OhQAAAAAAAAAWmF0qKqqqqqqqmrK
hsdyX4/9q6qqqqqqqjbdfzqODn08vxuMDuXkML0U8qhGbXhs7/MrqtGhANAto0NV
a2x4rLf1VTVKR6NDAQAAAAAAAKAVRoeqqqqqqqqqpmx4LPf12L+qqqqqqqpqu/1/
XbDPdBUPFQAAFQ8V

`template`
null

`settings`
patch-size 8
num-shapes 64
screen-half-width 25
screen-half-height 25
interface-window-xcor 93
interface-window-ycor 60
interface-window-size 735 464
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 54
control-center-ycor 39
control-center-width 700
control-center-height 679
turtle-command-center-height 162
observer-command-center-height 150

`string table`
H4sIAAAAAAAAAGNgYGAAABzfRCEEAAAAAAAABA==

`symbol table`
H4sIAAAAAAAAAGNgYGAAABzfRCEEAAAAAAAABA==

`double table`
H4sIAAAAAAAAAC3R/1PTdQDH8Y+b0zWBjY1ktSXftrWxsY8bwibJ7S0Rpy0Qh9EV
JwikTQ80sEKouCkOs4BK1KPLZFF3HEhCOi6+uhfdSLzzuA9nHZjITfJkMIhlHUcS
ri73/OXxBzwpirKaFjI2SM+c9pvuVh+xdx62IeHwl40xszroGzmDf77cATrtn3Rf
OINEbuADHvcAETYPVclShCRhV1HT0T0CyGddL7p9dxFz/6h34VgE6K0Oapz7AIYv
fKTrgJAI/zBfulmVQZSf8PMi7POQYWmnq7AEcfY2XUgeA7po/zOXVBSSDEMtVIAi
fM1HL73azZB1A5pii5uB/vsCsb0tm0iaL5yYemyFoWL4Yl0Wmwi21+5OukARVlmx
ujl2kvBDPXmdYQzUZFPnwSvbsFneftlrCTOND7lTdXMe8OO150sqAG1W7T1lphjq
x5qxnO2NUNSsvFBPK4nklO9cstBGQjKT0qZXHaA1+wMGfgvZZI1+2PosQwS5e1lZ
U0ayZoMqQRDFINmwsZR9rQlbRAHj4qMqGM0f/h1PPzA9eve26mszhZhjq7OV9WlQ
Niw6RwemETfoe725XgpBQ6+2+87vUF/T/jDy6QS0OsmdqNs/I3lsd3Yee8m0ZImo
qztDuX75qqHFcc8GRfi3D1cyM6EoaooUDrghP1l9/fhwCXiMnpTl9CB2j+jiOzVd
oAXUVadoDbas7x1+7c1yhG/97GlO/xjZ3N7fm7pwwtUXqE8J6aSwbezGVPuw0zWz
bl46V+nBc+nRtis390HblX16xJ+DxDcShKWMF+z8mWnvyDII73555KAFehZ/Zdnh
h/F9tNqv+sE2/6gKNTshup4vmynzQFGqlSsKdkF2aHzUeVZJRJ7LFn3ie0RafqQv
o7AJ8aKR0QmlHLoCWc9fko8JJ6VM/Qq7hIS5Z3a8JekCWxWYtP7mdc2ndPza1g/T
oljsmJ1IB3dH3N6NNQX/fTd2C3ifE25N6ERH7DIiOd+ElZ7tgSpEHc3SrYXuUGH2
3GouDN+dMt7q/gnK41lv91WcxPO+XPqp5EnCqvVViotthBe1rJG32kCnHuRY86uJ
lvo/k/+JRBA0Iqg4qDQoN+gTqH8B0leJoEQDAAAAAANE

`list table`
H4sIAAAAAAAAAG2QSxLCMAxDZYfSLRtWnILrdAW0FO5/ApSggKbTzmjkz4sTF8AI
4BJAUEjgRp+oVG0yR+eqi93mnfG+9eJNK+Ka+A26+9551ds5+rWzzB/UHHH+5YxT
8Wx7LNRTXJ2ziItW/945Ml7pB+rI+BWV++8E9VJ8kQ87O8PfvtejnWxe2Mywmuep
NxXFa/0pH9LDtjm0AQAAAAABtA==

`bytecodes`
H4sIAAAAAAAAAJ1VWW/TQBAeO3Ec53QOJ04a2rSEmwLPPCH4I20Tq41AcUWSSjzy
85DgPzE7O7O7dkoesGTvzs7xzbmG5tXNj122zFfZ9uoT/FbPHwCoQ7DNdvt73P4E
81zg6/HeV59rpj3wZviN1YoHSY3PUSiJ8U2YruA+5X2VbfRQx+ezgGxA0mIa7SQT
5FeYDkv8OvGVWehGfBYZXzTdwL343ST/LK+lecbfNsCwQvqa7jiy3ZJuXNLtka7e
90s+DEiWckP0kOMQ3aSEO7K5JHpckk81VqpTCqmcY64WYPKK6WIBfkJwCii0b2li
TRGrpusktrtYGJWt5V2eb7PL681t9o2iKGoCoZM2dwX0JQIfvD5WIlGRjxnUpwLq
6vmM4hmUVfawViiz/0fhnlNn0nPEj1U+z4544UPje3afb9e7db7RuRQXsFcVtupJ
nSfcDx3fjkZXAf82x4NfhzEZHz2OT+xgPy/qdp76ih+Z2Cj2ipRxYGdL5knFOxKc
mpOr0MxQUSayNrvSzw3Hv+YR/1ol/9r/8K9jZ6qAHTv+9ewsFWQGj/g3dPxLuMZi
Z+TYHDtyaUluouVCnbdifaZOv51w/COOSfI44/UJeOOqnR+ZReKdOvhnjC8Yc4d3
bngFWybeC+69KdNPmZ4wveD1Gfam5Pq5UzPx+QWvLxHHc3DkPn5Fd613Ij6+RhsJ
2xjx2Rte3zpYlyiXspzE9I7X9xaL6A/6PhfcwrxUobm8y5Zfb/L9ZrVFzpdSYUqD
I0mL+85l6uvLNLY/ocMLQXSkGQKjQxcFD4/VCx17dec8MjpefMoJGD4+RLEUs+U0
aNuR6TgyXS1zcKEE0Pm83+3yzcf5XH7YATdx4QmU/00jS7dQxA6KQtWKE0hNFP8C
scAaWyYIAAAAAAgm

`observer world`
H4sIAAAAAAAAAGMQSMhPKk4tKkstUiguSSxJTXBggAMrBq6CnPyS8syU9NQSIJ+F
gS0nNS+9JAPI5mBgB8kVpOaBlXKDNSPJQgAjCAMA+OWZc2QAAAAAAABk

`patch world`
H4sIAAAAAAAAAIXdW4ujiXqe4UowSeEQ0IEOFNCBEEIIIYT2+93sZ/5Ajm1WFnbA
2It4IMmZfnJ+gpc37xd/rXp0NTTdXVc/b/V0Nbpnqqs0H//1r/7017//4W8H//j7
X//+x796fDRf/vvHX/yfP/zD//qX7//ln/7uH37/3//zf/zNH3//84/6H//xT3/4
87edj//0d3/8+7/5/W///P3Bx3/+55/zpz/+/Z9/0Pv4i//7r9PPj//yL4f/3c/7
+Phv//b14/7//vVV1bePefPa/8M/f61fTfRPeAfehffgffgAPoSP4GP4BD6Fz+Bz
+AK+hK/ga/gGvoXv4Hv4AX6En+Bn+AV+hd/gd/hD/nzv32H/HfbfY/899j9g/wP2
P2L/I/Y/Yf8T9j9j/zP2v2D/C/a/Yv8r9r9h/9v7ffPyj7D/gH+2/d99afUlehfe
g/fhA/gQPoKP4RP4FD6Dz+EL+BK+gq/hG/gWvoPv4Qf4EX6Cn+EX+BV+g9/hD/nz
vX+H/XfYf4/999j/gP0P2P+I/Y/Y/4T9T9j/jP3P2P+C/S/Y/4r9r9j/1t6nviRv
+vL5tTe7z/D6P+EdeBfeg/fhA/gQPoKP4RP4FD6Dz+EL+BK+gq/hG/gWvoPv4Qf4
EX6Cn+EX+BV+g9/hD/nzvVdfomNffYmOffUlOvbVl+jYV1+iY199iY599SU69tWX
6NhXX6K397Evna/98dH2l/uf8A68C+/B+/ABfAgfwcfwCXwKn8Hn8AV8CV/B1/AN
fAvfwffwA/wIP8HP8Av8Cr/B7/CH/Pneqy/Rsa++RMe++hId++pLdOyrL9Gxr75E
x776Eh376kt07Ksv0dv72Jfu1/74aPvL/U94B96F9+B9+AA+hI/gY/gEPoXP4HP4
Ar6Er+Br+Aa+he/ge/gBfoSf4Gf4BX6F3+B3+EP+fO/Vl+jYV1+iY199iY599SU6
9tWX6NhXX6JjX32Jjn31JTr21Zfo7X3sS+9rf3y0/eX+J7wD78J78D58AB/CR/Ax
fAKfwmfwOXwBX8JX8DV8A9/Cd/A9/AA/wk/wM/wCv8Jv8Dv8IX++9+pLdOyrL9Gx
r75Ex776Eh376kt07Ksv0bGvvkTHvvoSHfvqS/T2Pval/7U/Ptr+cv8T3oF34T14
Hz6AD+Ej+Bg+gU/hM/gcvoAv4Sv4Gr6Bb+E7+B5+gB/hJ/gZfoFf4Tf4Hf6QP997
9SU69tWX6NhXX6JjX32Jjn31JTr21Zfo2FdfomNffYmOffUlensf+zL42h8fbX+5
/wnvwLvwHrwPH8CH8BF8DJ/Ap/AZfA5fwJfwFXwN38C38B18Dz/Aj/AT/Ay/wK/w
G/wOf8if7736Eh376kt07Ksv0bGvvkTHvvoSHfvqS3Tsqy/Rsa++RMe++hK9vY99
GX7tj4+2v9z/hHfgXXgP3ocP4EP4CD6GT+BT+Aw+hy/gS/gKvoZv4Fv4Dr6HH+BH
+Al+hl/gV/gNfoc/5M/3Xn2Jjn31JTr21Zfo2FdfomNffYmOffUlOvbVl+jYV1+i
Y199id7ex76MvvbHR9tf7n/CO/AuvAfvwwfwIXwEH8Mn8Cl8Bp/DF/AlfAVfwzfw
LXwH38MP8CP8BD/DL/Ar/Aa/wx/y53uvvkTHvvoSHfvqS3Tsqy/Rsa++RMe++hId
++pLdOyrL9Gxr75Eb+9jX8Zf++Oj7S/3P+EdeBfeg/fhA/gQPoKP4RP4FD6Dz+EL
+BK+gq/hG/gWvoPv4Qf4EX6Cn+EX+BV+g9/hD/nzvVdfomNffYmOffUlOvbVl+jY
V1+iY199iY599SU69tWX6NhXX6K397Evk6/98dH2l/uf8A68C+/B+/ABfAgfwcfw
CXwKn8Hn8AV8CV/B1/ANfAvfwffwA/wIP8HP8Av8Cr/B7/CH/Pneqy/Rsa++RMe+
+hId++pLdOyrL9Gxr75Ex776Eh376kt07Ksv0dv72Jfp1/74aPvL/U94B96F9+B9
+AA+hI/gY/gEPoXP4HP4Ar6Er+Br+Aa+he/ge/gBfoSf4Gf4BX6F3+B3+EP+fO/V
l+jYV1+iY199iY599SU69tWX6NhXX6JjX32Jjn31JTr21Zfo7X3sy+xrf3y0/eX+
J7wD78J78D58AB/CR/AxfAKfwmfwOXwBX8JX8DV8A9/Cd/A9/AA/wk/wM/wCv8Jv
8Dv8IX++9+pLdOyrL9Gxr75Ex776Eh376kt07Ksv0bGvvkTHvvoSHfvqS/T2PvZl
/rU/Pl5e3vbX551p++vzBrT99fM+2/76eTttf/2467YP4K8f99D217+3avvr+x3b
/vrfjW1/7X7bX99ubX99u7V9AV/CV/A1fAPfwnfwPfwAP8JP8DP8Ar/Cb/A7/CF/
vvfqS3Tsqy/Rsa++RMe++hId++pLdOyrL9Gxr75Ex776Eh376kv09j725fVxqN2X
Rbj/Ce/Au/AevA8fwIfwEXwMn8Cn8Bl8Dl/Al/AVfA3fwLfwHXwPP8CP8BP8DL/A
r/Ab/A5/yJ/vvfoSHfvqS3Tsqy/Rsa++RMe++hId++pLdOyrL9Gxr75Ex776Er29
j315/ffYdl+W4f4nvAPvwnvwPnwAH8JH8DF8Ap/CZ/A5fAFfwlfwNXwD38J38D38
AD/CT/Az/AK/wm/wO/whf7736kt07Ksv0bGvvkTHvvoSHfvqS3Tsqy/Rsa++RMe+
+hId++pL9PY+9uX1/SDtvqzC/U94B96F9+B9+AA+hI/gY/gEPoXP4HP4Ar6Er+Br
+Aa+he/ge/gBfoSf4Gf4BX6F3+B3+EP+fO/Vl+jYV1+iY199iY599SU69tWX6NhX
X6JjX32Jjn31JTr21Zfo7X3sy+v70dt9WYf7n/AOvAvvwfvwAXwIH8HH8Al8Cp/B
5/AFfAlfwdfwDXwL38H38AP8CD/Bz/AL/Aq/we/wh/z53qsv0bGvvkTHvvoSHfvq
S3Tsqy/Rsa++RMe++hId++pLdOyrL9Hb+9iX17+HbfdlE+5/wjvwLrwH78MH8CF8
BB/DJ/ApfAafwxfwJXwFX8M38C18B9/DD/Aj/AQ/wy/wK/wGv8Mf8ud7r75Ex776
Eh376kt07Ksv0bGvvkTHvvoSHfvqS3Tsqy/Rsa++RG/vY19eP46n3ZdtuP8J78C7
8B68Dx/Ah/ARfAyfwKfwGXwOX8CX8BV8Dd/At/AdfA8/wI/wE/wMv8Cv8Bv8Dn/I
n++9+hId++pLdOyrL9Gxr75Ex776Eh376kt07Ksv0bGvvkTHvvoSvb2PfXn9ONB2
X3bh/ie8A+/Ce/A+fAAfwkfwMXwCn8Jn8Dl8AV/CV/A1fAPfwnfwPfwAP8JP8DP8
Ar/Cb/A7/CF/vvfqS3Tsqy/Rsa++RMe++hId++pLdOyrL9Gxr75Ex776Eh376kv0
9j725fXzCNp92Yf7n/AOvAvvwfvwAXwIH8HH8Al8Cp/B5/AFfAlfwdfwDXwL38H3
8AP8CD/Bz/AL/Aq/we/wh/z53qsv0bGvvkTHvvoSHfvqS3Tsqy/Rsa++RMe++hId
++pLdOyrL9Hb+9iX189Da/flEO5/wjvwLrwH78MH8CF8BB/DJ/ApfAafwxfwJXwF
X8M38C18B9/DD/Aj/AQ/wy/wK/wGv8Mf8ud7r75Ex776Eh376kt07Ksv0bGvvkTH
vvoSHfvqS3Tsqy/Rsa++RG/vY19eP4+53ZdjuP8J78C78B68Dx/Ah/ARfAyfwKfw
GXwOX8CX8BV8Dd/At/AdfA8/wI/wE/wMv8Cv8Bv8Dn/In++9+hId++pLdOyrL9Gx
r75Ex776Eh376kt07Ksv0bGvvkTHvvoSvb2PfXl9Hox2X07h/ie8A+/Ce/A+fAAf
wkfwMXwCn8Jn8Dl8AV/CV/A1fAPfwnfwPfwAP8JP8DP8Ar/Cb/A7/CF/vvfqS3Ts
qy/Rsa++RMe++hId++pLdOyrL9Gxr75Ex776Eh376kv09j725fV5lNp9OYf7n/AO
vAvvwfvwAXwIH8HH8Al8Cp/B5/AFfAlfwdfwDXwL38H38AP8CD/Bz/AL/Aq/we/w
h/z53qsv0bGvvkTHvvoSHfvqS3Tsqy/Rsa++RMe++hId++pLdOyrL9Hb+9iX1+fh
a/flEu5/wjvwLrwH78MH8CF8BB/DJ/ApfAafwxfwJXwFX8M38C18B9/DD/Aj/AQ/
wy/wK/wGv8Mf8ud7r75Ex776Eh376kt07Ksv0bGvvkTHvvoSHfvqS3Tsqy/Rsa++
RG/vY19en8e13ZdruP8J78C78B68Dx/Ah/ARfAyfwKfwGXwOX8CX8BV8Dd/At/Ad
fA8/wI/wE/wMv8Cv8Bv8Dn/In++9+hId++pLdOyrL9Gxr75Ex776Eh376kt07Ksv
0bGvvkTHvvoSvb2PfXl9HvB2X27h/ie8A+/Ce/A+fAAfwkfwMXwCn8Jn8Dl8AV/C
V/A1fAPfwnfwPfwAP8JP8DP8Ar/Cb/A7/CF/vvfqS3Tsqy/Rsa++RMe++hId++pL
dOyrL9Gxr75Ex776Eh376kv09j725fX/I9Huyz3c/4R34F14D96HD+BD+Ag+hk/g
U/gMPocv4Ev4Cr6Gb+Bb+A6+hx/gR/gJfoZf4Ff4DX6HP+TP9159iY599SU69tWX
6NhXX6JjX32Jjn31JTr21Zfo2FdfomNffYne3se+PL72f3tx4y/3P+EdeBfeg/fh
A/gQPoKP4RP4FD6Dz+EL+BK+gq/hG/gWvoPv4Qf4EX6Cn+EX+BV+g9/hD/nzvVdf
omNffYmOffUlOvbVl+jYV1+iY199iY599SU69tWX6NhXX6K397kvzy+9zpa/3P+E
d+BdeA/ehw/gQ/gIPoZP4FP4DD6HL+BL+Aq+hm/gW/gOvocf4Ef4CX6GX+BX+A1+
hz/kz/fe9CU59k1fkmPf9CU59k1fkmPf9CU59k1fkmPf9CU59k1fkmPf9CV5ex/7
Un+OUl+++/b8N31J3oF34T14Hz6AD+Ej+Bg+gU/hM/gcvoAv4Sv4Gr6Bb+E7+B5+
gB/hJ/gZfoFf4Tf4Hf6QP997PS5Ex776Eh376kt07Ksv0bGvvkTHvvoSHfvqS3Ts
qy/Rsa++RG/vc1+eX/rjo+0v9z/hHXgX3oP34QP4ED6Cj+ET+BQ+g8/hC/gSvoKv
4Rv4Fr6D7+EH+BF+gp/hF/gVfoPf4Q/58703fUmOfdOX5Ng3fUmOfdOX5Ng3fUmO
fdOX5Ng3fUmOfdOX5Ng3fUne3se+1J+D1Jfvvz3/TV+Sd+BdeA/ehw/gQ/gIPoZP
4FP4DD6HL+BL+Aq+hm/gW/gOvocf4Ef4CX6GX+BX+A1+hz/kz/defYmOfT2uRMe+
+hId++pLdOyrL9Gxr75Ex776Eh376kt07Ksv0dv73Jfnl/74aPvL/U94B96F9+B9
+AA+hI/gY/gEPoXP4HP4Ar6Er+Br+Aa+he/ge/gBfoSf4Gf4BX6F3+B3+EP+fO9N
X5Jj3/QlOfZNX5Jj3/QlOfZNX5Jj3/QlOfZNX5Jj3/QlOfZNX5K397Ev9XZMffnh
2/Pf9CV5B96F9+B9+AA+hI/gY/gEPoXP4HP4Ar6Er+Br+Aa+he/ge/gBfoSf4Gf4
BX6F3+B3+EP+fO/Vl+jYV1+iY1+PS9Gxr75Ex776Eh376kt07Ksv0bGvvkTHvvoS
vb3PfXl+6Y+Ptr/c/4R34F14D96HD+BD+Ag+hk/gU/gMPocv4Ev4Cr6Gb+Bb+A6+
hx/gR/gJfoZf4Ff4DX6HP+TP9970JTn2TV+SY9/0JTn2TV+SY9/0JTn2TV+SY9/0
JTn2TV+SY9/0JXl7H/tSb4fUlx+/Pf9NX5J34F14D96HD+BD+Ag+hk/gU/gMPocv
4Ev4Cr6Gb+Bb+A6+hx/gR/gJfoZf4Ff4DX6HP+TP9159iY599SU69tWX6NjX41p0
7Ksv0bGvvkTHvvoSHfvqS3Tsqy/R2/vcl+eX/vho+8v9T3gH3oX34H34AD6Ej+Bj
+AQ+hc/gc/gCvoSv4Gv4Br6F7+B7+AF+hJ/gZ/gFfoXf4Hf4Q/58701fkmPf9CU5
9k1fkmPf9CU59k1fkmPf9CU59k1fkmPf9CU59k1fkrf3sS/1+5j68tO357/pS/IO
vAvvwfvwAXwIH8HH8Al8Cp/B5/AFfAlfwdfwDXwL38H38AP8CD/Bz/AL/Aq/we/w
h/z53qsv0bGvvkTHvvoSHfvqS3Ts63ExOvbVl+jYV1+iY199iY599SV6e5/78vzS
Hx9tf7n/Ce/Au/AevA8fwIfwEXwMn8Cn8Bl8Dl/Al/AVfA3fwLfwHXwPP8CP8BP8
DL/Ar/Ab/A5/yJ/vvelLcuybviTHvulLcuybviTHvulLcuybviTHvulLcuybviTH
vulL8vY+9qV+H1Jffv72/Dd9Sd6Bd+E9eB8+gA/hI/gYPoFP4TP4HL6AL+Er+Bq+
gW/hO/gefoAf4Sf4GX6BX+E3+B3+kD/fe/UlOvbVl+jYV1+iY199iY599SU69vW4
Gh376kt07Ksv0bGvvkRv73Nfnl/646PtL/c/4R14F96D9+ED+BA+go/hE/gUPoPP
4Qv4Er6Cr+Eb+Ba+g+/hB/gRfoKf4Rf4FX6D3+EP+fO9N31Jjn3Tl+TYN31Jjn3T
l+TYN31Jjn3Tl+TYN31Jjn3Tl+TYN31J3t7HvtQ/R+rLL9+e/6YvyTvwLrwH78MH
8CF8BB/DJ/ApfAafwxfwJXwFX8M38C18B9/DD/Aj/AQ/wy/wK/wGv8Mf8ud7r75E
x776Eh376kt07Ksv0bGvvkTHvvoSHft6XI6OffUlOvbVl+jtfe7L80t/fLT95f4n
vAPvwnvwPnwAH8JH8DF8Ap/CZ/A5fAFfwlfwNXwD38J38D38AD/CT/Az/AK/wm/w
O/whf773pi/JsW/6khz7pi/JsW/6khz7pi/JsW/6khz7pi/JsW/6khz7pi/J2/vY
l/p1pL78+u35b/qSvAPvwnvwPnwAH8JH8DF8Ap/CZ/A5fAFfwlfwNXwD38J38D38
AD/CT/Az/AK/wm/wO/whf7736kt07Ksv0bGvvkTHvvoSHfvqS3Tsqy/Rsa++RMe+
HtejY199id7e5748v/THR9tf7n/CO/AuvAfvwwfwIXwEH8Mn8Cl8Bp/DF/AlfAVf
wzfwLXwH38MP8CP8BD/DL/Ar/Aa/wx/y53tv+pIc+6YvybFv+pIc+6YvybFv+pIc
+6YvybFv+pIc+6YvybFv+pK8vY99qTupL8k/2/7y+jvwLrwH78MH8CF8BB/DJ/Ap
fAafwxfwJXwFX8M38C18B9/DD/Aj/AQ/wy/wK/wGv8Mf8ud7r75Ex776Eh376kt0
7Ksv0bGvvkTHvvoSHfvqS3Tsqy/Rsa/H/fT4X30J/v/78vx6/wH/hHfgXXgP3ocP
4EP4CD6GT+BT+Aw+hy/gS/gKvoZv4Fv4Dr6HH+BH+Al+hl/gV/gNfoc/5M/3/h32
32H/PfbfY/8D9j9g/yP2P2Lf9CU59j9j/zP2v2D/C/a/Yv8r9r9h/9v7/T8BXxGZ
cZ1FAQAAAUWd

`turtle world`
H4sIAAAAAAAAAI2Ve0xTVxzHT0tLoYVSKFREYDDeBVreLSJwUNEhiLzLGwq9tIVS
ClSgW2Yckb3clkHc4iKZKGQiE6NuZD4WPH/AHtmWsC3MzCxucW5DZsJiMgYqst9t
b00zk3a3+dz+zu3vfu+3v3PO7yJhs/lgj9lAhfWa1WaqGaMnx0nkbqCMWrMO4mrE
bemhKA2EkYhvMnSZ+/UaLWWGcRri0WMTZYSBDHFbuwxdPRAGI46l1Rp5IYFV/Ima
EnlAuqar32iCUQri9urUJgpCKeIM2O7hILd+XZfVh3uvjslMRTwdpdbojVoY+AMe
iKs2aimDNY+rofr0dMhC3AGNvq0NQjbiWpjQDXEgd8CqTUcW+hbEgZvoa+7WiL7G
o7U24YCvLXRM4i0KfvipQJIUNXV+qUyItUW3hT6sr7AMPX2w4ANnOIkAb7bVA2IB
bMAN4LDp58I1Ik+gNhU+YzhUF3b/TNACrglXvVofcxRnOtXlAwGg4Q7wAA/AE+AD
AvpxJJY/xfnwnXvY9/Ki8YNNhKv/GB5cPP0mzjvsSlcIGl5sm2869gFEgC9dP5La
NvlNEprFAVN5vVkXkvDunBvledEzeI9TXXeWTdMPEAP+bJt/CdtWXw6J9p24/3B/
EYluOb7F79M5TGWYLN1XH+FCp7qIqW8gsBUIArY51JdLpLuy1iJ0AySlkT/9j8c+
rJXGlbdPFOAS7EqX9hYMhDC6ocAzQBi9UkjKxabAobMleNvJ0cFbj3W4+N3hnvXJ
UFxGnOmymDqEA88CEUCkQx14JLb0k6L+jjUSdzd09mDEHUwtVubnBOlwpVO/Qpat
rlFANDNfMUAsEAc5HiRWc6J4+sojEr5RsjQTP4Y1q38PvvWeGquc+vVj2datFIgH
EoBEu2/I8SRxv01mBpwXEUX/8usJW1fxjl9lF+cFb+Nap359WLa1KgPkQBKQbF/H
kMMnkWS14LraQCKGziZ71S3gFr+ajWxOCK536pfDsq2xFCAVSAPSGd8ZkCMgye3q
kuWNKqKYfkX5/cxneKf07hmKX4WbnPr1ZnQVgBLIBLbb6wE5XvD/599/o5iDRXkv
l6aPItx3iEflipJw8y/OdN2ZOmQBOxz2hXXfQY43kYvQRx+LEUnjXZlXaXow9WXY
iqo0F/s/Lfuf9UDPWzaQY9+/DvMmJPJsPVfXeJhkKCSdbrPHMfWwu0WWkPI/+hm9
VnMBDOQBOx32hQ+RjYz1STJ/IoqvT40+rvXC2p/rTJpr3S76mYDxuwvYDeQDexz8
iojsQslrX/xVQVJrE/06F5ZwR8O5jgdlqy76GR3QvWAv8JzDPi4A9sHPviT6cpx8
4iaH8CWtk2HBJty6PUf/5/VJF/2MS3sGjUKgCNgPFNt9Q44fiRlXDb2wskaijhz6
/KV5A24VH7jXcOcHF/2My/TfA0CJg669/4pJmnhTufLgeaIsfHFdKv8d6348Ped5
Lt1FPxMw74tSoMyhvvb3hT9JvNrQaco3kfRj36m+vXQbt4WMDsz5Clz0MyHTz8qB
Cod1VglUQU4ASQoK7BDfmiBKS7xg5EgFbo87MX5MMu+in9F+6feaCqgGaoBaoA6o
hxwJib9xsyrwmpnEDh4dJutrmFodXx65tNdFPxMy89YANAJNTJ+06v8L75p73wcJ
AAAAAAkH