Java StarLogo
2.0
english
`turtle`
to propagate
seth 0
let [:neighborColor pc-towards 0 1]
if (:neighborColor = green or :neighborColor = brown ) and ((count-turtles-towards 0 1) = 0)
	[createNew 0 wind windStrength]	
let [:neighborColor pc-towards 45 1]
if (:neighborColor = green or :neighborColor = brown ) and ((count-turtles-towards 45 1) = 0)
	[createNew 45 wind windStrength]	
let [:neighborColor pc-towards 90 1]
if (:neighborColor = green or :neighborColor = brown ) and ((count-turtles-towards 90 1) = 0)
	[createNew 90 wind windStrength]	
let [:neighborColor pc-towards 135 1]
if (:neighborColor = green or :neighborColor = brown ) and ((count-turtles-towards 135 1) = 0)
	[createNew 135 wind windStrength]	
let [:neighborColor pc-towards 180 1]
if (:neighborColor = green or :neighborColor = brown ) and ((count-turtles-towards 180 1) = 0)
	[createNew 180 wind windStrength]	
let [:neighborColor pc-towards 225 1]
if (:neighborColor = green or :neighborColor = brown ) and ((count-turtles-towards 225 1) = 0)
	[createNew 225 wind windStrength]	
let [:neighborColor pc-towards 270 1]
if (:neighborColor = green or :neighborColor = brown ) and ((count-turtles-towards 270 1) = 0)
	[createNew 270 wind windStrength]	
let [:neighborColor pc-towards 315 1]
if (:neighborColor = green or :neighborColor = brown ) and ((count-turtles-towards 315 1) = 0)
	[createNew 315 wind windStrength]	
stamp yellow
die
end

to createNew :dir :windDir :windStrength
let[:windDir 45 * :windDir]
ifelse :windStrength = 0
[hatch [setc blue rt :dir fd 1 stamp yellow seth 0] ]
[hatch [setc blue rt :dir fd 1 stamp yellow seth 0 
	let [:neighborColor pc-towards :windDir 1]
	if (:neighborColor = green or :neighborColor = brown ) and ((count-turtles-towards :windDir 1) = 0)
		[rt :windDir fd 1 stamp yellow seth 0] ] ]
end


`observer`
to initialize
setshape-of 0 flame1
end

to burn
ask-turtles[propagate]
end


`information`



`interface`
SLCanvas
top-left 43 22

SLTextWidget
top-left 97 571
width-height 178 40
textwidth 174
linenums 2
words "[ strength is variable from 0 to 6 \n  0 stands for no wind, 6 for tornado ] "
drawBorder true
textwidget-number 2

SLTextWidget
top-left 29 570
width-height 145 55
textwidth 141
linenums 3
words "[ 0->N, 1->NE, 2->E, 3->SE\n  4->S, 5->SW, 6->W, 7->NW ] \n"
drawBorder true
textwidget-number 1

SLSlider
top-left 97 455
width-height 90 25
name "wind strength"
variable "windStrength"
min-value 0
max-value 6
current-value 1
slider-number 1
show-name? true

SLSlider
top-left 37 450
width-height 95 25
name "wind direction"
variable "wind"
min-value 0
max-value 7
current-value 3
slider-number 0
show-name? true
toolTip-text "specifies the eight possible wind directions"

SLButton
turtle-or-observer? observer
top-left 145 473
width-height 55 30
name "initFlame"
line-to-run "initialize"
forever? false
button-number 1
show-name? true
whichip 4

SLButton
turtle-or-observer? observer
top-left 186 464
width-height 71 30
name "burnBurn"
line-to-run "burn"
forever? true
button-number 3
show-name? true
whichip 5

SLButton
turtle-or-observer? observer
top-left 226 469
width-height 68 30
name "clearFlames"
line-to-run "ct"
forever? false
button-number 2
show-name? true
whichip 6

SLTextWidget
top-left 151 559
width-height 201 100
textwidth 197
linenums 6
words " 1) place a turtle in a burnable area  \n 2) press 'init Flame'\n 3) set wished wind direction and strength\n  (only strength 0 and 1 yet implemented!)\n 4) press the 'burnBurn'-Button\n 5) clear the Flames"
drawBorder false
textwidget-number 3

SLLegend
top-left 374 457
width-height 61 16
name "river  "
shape 1
color -16776961
show-border? true
legend-number 4

SLLegend
top-left 404 456
width-height 111 16
name "burning flames  "
shape 24
color -7434610
show-border? true
legend-number 6

SLLegend
top-left 433 457
width-height 89 16
name "burnt area  "
shape 1
color -256
show-border? true
legend-number 5

SLTextWidget
top-left 331 568
width-height 182 40
textwidth 178
linenums 2
words "only meadow and forrest are burnable\nareas! "
drawBorder true
textwidget-number 4

SLLegend
top-left 315 456
width-height 69 16
name "forrest  "
shape 1
color -6262704
show-border? true
legend-number 2

SLLegend
top-left 343 456
width-height 60 16
name "rock  "
shape 1
color -11184811
show-border? true
legend-number 3

SLLegend
top-left 285 457
width-height 81 16
name "meadow  "
shape 1
color -11418368
show-border? true
legend-number 1


`turtle shapes`
H4sIAAAAAAAAAO3c25IkR33A4UKcBAiE8dkYU8bng7C0klaS8WGuuHFw6wsHF0j2
YhEBSJZEEPZVP6gfgLewqZKmezc13VXdlVl5+r4I989dM9VZ2VszO7us/sOLP/ro
Fx989NMn44fvvv3+kw9/dPf8cO9ufnzh44+/NH98OvCZX//fZ3/9f88fP4WeHaaH
//u1sOGxc58X6/xrXvuh19t6/trX2bqPAvf/9Y+/LQAA/Xlufrz254gSeu3PaKnW
3fs69lr/3OuuXf/W60r9a5jrOmL9Ouy1rvX7Xn/rurdeR+x1Y13H2utbOr/AjsPw
uQEAAAAAAAAAaMHH/x1RIf8mQTvo0ufkvj7733e/rb8f9m//Le3/2uuNvf/c71dv
+0/5Xu5R++/rfki9Ru795d5/ae9H7vfc/u3f/u3f/u3f/u2/9f3n3m/u9yP3/vbe
f+795H4/cl9/7v1f+37Efv+2rm//qhf7meGFD//rF29/cBofOo8JND6Ue4dCblXN
1MH4UADo2HPZfxZRVVXV/TsYHwoAAAAAAAAADXk++79FUFVVVVVVVVVVVVVVVVVV
1e0dpoFAL7z/5IMP3/v5cXzoc9OcQONDuXeYHh66hR64nS5+3rXnR7zNN11/7PNv
vd617+et13vh48aHAkC3npsft/yMtPVnrtzr3/qz2q3rl35+b732nNivZ/2y19/6
Gq2tH/vzS1t/6/tZ4fmj8aEAAAAAAAAA0Irn58ct/1ZjqVtfI/X12b/997z/1Ovn
3r/1rW/9tN9DVLXOpl6j9Ouzf/u3f/u3f/u3//33V/v7Y//2b//prs/+7d/+8+1/
62tY3/rWL3r9zw5f/ejJBz/7yUdPjvNDP9vk/NC7Fw/P9NqP177+BofpYeu9uOb+
3uP8p1362KXX2/J1l3v9G98/80OhUFt/7yj4955V7P/wYFOdR6+unx/ae2P9rBZ7
3dTXkXv93O9/jvWftuXcGNeV49e/pP2vfR9irXPrHi6p7dff+rvcf6P5oQAAAJxz
7n9r2Ot/c8i9PvQs99df7vWhZ0tff7G/HvdeDwCgfennh6pqv936GrmvP9e+a30f
Uq+Re3/2b//2v//7kHs/ud6H3Ndv/+7/h67lnJxrl/A+7bH/3L/+9t/3/i/JuXYJ
708Pv/453ofc+8n1PuS+/nPXtNaea8Va069//n3X+j6kXiP3/uzf/u3f/vd+H3Lv
J9f7sMN1fm74xv380F++995/HIeIfu7iENG77//wYpdsPf9WuYd45l5/g8P08NAN
esmaG3zL+Q99kV277ppruuWLu+T1b3z/Vg0RXfraTv213/v69MkQzcMz3fv83AwR
ZR/rhohutfEPNt2vv+ZnxFt/Zqxl/bXXkWrdHOs/bcu5Ma4rx69/Sftf+z7EWufW
PVxS26+/9Xe5/8YYQ0S3/lm59j9r27/952xu9t/3/gGA9uUe4pV7fehZ7q+/3OtD
zwwRBQCoXZwhorml+DcX1zQ3+7f/nM3N/vPu/+nu8V6XsE/7t3/7t/+93ofc+8n1
PuS+/lz7Lvl9uCTn2iW8T3vsP/evv/33vf9Lcq5dwvvTw69/jvch935yvQ+5r//c
Na2151qx1izh172G+2CPfdf2Pti//du//fe6/1TvQ+795HofdrjOzw8vfPD2O+/8
5KPj+NDPXx4fev/PLn/0rWeen3P3zeHBzzv3/P7zl17nUz1z3tnzzzyPff7x865s
eP7S6537/HPufvCrdZ945fjQS7dy+Dnnnl96vbXWXMee59/qmvfq0ucv7Wfh89aN
Dw2/Ju+/RwTfK24e83funr/yn4qfu45zr3/u41vXPfc97Nb1P/X5V358af2z1xNp
39cqZv1z13Hlx62/cf1zv0cvHb9y/Vt/T7/29/691732+0+s61p6/Vs/Hmt/a31q
nU9+xjp24+tffT3B+tulGR96yx+LHjp/q6XXj7XOta5Zf+17dc1eYv96b13P+tYv
Yf3Ucq27dB3nPh5rnVvXv/U6rn392PfFta+/9Xo2vt4YY3zovdh/hq7F6n396Nuf
9OG/Q8n9Pqz+s8u1v57HfZ9ppPsi1Z8BP/X5sf+uaOP+b/0z6Nrzk/0dWeS/Y0u2
/9z73Pg+LIm1/0+97tb7eqf9H9fb+D7cfP23nh9p38f1avs6iLz/c0rff2rF3Qd7
/91b7q+Lne7zczbvP/H5qdn/ysbef6Sf77ay/5W1/4fby/7P7Sf259v/M43t6v0W
1lvlvu7c70Pu6821/9zXmft9WH6du6C593Xd9SxZu976z0/b03XcBb38+efc+v7t
dz/cJbn+pddZ/vy7Veun3v+t1x/L6n384H+fbeTv47mt3vfK96EVS/vvRbn7jjM+
NPe/4cnd1HLtI9d+l8T+NzLXrpfb1usvbT+p2X/6/W99zZS/Jnt8Hy9x/6X9Pra3
VL8vlibWPu3f/h9q6ezf/lO2dPZv/ylbOvvva79Let13yP773HfI/uPsv5T369br
vnX/pdw3sa9/6XVK+7qJff21/Lyw1z5Kex9y72ev9yX39eV6H3Jfzyf9wvC1nz75
8Ucv/fvbHxwHiH5h+vjZAaJb3f3rbS95f96t53Ozw/Tw9I1z6Sa/5gvi1o+tXWvp
emvpuf0vvT8RP75qgChlyfW9Mtf36nDdvdY/t67fq4B2rBsgqmU11eeuea0c6z8k
5Xt2ad2te1r6nL3uIdXhE5c+9rRbXvuW85e0fv7O7/8Yc4AoADyt979D63X/vf4d
aq9/h7y071b3v3bfre3/2n23sv9b993K/gEAAACoTdwBoqqqqk/3aTFeK/d+cu6/
pvfhIT3s/5IUa+Xe75p9p77W0ve91zWWuu8c11bSvvfef+z3Ye/rLuX9yX19ufaf
+7pUVVU1XW8955I9rjnH+tdqZf2trG9969e7/q3XEWvdUtZfex2p1k20/heHFz/4
yX++++wE0S9On5Bsgug5W/9LGf/FTTKH6eGhO+jSXXrpzltzd19z3qWvjjXnld5L
e1x6DyJ93ATRhuT+Hpn7e3Xu/0rTfy0K1McE0dK79nOflnv9GNdx7TmXpFx3zfqX
riPmr9Xa68y5vpbVpY897ZbXvuX8Ja2fv/P7P5ogCkApev87NPu/e7C96P3vlHuf
xNj7RMreJ3OaUAoAAABAXCaIqqpqnG59jYeUsK/U+7b/8/sv+X2I/ZprtLjva/af
831IvcYtWtj3lv2nfB/22neM/d/yPuy9vz3fx573v/Z9yH19ud+H3Nelqqqao7ee
c8ke15xj/Wu1sv5W1re+9etd/9briLVuKeuvvY5U6yZa//nhyx/+8u2fH4eHzv8o
4ObhoXffufaMZ8879vG6z1s6fvb1F3rrebF66/UvCd/Xc+/zUw7Tw603aaybe+nz
lo5v/SaSy63Xf+2vz8J5XQwPvfZrKdW6S98D914/9XXEft+v/d64df3Y39tTrXvt
73Gp1q319+JafgZItX7q67lVrnU/dR0L3yeTfx9d+H69/fv5c/Nj6j/g5G4o17p7
X8datbzv117/1vWvFWv9rWK9X6nlWjf3+qW873vdB6m/f8Ve99x13Prx2N/3In+f
Gw0PpXZ7/ZmgNHv/magUV//ZcKe/+9qL/V/Zx5dbG/u/3NaVvv/Uf2dX6v5L+bva
1HL/nbX933berfba79r97P2/CeTef7iPVN9Xtr5+LV2S+/pK/b7SSkO5r8f+9+k5
ua/L/tN2rdzXmXv/odzXvdc+l+TeV659n9PbfkO97z+09e8Tq//7SPu/2NTn51b/
/g0P1fq7JPf15dp3q/vfKvf123/e/df+fth/W/tpbf/XamX/sZS+/73Yfxn7z23r
9dS+/3tbr6e2/aZi/33u+16v+77X6/7d933uv/ff92r/uWet2D/31vI+pNp3qe/H
3vu1/+vej73Pz137vyz1+blb+f6/NLzw5Of/898/e3IcH/qlaU7gcXzo3b98NF/G
3fffXdXQ/flL1p6/df3w8249P9b+F9/Xle/f2de9//W7scMn40Ovde42X/vlsHR8
6/pLr5d6/Wu/DSydv/V1F8zjQz91j3z/h1G7pLT1t2pt/dzvf2nrX3t9ra2f+/0v
7et/8/epytfffL2Frd9b78eHprbTzzTR1o/9R8ja19+qtfWvvb7W1r9W7etfe37q
6y1t/djXm3v9zozT+NDFnxki/9l87z/rL7F/+7/YQvaZa/+52b/9X+rm17f/i916
fa1//7N/+8/ZrVLvf+v59m//W15/cX37v9jF833/y9qt7N/+LzW13O+f/dv/pabW
+/5Ts3/7v1j7V9VOez8+tHa9/9sQ+7f/LU39+qVfn/3bv/3f/vq52b/9b+nW18+t
9P2nfv/s3/63NPX1977/1Ozf/rd06+vnlnv/qdfPzf7tP2VLl3r/pb+/ua/f/u0/
5/6BZn15+PK7j957dBwe+uVnhofef9bdS+8/01AvH1+y9HnhOovr/tt3H+zaz9t6
/vDJ8NBzv5ks/WbT6sfX/qZ762/Kaz9/62/2K8+fh4eGrr2Xne9857d7/la1rb90
/rXdKvX6W3/G2Pp61s+7/v3w0K0/yzjf+c5v9/ylz4/9ernXv/b9XBL7+mOvn/v1
rJ91/XEaHrqk9Z+FrW9961vf+ta3vvWtb33rW9/61rd++tffyv7t/1JLf/2tcl/f
1u9Pub+/bWX/9p+zm68/879dyH199m//KbtV7uu3f/vf0q1yX3/r+78fHpr736JY
3/rWt771rW9961vf+ta3vvWtb/3y19/6+qVfn/3bf8/737p+aqW//6nZv/1vae/X
l5r92/+W1s7+7X9La1f4/r8yvPDOL95556dPjuNDv/Lg+NB7d9+83HOWzjv3Op/6
+A9+9WyvfN3N5+/ce7eeF7rhvMP0cO1tGet2buXbwFZb37+Nv35ff2h8aCjWvX6r
vdff62u/lPWv/t669/da6+ddX5tuaO/1Sls/9vVslX79h8eHxv4jS+4/MhX2R7Ti
1gf6lfv7T2nr5/79Z+f1xzXjQ5eU9rPs3uw/b3Nrff+595f7/cl9/fa/rVvlvv7U
+9+8ztLfVbb+d5n2b//2b//2b/897l9VVVWr65Lc15d6f0tyX7/9b+tWua8/9/6X
tL6/Jfaft7nVv/9140Nz/9uNJVuv3/7tf0tza31/W9m//W9p7VrfHwAAALCs9b8f
8Pc/9r+ltdu6/9Lfn9T7s3/7v9TcNl7/C8Pz89zQl155ND8bLowOpTuH6SH3l1iK
PvRlvOf5FXXV6FAAoEXrRoeqalkNj/W2vqpG6RhjdCgAAAAAAAAAUII4o0NVVVVV
VVVV9eGGx3Jfj/2rqqqqqqqqNt2vHkeHvjo/G4wO5eQwPRRyq0ZteGzv8yuq0aEA
0C2jQ1VrbHist/VVNUpHo0MBAAAAAAAAoBVGh6qqqqqqqqqmbHgs9/XYv6qqqqqq
qmrT/dpxdOhr87PB6FBODtNDIbdq1IbH9j6/ohodCgDdMjpUtcaGx3pbX1WjdDQ6
FAAAAAAAAABaYXSoqqqqqqqqasqGx3Jfj/2rqqqqqqqqNt0Xj6NDX5+fDUaHcnKY
Hgq5VaM2PLb3+RXV6FAA6JbRoao1NjzW2/qqGqWj0aEAAAAAAAAA0AqjQ1VVVVVV
VVVTNjyW+3rsX1VVVVVVVbXpfv04OvTx/GwwOpSTw/RQyK0ateGxvc+vqEaHAkC3
jA5VrbHhsd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+qqqqqqqqq
Tfc3jqND35ifDUaHcnKYHgq5VaM2PLb3+RXV6FAA6JbRoao1NjzW2/qqGqWj0aEA
AAAAAAAA0AqjQ1VVVVVVVVVTNjyW+3rsX1VVVVVVVbXpfuM4OvTN+dlgdCgnh+mh
kFs1asNje59fUY0OBYBuGR2qWmPDY72tr6pROhodCgAAAAAAAACtMDpUVVVVVVVV
NWXDY7mvx/5VVVVVVVVVm+5vHkeHvjU/G4wO5eQwPRRyq0ZteGzv8yuq0aEA0C2j
Q1VrbHist/VVNUpHo0MBAAAAAAAAoBVGh6qqqqqqqqqmbHgs9/XYv6qqqqqqqmrT
/a370aGPXp6fDUaHcnKYHgq5VaM2PLb3+RXV6FAA6JbRoao1NjzW2/qqGqWj0aEA
AAAAAAAA0AqjQ1VVVVVVVVVTNjyW+3rsX1VVVVVVVbXp/vZxdOgr87PB6FBODtND
Ibdq1IbH9j6/ohodCgDdMjpUtcaGx3pbX1WjdDQ6FAAAAAAAAABaYXSoqqqqqqqq
asqGx3Jfj/2rqqqqqqqqNt3fOY4OfTQ/G4wO5eQwPRRyq0ZteGzv8yuq0aEA0C2j
Q1VrbHist/VVNUpHo0MBAAAAAAAAoBVGh6qqqqqqqqqmbHgs9/XYv6qqqqqqqmrT
/d3j6NBX52eD0aGcHKaHQm7VqA2P7X1+RTU6FAC6ZXSoao0Nj/W2vqpG6Wh0KAAA
AAAAAAC0wuhQVVVVVVVV1ZQNj+W+HvtXVVVVVVVVbbq/N3zhxz99+2dPXpn+/2lC
4HFw6N33hpn22eGTwaF0bR4cmvteVFVV1f17PzgUAOjOOA0Ozf2ziKqqqqqqqqqq
qqqqqqqqqm7v/eBQAAAAAAAAAKB6vz88/+G7b7//5KVHr8/PhqdGh+a8LopwmB4K
mXEbteGxvc+vqPPoUACgRx+PDi3kZxJVXdnwWG/rq2qUjtPoUAAAAAAAAACgBR+P
Di3k3ySoqqqqqqqqNtfwWO7rsX9VVVVVVVXVpvsHx9Ghj+dng9GhnBymh0Ju1agN
j+19fkU1OhQAumV0qGqNDY/1tr6qRulodCgAAAAAAAAAtMLoUFVVVVVVVdWUDY/l
vh77V1VVVVVVVW263zyODn1jfjYYHcrJYXoo5FaN2vDY3udXVKNDAaBbRoeq1tjw
WG/rq2qUjkaHAgAAAAAAAEArjA5VVVVVVVVVTdnwWO7rsX9VVVVVVVXVpvuHx9Gh
b87PBqNDOTlMD4XcqlEbHtv7/IpqdCgAdMvoUNUaGx7rbX1VjdLR6FAAAAAAAAAA
aIXRoaqqqqqqqqopGx7LfT32r6qqqqqqqtp0v3UcHfrW/GwwOpSTw/RQyK0ateGx
vc+vqEaHAkC3jA5VrbHhsd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzX
Y/+qqqqqqqqqTfeP7keHvvry/GwwOpSTw/RQyK0ateGxvc+vqEaHAkC3jA5VrbHh
sd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+qqqqqqqqqTffbx9Gh
r8zPBqNDOTlMD4XcqlEbHtv7/IpqdCgAdMvoUNUaGx7rbX1VjdLR6FAAAAAAAAAA
aIXRoaqqqqqqqqopGx7LfT32r6qqqqqqqtp0x+Po0Efzs8HoUE4O00Mht2rUhsf2
Pr+iGh0KAN0yOlS1xobHeltfVaN0NDoUAAAAAAAAAFphdKiqqqqqqqpqyobHcl+P
/auqqqqqqqo23T8+jg59dX42GB3KyWF6KORWjdrw2N7nV1SjQwGgW0aHqtbY8Fhv
66tqlI5GhwIAAAAAAABAK4wOVVVVVVVVVU3Z8Fju67F/VVVVVVVV1ab7nePo0Nfm
Z4PRoZwcpodCbtWoDY/tfX5FNToUALpldKhqjQ2P9ba+qkbpaHQoAAAAAAAAALTC
6FBVVVVVVVXVlA2P5b4e+1dVVVVVVVVtun9yHB36+vxsMDqUk8P0UMitGrXhsb3P
r6hGhwJAt4wOVa2x4bHe1lfVKB2NDgUAAAAAAACAVhgdqqqqqqqqqpqy4bHc12P/
qqqqqqqqqk33T4+jQx/PzwajQzk5TA+F3KpRGx7b+/yKanQoAHTL6FDVGhse6219
VY3S0ehQAAAAAAAAAGiF0aGqqqqqqqqqKRsey3099q+qqqqqqqradP/sODr0jfnZ
YHQoJ4fpoZBbNWrDY3ufX1GNDgWAbhkdqlpjw2O9ra+qUToaHQoAAAAAAAAArTA6
VFVVVVVVVTVlw2O5r8f+VVVVVVVVVZvunx9Hh745PxuMDuXkMD0UcqtGbXhs7/Mr
qtGhANAto0NVa2x4rLf1VTVKR6NDAQAAAAAAAKAVRoeqqqqqqqqqpmx4LPf12L+q
qqqqqqpq0/2L4+jQt+Zng9GhnBymh0Ju1agNj+19fkU1OhQAumV0qGqNDY/1tr6q
RulodCgAAAAAAAAAtMLoUFVVVVVVVdWUDY/lvh77V1VVVVVVVW26f3k/OvS1l+dn
g9GhnBymh0Ju1agNj+19fkU1OhQAumV0qGqNDY/1tr6qRulodCgAAAAAAAAAtMLo
UFVVVVVVVdWUDY/lvh77V1VVVVVVVW26f3UcHfrK/GwwOpSTw/RQyK0ateGxvc+v
qEaHAkC3jA5VrbHhsd7WV9UoHY0OBQAAAAAAAIBWGB2qqqqqqqqqmrLhsdzXY/+q
qqqqqqqqTfevj6NDH83PBqNDOTlMD4XcqlEbHtv7/IpqdCgAdMvoUNUaGx7rbX1V
jdLR6FAAAAAAAAAAaIXRoaqqqqqqqqopGx7LfT32r6qqqqqqqtp0/+Y4OvTV+dlg
dCgnh+mhkFs1asNje59fUY0OBYBuGR2qWmPDY72tr6pROhodCgAAAAAAAACtMDpU
VVVVVVVVNWXDY7mvx/5VVVVVVVVVm+7fHkeHvjY/G4wO5eQwPRRyq0ZteGzv8yuq
0aEA0C2jQ1VrbHist/VVNUpHo0MBAAAAAAAAoBVGh6qqqqqqqqqmbHgs9/XYv6qq
qqqqqmrTfek4OvT1+dlgdCgnh+mhkFs1asNje59fUY0OBYBuGR2qWmPDY72tr6pR
OhodCgAAAAAAAACtMDpUVVVVVVVVNWXDY7mvx/5VVVVVVVVVm+53j6NDH8/PBqND
OTlMD4XcqlEbHtv7/IpqdCgAdMvoUNUaGx7rbX1VjdLR6FAAAAAAAAAAaIXRoaqq
qqqqqqopGx7LfT32r6qqqqqqqtp0/+44OvSN+dlgdCgnh+mhkFs1asNje59fUY0O
BYBuGR2qWmPDY72tr6pROhodCgAAAAAAAACtMDpUVVVVVVVVNWXDY7mvx/5VVVVV
VVVVm+7Lx9Ghb87PBqNDOTlMD4XcqlEbHtv7/IpqdCgAdMvoUNUaGx7rbX1VjdLR
6FAAAAAAAAAAaIXRoaqqqqqqqqopGx7LfT32r6qqqqqqqtp0XzmODn1rfjYYHcrJ
YXoo5FaN2vDY3udXVKNDAaBbRoeq1tjwWG/rq2qUjkaHAgAAAAAAAEArjA5VVVVV
VVVVTdnwWO7rsX9VVVVVVVXVpvvofnTo6y/PzwajQzk5TA+F3KpRGx7b+/yKanQo
AHTL6FDVGhse6219VY3S0ehQAAAAAAAAAGiF0aGqqqqqqqqqKRsey3099q+qqqqq
qqradF89jg59ZX42GB3KyWF6KORWjdrw2N7nV1SjQwGgW0aHqtbY8Fhv66tqlI5G
hwIAAAAAAABAK4wOVVVVVVVVVU3Z8Fju67F/VVVVVVVV1ab72nF06KP52WB0KCeH
6aGQWzVqw2N7n19RjQ4FgG4ZHapaY8Njva2vqlE6Gh0KAAAAAAAAAK0wOlRVVVVV
VVU1ZcNjua/H/lVVVVVVVVWb7uvH0aGvzs8Go0M5OUwPhdyqURse2/v8imp0KAB0
y+hQ1RobHuttfVWN0tHoUAAAAAAAAABohdGhqqqqqqqqqikbHst9Pfavqqqqqqqq
2nQfH0eHvjY/G4wO5eQwPRRyq0ZteGzv8yuq0aEA0C2jQ1VrbHist/VVNUpHo0MB
AAAAAAAAoBVGh6qqqqqqqqqmbHgs9/XYv6qqqqqqqmrTfeM4OvT1+dlgdCgnh+mh
kFs1asNje59fUY0OBYBuGR2qWmPDY72tr6pROhodCgAAAAAAAACtMDpUVVVVVVVV
NWXDY7mvx/5VVVVVVVVVm+6bx9Ghj+dng9GhnBymh0Ju1agNj+19fkU1OhQAumV0
qGqNDY/1tr6qRulodCgAAAAAAAAAtMLoUFVVVVVVVdWUDY/lvh77V1VVVVVVVW26
bx1Hh74xPxuMDuXkMD0UcqtGbXhs7/MrqtGhANAto0NVa2x4rLf1VTVKR6NDAQAA
AAAAAKAVRoeqqqqqqqqqpmx4LPf12L+qqqqqqqpq0/374+jQN+dng9GhnBymh0Ju
1agNj+19fkU1OhQAumV0qGqNDY/1tr6qRulodCgAAAAAAAAAtMLoUFVVVVVVVdWU
DY/lvh77V1VVVVVVVW263zuODn1rfjYYHcrJYXoo5FaN2vDY3udXVKNDAaBbRoeq
1tjwWG/rq2qUjkaHAgAAAAAAAEArjA5VVVVVVVVVTdnwWO7rsX9VVVVVVVXVpvsP
96NDH788PxuMDuXkMD0UcqtGbXhs7/MrqtGhANAto0NVa2x4rLf1VTVKR6NDAQAA
AAAAAKAVRoeqqqqqqqqqpmx4LPf12L+qqqqqqqpq0/3H4+jQV+Zng9GhnBymh0Ju
1agNj+19fkU1OhQAumV0qGqNDY/1tr6qRulodCgAAAAAAAAAtMLoUFVVVVVVVdWU
DY/lvh77V1VVVVVVVW26/3QcHfpofjYYHcrJYXoo5FaN2vDY3udXVKNDAaBbRoeq
1tjwWG/rq2qUjkaHAgAAAAAAAEArjA5VVVVVVVVVTdnwWO7rsX9VVVVVVVXVpvvP
x9Ghr87PBqNDOTlMD4XcqlEbHtv7/IpqdCgAdMvoUNUaGx7rbX1VjdLR6FAAAAAA
AAAAaIXRoaqqqqqqqqopGx7LfT32r6qqqqqqqtpu/x8zCRiGEw8VAAAVDxM=

`template`
null

`settings`
patch-size 8
num-shapes 64
screen-half-width 25
screen-half-height 25
interface-window-xcor 59
interface-window-ycor 12
interface-window-size 782 467
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 210
control-center-ycor 65
control-center-width 745
control-center-height 614
turtle-command-center-height 150
observer-command-center-height 150

`string table`
H4sIAAAAAAAAAGNgYGAAABzfRCEEAAAAAAAABA==

`symbol table`
H4sIAAAAAAAAAGNgYGAAABzfRCEEAAAAAAAABA==

`double table`
H4sIAAAAAAAAAGNgYGB1sGAAAwfvBgjtCKXdoHSUA5gGAA6N/GksAAAAAAAALA==

`list table`
H4sIAAAAAAAAAG3QwQ2AIAwF0BY4ezBxA69MwBYeWYiFWIhNBLH6/ZGkST99IaQi
EkTEq2679sbJc46R71I3y1mGmeVILoKL4DK5DC6DK+QKuAKukqvgKrhGroFrr9Pl
62ae86s3l8glcAn25nu72g56Dnb/l+mPiu+M/gRDjR8csAEAAAAAAbA=

`bytecodes`
H4sIAAAAAAAAAI2VCW/TMBSAn5MeS6+ko13LgNEd3PcNG7BR2LgH/IOlJZoqlXbq
MiH4jfCbwI6fk1fPiWJp+3y/z7H6DNWDwa8wGE6/B8cHO/BHlL8AUIbKaDIKR/54
9Dvg7QrEhVEypAWwxCsuFEWrMDiZTTirySpL/CuKjVVDrrY51ku4koFzNJse+Yd+
yIOyQTJNBW13TwVmrQZACf7xIiJIRmM2MK+j9RWiPuZdxHYRWQK2XMB6GeesoGkd
+xeQDrAN9QEqsl6W8eQfHsu1cE4VWctwrRtcG5qri/SIazPFdRF5hri2cri2kUsZ
rh2Da1dzPYtcJq7nUlzPIy8Q15UcripWL8N11eC6prmuIzeI66UU18vIK8T1ag7X
a8jrGa43DK43NddbyNvE9U6K613kPeJ6P4frA+TDDNdHBtfHmusT5FPi+izFdRO5
RVyf53B9gXyZ4bptcN3RXF8h+8T1dYrrG+Qucd3L4foW+S7D9b3B9YPm+hH5ibh+
TnHdR34hrl9zuH7j6cIWP2tMzRY4w1nA8/J+8JP3HSbLVGqOMj/jCpY4mhwr4hhT
Yx3UayG95P1oezhf1FX64DHatTh1R0oqbYunQCh0LUlLXrXkVpzWzfuWyb4LZF9H
7otniVN86nVVDddVS65rbp86ua7G6etSc2NHlzh6xLGZnN215r+Ba+N12bDYPwnD
6WSz1xMP+d7Y/xFA8gLPlegNbMbzxePdlw+4oz3cLFkUhSvFy1vx8uE48GdRvGP5
0ddsNes/FEWI424IAAAAAAhu

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

`patch world`
H4sIAAAAAAAAAIXcTYsj/X7fYSWYRCQEtNBCAS2EEEIIIfT8/FRVmioV2WeRlc3J
wQ4Y++DckGSnl5yXkGN7pMn9t391DQzq6as+Uz0aqb60pqdb/+kv//RXv/3hbwb/
87e/+u2Pf/lofX/819Zf/O8//P0//NPb/+FPf/v3v/2v//Hf//qPv/35V/3Wv/3T
H/5822n9u7/949/99W9/8+e3B61//4/H/OmPf/fnX/Raf/F//jltt/7jP/3G/99x
rdZ//vmzdf+//3yqz+3jv7w/Z/83//jz89GE3oZ34F14D96HD+BD+Ag+hk/gU/gM
Pocv4Ev4Cr6Gb+Bb+A6+hx/gR/gJfoZf4Ff4DX6HPxLPUn83e4Y+Q5+jz9EX6Av0
T/RP9D/Q/0Bfoi/RV+gr9C/0L/Q1+rq5/77/5zujfQm9De/Au/AevA8fwIfwEXwM
n8Cn8Bl8Dl/Al/AVfA3fwLfwHXwPP8CP8BP8DL/Ar/Ab/A5/JB7sS+gZ+gx9jj5H
X6Av0D/RP9H/QP8DfYm+RF+hr9C/0L/Q1+jr5v67L5+diPYl8ja8A+/Ce/A+fAAf
wkfwMXwCn8Jn8Dl8AV/CV/A1fAPfwnfwPfwAP8JP8DP8Ar8mnj5/b/A7/CF/N3uG
PkOfo8/RF+gL9E/0T/SffQkdfYm+RF+hr9C/0L/Q1+jr5v67L58diPYl8ja8A+/C
e/A+fAAfwkfwMXwCn8Jn8Dl8AV/CV/A1fAPfwnfwPfwAP8JP8HPi6fPvAr/Cb/B7
4p3W7/0hfzd7lvTRvkSeo8/RF+gL9E/0T/SffQkdfYm+RF+hr9C/0L/Q1+jr5v67
L5/rfLQvkbfhHXgX3oP34QP4ED6Cj+ET+BQ+g8/hC/gSvoKv4Rv4Fr6D7+EH+BF+
gp8Tj/Yl8iv8Br8nHu1L6O9mz5I+2pfIc/Q5+gJ9gf6J/on+sy+hoy/Rl+gr9BX6
F/oX+hp93dx/9+VzHY/2JfI2vAPvwnvwPnwAH8JH8DF8Ap/CZ/A5fAFfwlfwNXwD
38J38D38AD/CT/Bz4un1+QK/wm/wO/whfzd7hj5Dn6PP0Rfoi6SP9iV09J99CR19
ib5EX6Gv0L/Qv9DX6Ovm/rsvn+t0tC+Rt+EdeBfeg/fhA/gQPoKP4RP4FD6Dz+EL
+BK+gq/hG/gWvoPv4Qf4EX6CnxOP9iXyK/wGv8Mf8nezZ+gz9Dn6HH2Bvkj6aF9C
R//Zl9DRl+hL9BX6Cv0L/Qt9jb5u7r/7Mvh5G+1L5G14B96F9+B9+AA+hI/gY/gE
PoXP4HP4Ar6Er+Br+Aa+he/ge/gBfoSf4OfEo32J/Aq/we/wh/zd7J99CR39Z19C
R//Zl9CTPtqX0NF/9iV09J99CR39Z19CR//Zl9DRf/Yl9Ob+uy+f62y0L5G34R14
F96D9+ED+BA+go/hE/gUPoPP4Qv4Er6Cr+Eb+Ba+g+/hB/gRfoKfE4/2JfIr/Aa/
wx/yd7Nn6DP0OfocfYG+QP9E/0z6aF9CR1+iL9FX6Cv0L/Qv9DX6urn/7svnOhrt
S+RteAfehffgffgAPoSP4GP4BD6Fz+Bz+AK+hK/ga/gGvoXv4Hv4AX6En+DnxKN9
ifwKv8Hv8If83ewZ+gx9jj5HX6Av0D/RP5M+2pfQ0ZfoS/QV+gr9C/0LfY2+bu6/
+/K5Tkb7Enkb3oF34T14Hz6AD+Ej+Bg+gU/hM/gcvoAv4Sv4Gr6Bb+E7+B5+gB/h
J/g58WhfIr/Cb/A7/CF/N3uGPkOfo8/RF+iLpI9eHwsd/WdfQkdfoi/RV+gr9C/0
L/Q1+rq5/+7L5zoY7UvkbXgH3oX34H34AD6Ej+Bj+AQ+hc/gc/gCvoSv4Gv4Br6F
7+B7+AF+hJ/g58SjfYn8Cr/B7/CH/N3sGfoMfY4+R1+gL5I+2pfQcf7PvkT9j3ez
l+hL9BX6Cv0L/Qt9jb5u7r/78rnORfsSeRvegXfhPXgfPoAP4SP4GD6BT+Ez+By+
gC/hK/gavoFv4Tv4Hn6AH+En+DnxaF8iv8Jv8Dv8IX83e4Y+Q5+jz9EX6Iukj/Yl
dJz/sy9R/+Pd7CX6En2FvkL/Qv9CX6Ovm/vvvnyuY9G+RN6Gd+BdeA/ehw/gQ/gI
PoZP4FP4DD6HL+BL+Aq+hm/gW/gOvocf4Ef4CX5OPNqXyK/wG/wOf8jfzZ6hz9Dn
6HP0Bfoi6aN9CR3n/+xL1P94N3uJvkRfoa/Qv9C/0Nfo6+b+uy+f69R/e/y+b8Hb
8A68C+/B+/ABfAgfwcfwCXwKn8Hn8AV8CV/B1/ANfAvfwffwQ+LRvkR+gp8Tj/Yl
8iv8Br/DH/J3s2foM/Q5+hx9gb5A/0T/RP/Zl9DRl0kf7UvkFfoK/Qv9C32Nvm7u
v/vyuQ5F+xJ5G96Bd+E9eB8+gA/hI/gYPoFP4TP4HL6AL+Er+Bq+gW/hO/gefkg8
2pfIT/Az/JJ4tC+R3+B3+EP+bvYMfYY+R5+jL9AX6J/on+g/+xI6+jLpo32JvEJf
JX36+Hu14OjrpI/2JfDvviyDvgVvwzvwLrwH7yce7UvkQ/gIPoZP4FP4DD6HL+BL
+Aq+hm/gW/gOvocfEo/2JfIT/Ay/JB7tS+Q3+B3+kL+bPUOfoc/R5+gL9AX6J/on
+s++hI6+TPpoXyKv0FdJH+1L6OjrpI/2JfDvvqyCvgVvwzvwLrwH78MH8CF8lHi0
L5FP4FP4DD6HL+BL+Aq+hm/gW/gOvocfEo/2JfIT/Ay/JB7tS+Q3+B3+kL+bPUOf
oc/R5+gL9AX6J/on+s++hI6+RF+ir9BXSR/tS+jo66SP9iXw776sg74Fb8M78C68
B+/DB/AhfJR4tC+RT+BT+Aw+hy/gS/gKvoZv4Fv4Dr6HHxKP9iXyE/wMv8Cv8Bv8
nni0L6G/mz1Dn6HP0efoC/QF+if6J/rPvoSOvkRfoq/QV0kf7Uvo6Oukj/Yl8O++
bIK+BW/DO/AuvAfvwwfwIXwEH8MniUf7EvkMPocv4Ev4Cr6Gb+Bb+A6+hx8Sj/Yl
8hP8DL/Ar/Ab/A5/yN/NnqHP0Ofoc/QF+gL9M+mjfYn8sy+hoy/Rl+gr9FXSR/sS
Ovo66aN9Cfy7L9ugb8Hb8A68C+/B+/ABfAgfwcfwSeLR1ydHPoPP4YvE049vCV/B
14lH+xL5Fr6D7+GHxKN9ifwEP8Mv8Cv8Br/DH/J3s2foM/Q5+hx9gb5A/0z6aF8i
/+xL6OhL9CX6Cn2V9NG+hI6+TvpoXwL/7ssu6FvwNrwD78J78D58kHj0/18iH8HH
iUf7EvVT+Aw+hy8Sj/Yl8hV8nXi0L5Fv4Tv4Hn5IPNqXyE/wM/wCv8Jv8Dv8IX83
e4Y+Q5+jz9EXSR+9Phb5E/0T/WdfQkdfJn365yvfzV4lfbQvUf9qwdHXSR/tS+Df
fdkHfQvehnfgXXgP3ocPEo/2JfIRfJx4tC9RP4XP4HP4IvFoXyJfwdeJR/sS+Ra+
g+/hh8SjfYn8BD/DL/Ar/Aa/wx/yd7Nn6DP0OfocfZH00b5E/kz6f/H5Dc7/2ZfQ
0Zfoy6SPPn8JHed/teDo66SP9iXw774cgr4Fb8M7iacffxd9D96HD3D+IXwEH8Mn
8Cl8Bp/DF4lH+xL5Cr5OPNqXyLfwHXwPP8CP8BP8nHi0L5Ff4Tf4Hf6Qv5s9Q5+h
z9Hn6Av0Bfpn0kefv0T+2Zfo9//xbvYy6aPXx6K+Ql+9m/2V9NG+RF4nfbQvgX/3
5Rj0LXgb3kk82pfIe4lH+xL1A/TDxKN9iXwMn8Cn8Bl8Dl8kHu1L1K/QrxOP9iXy
LXwH38MP8CP8BD8nHu1L5Ff4DX6HP+TvZs/QZ+hz9Dn6An2B/on+if6zL6EnffT6
WNSX72avkj7al6h/teDoa/R1c//dl8/zKNqXyNvwTuLRvkTeg/fhA/gQPoKP4RP4
FD6Dz+EL+BK+gq8TT//+N/AtfAffJx7tS+RH+Al+hl/gV/gt8WhfIn/I382eoc/Q
5+hz9AX6Av0T/RP9Z19CR1+iL9FXSR/tS9S/WnD0Nfq6uf/uy+d5Eu1L5G14J/Fo
XyLvwfvwAXwIH8HH8Al8Cp/B5/AFfAlfwdeJR/sS+Ra+g+8Tj/Yl8iP8BD/DL/Ar
/JZ4tC+RP+TvZs/QZ+hz9Dn6An2B/on+if6zL6GjL9GX6Cv0FfoX+hf6Gn3d3H/3
5fM8iPYl8ja8k3i0L5H34H34AD6Ej+Bj+AQ+hc/gc/gCvoSv4OvEo32JfAvfwffw
Q+LRvkR+gp/hF/gVfks82pfIH/J3s2foM/Q5+hx9gb5A/0T/RP/Zl9DRl+hL9BX6
Cv0L/Qt9jb5u7r/78nmcR/sSeRveSTzal8h78D58AB/CR/AxfAKfwmfweeLp/b+A
LxOP9iXydeLRvkS+he/ge/gh8WhfIj/Bz/AL/Aq/we+JR/sS+rvZM/QZ+hx9jr5A
X6B/on+i/+xL6OhL9CX6Cn2F/oX+hb5GXzf33335PI6jfYm8De8kHu1L5D14Hz6A
D+Ej+Bg+gU8TT++/GXwOX8CX8FXi0b5E/Qa+he/ge/gh8WhfIj/Bz/AL/Aq/we+J
R/sS+rvZM/QZ+hx9jr5AX6B/on+i/+xL6OhL9CX6Cn2F/oX+hb5GXzf33335PE6j
fYm8De8kHu1L5D14Hz6AD+Ej+Bg+gU8Tj/Yl8jl8AV/CV4lH+xL1G/gWvoPv4YfE
o32J/AQ/wy/wK/wGv8Mf8nezZ+izpI/2JXT0BfoC/RP9E/1nX0JHX6Iv0VfoK/Qv
9C/0Nfq6uf/uy+PnbbQvkbfhncSjfYm8B+/DB/AhfAQfwyfwaeLRvkQ+hy/gS/gK
voZv4Fv4Dr6HHxKP9iXyE/wMv8Cv8Bv8Dn/I383+2ZfQ0X/2JfSkj/YldPSffQkd
/WdfQkf/2ZfQ0X/2JXT0n30JHf1nX0Jv7n/ty8/jwn0JvJ14ev4OvAvvwfvwAXwI
H8HH8Al8mni4L4HP4Qv4Er6Cr+Eb+Ba+g+/hh8TDfQn8BD/DL/Ar/Aa/wx/yd7Nn
6DP0Ofo86cN9iRz9E/0T/XdfIkdfoi/RV+gr9C/0L/Q1+rq5/+7L53EU7Uvk7cSj
fYm8C+/B+/ABfAgfwcfwCXwKnyUe7UvkC/gSvoKv4Rv4Fr6D7+EH+BF+gp/hl8Sj
fYn8Br/DH/J3s2foM/Q5+jzpo30JHf0T/RP9Z19CR1+iL9FX6Cv0L/Qv9DX6urn/
tS/v391++xa8nXi4L4F34T14Hz6AD+Ej+Bg+gU/hM/gcvkg83JfAV/A1fAPfwnfw
PfwAP8JP8DM8+brpeF8Cv8Hv8If83ewZ+gx9jj5HX6Avkj7cl8jRf/clcvQl+hJ9
hb5C/0L/Ql+jr5v7774kj4Nv34K3E4/2JfIuvAfvwwfwIXwEH8Mn8Cl8Bp/DF/Bl
4tG+RL6Gb+Bb+A6+hx/gR/gJfoZfEo/2JfIb/A5/yN/NnqHP0Ofoc/QF+iLp0/v/
mfTRvkT+2ZfQ0ZfoS/QV+gr9C/0LfY2+bu5/7cvP48J9CbydeLgvgXfhPXgfPoAP
4SP4GD6BT+Ez+By+gC/hK/g68XBfAt/Cd/A9/AA/wk/wM/wCv8JviYf7EvhD/m72
DH2GPkefoy/QF0kf7stPD/cl8O++RI6+RF+ir9BX6F/oX+hr9HVz/92X5PPQb9+C
txOP9iXyLrwH78MH8CF8BB/DJ/ApfAafwxfwJXwFXyce7UvkW/gOvocf4Ef4CX6G
X+BX+C3xaF8if8jfzZ6hz9Dn6HP0BfoC/RP9M+nT+/+zL9Hj/8e72Uv0JfoKfYX+
hf6FvkZfN/e/9uXnceG+BN5OPNyXwLvwHrwPH8CH8BF8DJ/Ap/AZfA5fwJfwFXyd
eLgvgW/hO/gefoAf4Sf4GX6BX+G3xMN9Cfwhfzd7hj5Dn6PP0RfoC/RP9E/03335
6f9if97NXqIvkz7cl8jRv9C/0NdJn3789bvRv/uS/DvYt2/B24lH+xJ5F96D9+ED
+BA+go/hE/gUPoPP4Qv4Er6CrxOP9iXyLXwH38MP8CP8BD/DL/Ar/Aa/Jx7tS+jv
Zs/QZ+hz9Dn6An2B/on+if6zL6GjL9GX6Kukj/Yl8hf6F/o66aN9CfzXvrz/9b4F
byce7kvgXXgP3ocP4EP4CD6GT+BT+Aw+hy/gS/gKvoZv4Fv4LvFwXwI/wI/wE/wM
v8Cv8Bv8Dn/I37/3cF8iR//dl8jRf/clcvTffYkc/XdfIkf/3ZfI0X/35aeH+xL4
d18iR//dl58e7su/7t99Sb4O79u34O3Eo32JvAvvwfvwAXwIH8HH8Al8Cp/B5/AF
fAlfwdfwDXwL3yUe7UvkB/gRfoKf4Rf4FX6D3+EP+fv3Hu1L6Ohz9Dn6An2B/on+
if7z/tDRl+hL9FXSR/sS+Qv9C32Nvm7uf+3Lz+PCfQm8nXi4L4F34T14Hz6AD+Ej
+Bg+STy9/6bwWeLhvgS+gC/hK/gavoFv4bvEw30J/AA/wk/wM/wCv8Jv8Dv8IX83
e5b04b4EnqPP0RfoC/RP9E/0332JHH2JvkRfJX24L4G/0L/Q1+jr5v67L8n/A/r2
LXgb3oF34T14Hz6AD+Ej+Bg+gU/hM/g88WhfIl/CV/A1fAPfwneJR/sS+QF+hJ/g
Z/gFfoXf4Hf4Q/5u9izpo32JPEefoy/QF+if6J/oP/sSOvoSfYm+SvpoXyJ/oX+h
r9HXzf2vffl5XLgvgbfhHXgX3oP34QP4ED6Cj+ET+BQ+g8/hi8TDfQl8BV/DN/At
fJd4uC+BH+BH+Al+hl/gV/gNfoc/5O9mz9Bn6HP0edKH+xI5+if6J/rvvkSOvkRf
oq+SPtyXwF/oX+hr9HVz/92X5PsQfPsWvA3vwLvwHrwPH8CH8BF8DJ/Ap/AZfA5f
JB7tS+Qr+Bq+gW/hu8SjfYn8AD/CT/Az/AK/wm/wO/whfzd7hj5Dn6PPkz7al9DR
P9E/0X/2JXT0JfoSfYW+SvpoX0JHX6Ovm/tf+/LzuHBfAm/DO/AuvAfvwwfwIXwE
H8Mn8Cl8Bp/DF4mH+xL4Cr6Gb+Bb+A6+Tzzcl8CP8BP8DL/Ar/Ab/A5/yN/NnqHP
0Ofoc/QF+gL9E/0z6cN9iRx9ib5EX6Gv0L+SPtyXwGv0dXP/3Zfk+6B9+xa8De/A
u/AevA8fwIfwEXwMn8Cn8Bl8Dl/Al/BV4tG+RL6Bb+E7+D7xaF8iP8JP8DP8Ar/C
b/A7/CF/N3uGPkOfo8/RF+gL9E/0z6SP9iV09CX6En2FvkL/SvpoXyKv0dfN/a99
+XlcuC+Bt+EdeBfeg/fhA/gQPoKP4RP4FD6Dz+EL+BK+Sjzcl8A38C18B9/DD/Aj
/AQ/wy/wK/wGv8Mf8nezZ+gz9Dn6HH2BvkD/RP9E/92XyNGX6MukD/clcvSvpA/3
JfAafZ30g9bv/Lsvyfdh/vYteBvegXfhPXgfPoAP4SP4GD6BT+Ez+By+SDx6fSzy
FXwN38C38B18Dz/Aj/AT/Ay/wK/wG/wOf8jfzZ6hz9Dn6HP0BfoC/RP9E/1nX0JH
X6Ivkz7al9DRv5I+2pfIa/R10g9av/Nf+/LzuHBfAm/DO/AuvAfvwwfwIXwEH8Mn
8Cl8Bp/DF4mH+xL4Cr6Gb+Bb+A6+hx/gR/gJfoZf4Ff4DX6HP+TvZs/QZ+hz9Dn6
An2B/on+if67L5GjL9GX6Cv0FfoX+hf6Gn2d9IPW7/z/AWx6DEWdRQEAAAFFnQ==

`turtle world`
H4sIAAAAAAAAAE2Ouw7CMAxFr0QfCBATIwMDUwcGYGDkUxoaq6kUJVFiVPgaPhXc
8hB38TmSfWUsa75GtrRJrJjqM355oLDkWjbCJ+SXSKQFt5gF67nvdEssfkQ5eCAn
skPeeOuj4BrZvRlpgflY/tc2lXXtexfE9siTUYEEK2S3902GSW/8+EeRzGfzgNKQ
0p1rRVbfP5+SYb4ATYOGr8sAAAAAAADL