<snapdata remixID="12152508"><project name="2001" app="Snap! 7, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAFB1JREFUeF7tnQWUFEcTx/uOE7jDHeLEPSGCu8bdE4jgeljc3Y0YSUiIESPuHkhejBB396AfLofd935NapnZ273tnd7jgKt+L+/CXffMbM1va+rfVd2TVVJSUmK0qQUqyAJZCmAFWV5Pay2gACoIFWqBhAB++umnZvLkyYanc1ZWlv50sMPee+9t2rVrV6E3c0M8eSkA33zzTbPtttvazyIAygfTf6/5Qiazx7x588yuu+66IXJQYdccAvCTTz4x9evXt+AtX77cHH300aZGjRpm7ty5ZsmSJaZhw4amatWq5pdffjHnnXeemTRpkvn777/NnnvuabKzs81BBx1kLrzwQvP000+b3Nxc07x5czNw4EDz0EMPmbPOOsseZ9y4ceaNN94wRx11lB3funVr895775n999/fjB8/3pxzzjnmnnvu2WA971NPPWWKiooq7IZuaCcOAXj99debI444wn6GI4880rRq1crce++9Zsstt7Twffjhh+baa681V155pfnjjz/MCSecYOHj38uWLTOnnXaa+fHHH03Hjh3t+C222MKcf/755s8//zR33HGHhZI+/D/AAt6UKVPMmDFjTGFhoQV/6NChZtSoURuaHWPXy2dt27btBnv96/rCQwBed911MQC5kE033dT89ddfsWvaZZddzJw5c8y///5rf7fZZpuZb775xuy8885m+vTppkmTJmbhwoUWJm4E3rJx48Zm0aJFpnr16mbp0qVm1apV9v8XL15svVxBQYFZuXKl7cNYjvnbb7+taztk7HzYSwF0N2eZALofRnuKBRTA9FgIAcjjVR7BuVnGFK9and7RKmHvvKkTTEG3IrNgwQL76QFQ1bA7CEkBXDhnuims09D9SJW0Z+G0Caag5xgbmiiA6UMQAvCaa66JecBF/5sRA/CKK66w33B+urSbb77ZDBs2zKVrmX222WYbc+ihh1rh49sQNptvvrkZPny476FC4wGwWo/RIQDbt2+f0XNszAdzArBly5Zmt912M3feeWdKWzAF8/bbb5sbb7wxZd9UHZiPHD16tOnfv3+qrin/fskll9ipo0w3BdDPoiEAr7766pgHXDx3ZswDHnPMMebRRx91OhPzgPyXiQaAKOrPPvvM+3DvvvuuOeWUU+w0USabADh79mx7WOZF1QO6WzgE4FVXXWXn72hBAN0PV/l6BgFkHvOff/5RANPAIAQgE8oAiCGXzp+dUIRsvfXWaRw+edf58+ebWrVqrZfHEm/mcnEAWLX7KMMYAbBDhw4uQ7VPfDWMAIhllsybpQA6IKIAOhipjC4hD4jKFQ+4bMGcGIDHHXecefjhh+1hZs2aZUXBZZddZki+f/nll+bEE0+0SXg8QJUqVWyud+rUqVa0UNxAVgQRgKIdO3asufjii820adPMM888Y77++mvrCe+77z4bO5LSq1Onji2I2H333c1rr71msy01a9Y0X331lc0yEM+hysminHTSSWannXZKKDC4nvfff9/mm7t3726vmzAD78vnvPzyy+01Bxt/S9cD5ncbGfKApCK1uVmgFIAyER0E8MEHH7SQCYBAx9TIgAEDLCgUEZCEp5EfptCAwgRgJOjn/4GP9Bv537PPPtum6Q444AAL4l577WUmTJhgateubYsfunXrZoHkPI888ogtZvj4449Nly5drBqnHXjggVagACVw3XDDDQk/MYocIBAG5LqBn9a5c2ebp5YJZBkcFUC+mDRESKdOndysr73CBal4BAGweOH/vB7BVNPgSZo2bZrQzGQMKHDIy8uzHpIcsDQKFVavXpuFEUjwgolasniS81Pdw3jGxpeTJTtWFA84c+ZMezhEiALo/s0KecBMApjqEjYmEcIjWAFMdccT/z0EIHGdeMDli+Z6ecBUl7MxAZjXdUQIQB7v2tws4ARgEBaZhvnggw8MGZKyGgJEbgYlVxynXr16dsi6BLC4uNjk5+eXEhzB6mafGFABdIMtUa8QgJdeemnMA65YPC/mAUUpcsP69etnxcD9999vgBDV+vvvv1shQK71ggsusD/33Xdf88ILL5jHHnvMCgoqnomtOAZjEDXkelGoM2bMsGKEjAcKGKGAENljjz2s+r799tut4iVORMT06tXL/Pzzz4YvA0KlWrVq9ljxjTgTEcK5GPvss89aZU4947HHHmtQ95lQwQDIZ5AYEPtoc7OAM4DiLVCyTzzxhE3NEXD/8MMP1quhSgGSm/vWW29ZhRtslONTUQ2ItLvvvttOqQAP4wE1qIJR0oDKAikU8j777GPPhWKmUdiKWOG6ODbgBhtg/fTTT/b3TBcBMcIGxc6YFi1a2CJYgA62KCpYAXSDLaUHZK5OYsCVS+anjAH3228/89JLL0U6e1mPYKZvAMy1Zfpxnq4KBkAqwsUDdu3a1fXSK32/kAfk0Se54GQAVnqLxRmATIgAiNflCaAAulMSAvCiiy6KZUJWL1uY0gO6n6Z0z0x7rUzmldP1gLldiqwHFACJX7W5WcAJQIpLKTKliQpmgdImm2xiXn75Zft74ioyHAT6ZCf4N4KE9FpQxMhlASCTw/EL34OXLX8jDmT1XbJF8hyL+DG+IVYQS5STsfKOFXlkRIgFydAgQijR8o0BFUA32FLGgMAiueCS4kUxD8jSTLlR8dUwhxxyiBUDpOLwHGRAyH7wu1tuucUMGTLE3miUIcs8d9xxR3sd4gF//fVXs9VWW1mhAZB4MjwI6pd1yvwkFQcwKGHUqzREEOdK5k35QgwaNMhWK7NOA5VNyo41zsSvgwcPjqnX4BcjXQ+Y03l4yAMyI6DNzQIhDwiAIkKCADLfh8INekC8CjeWYgFRyEBHNuXMM8+0Hgn1ScHBueeea8HjbyjoM844w0KDokWpsnSTShxRwcRQbHXRqFEjO80C1KwpZrpHzrXDDjuY7777zl4Ti94TLRdgOogx5KtfeeUVq8wPO+wwu9yU62AMatjXAwKgLFXlpwLoBp99cgZ3x+KRKQCa5YudYkBiHwBKt5UVAyaaVinr+JmOJ6N4QLwxDXsogO40eAPofqpwz0xDU5EiBA+oAEYjIQQg5UniAbNWLHHygNFOu25TcelcY5SJ6CqdhoUA7NGjRzqnrNR9nQCk7o/9XGhsm4GgkPiK2I6gnr1ibr31Vhv0S5xGeoztOphUpmCVSWv6MZaiVWoEoxakUliKoOCRR2yJ4EjWyEOTgSmvglQFMPp3KAQgyxbFA2avXGo9IFMo/I45QiACQAoMWHbZu3fvWAoM6AAQZSkNAKmwIR3GOonbbrvN5nGfe+4506ZNGysOohakcg4ApLD1+OOPT7i+hGtmt62cnJxyLUgFQApRaYgQFLY2NwukBDD+MDINE0V8yBg8InlY8sBRC1JRxsRd7NyVSrTgAYGwvApSgwDyGXv27Olmfe0VVsFMl4gHrLJqmcaADoCQigNA2UUMANUDOhjuvy4hD8jjSiaic1YXK4AOdgTA7I5D7SMYD0tZlgLoYLhEABLIC4C5JctD9YAiLIjn6tatGzoDIoQshTQKUbfbbjs74ZusrYtpGCbCmdwu74JUAMQDCoBScuZ+Gypvz5AHTAYgYkG2tBAVTBZi++23t4qXv5G5QN2SuSAFd9ddd1mRwYIjVq/xH0sy2TWVPmxS+fnnn5drQSoFtsSI5V2QqgBG/wKFACSlJR4wz6xI+AimEhkVDHik3mik08j5kq7Ds/FvoOR4LMlEaJCS4+/ESBSgohYRI6hYVq5R4FpWQSoV1t9//32sIJWCAq4hWUGqmIR0IZ4QBS4FqfyN9CI7srJuONiizANmdRgS8oDxxbjRb8/GP7IUgCJCkgG4LrbmiF+Wmeo2ZPpxnm4qDgDx9DRiQAUw1R1b+/cQgBQRCID5WSt1g0oHOyJCAJAJdgGQ5Qna3CyQNoDrwgO6XfraXuuDB1QA071ra/qHAKRMSjxg1exVMQ/Yt29fKypoVHqwZwvbXLDCjDRYfENcsIUGk828J4StPWjBieAgNPLIffzxx+22HvHt+eeft4uekrVEANKfcbzrhPiPTAybXcoeN2RPyKSwSAkBJS1KDGjaDw55QOJebW4WSAkg0EjRKAE/UzBMxaCGCeRJrZFue+CBB6w4QXXSeNkM9YV4BtQoRafcdI4BzExVUFFNA0BWyVFJDdjkh9lwiJo/gEDM8OowoGK6h2kfilZlO49EACJYmApC9LAtL6vuUO1MtpOBIWVIgSriRuI3rkUBdAMnU71CAJ5++ukxD1ityuqYB5QdqTgpUzV4Kt6WBIDsvUy5OzeXok8BkKJSPCo/Kd9nHABSO8iNZ9OhESNGrHHDWVlW3eKl8Ja8vIbjsSvWihUrLCBUZX/00UcWaHLMqPGg14ovxwJOxhEyADbFrRwbDwiUFMAefPDB5ttvvw3Na0YFkMJXGiKE42pzs4ATgMFDlXcMiGcViN0+QuZLu9JVwTyCFUDXuxXuFwIQTyYxYEFOiabiHGyKCgZAebsTmxSpB3Qw3H9dQgASpMtEdGGuUQAd7AiAJe0GWQ9IvMw+gQqgg+ESAUg8JwBWz8tKCCBLJOnD++FY7UbWg3fMkQkRhcmxqfnr06ePXdk2ceJEu0Mq+/QRmxHLkS9GQROfERciQogFyVqw6yk3kyWUxIOsluOxePjhh9v0HguiKIRlp1TiOkRQs2bNSn1qKcMi40KBQHkVpAIgHlAAZKWgNjcLhDxgMgCDuWABEHHBTSeni2Dg5sr6XU5N0E9AjoIm/4vSpaqafmy9QQqMFWns/8LOVWxgxCo1qq+ffPJJ884771jQUNlkFphOAWSmVvgdHofNj8jzIiRkuWfwY7MMlOOUd0GqAugGW6JeIQBHjhwZ84A18rMjP4JlR1JyrWy5SwMYQCQ3y+ZFQAhY5ImTNfLF5IrxjPELz4MVOKkmosu7IHV124EhD8hSA21uFigFoIgQHwBdTp0KGpdjSJ9MHytdFQyAeHoaIoS1x9rcLBACkHk5AbBm1SqRPaDLqTMNTUUuywRA5kVpiBAF0IWANX2cAGRPQOr55FHKSjeJudi9PpjKCp4agcLWGcFi1fLyWokAJL7kES4FqS5miTIRrQC6WDZxnxCARUVFMQ9Yq1pOzAPye3n5IIqXxUBsFgRg7NtCnIe6JfYjT0weGGUqjb+RNyb+Y7OgL774wqbCgJgiViaeKVJF1b744ov2eJyTFx+yxpZMDDWE7M6KoEBh86hDdaK8yciQ6otvqPVJkybZ8cSg5bVD6qo2A0IeELWuzc0CTgByoynmRDigKgmy2TELgEhpNWjQwKbSyOG+/vrrZty4cXZnLHK4PJJeffVV+1gCHnK0gMsmQ6TqmI5hFRmbE3EOpmh4yQ3qlqprpmdQ12zXywZJ/J7cLmk6eTUWjz8gSwQgk+tcG+cqr4JUBdANtkS9QgByYyUGrF2Qu97GgBQQoKCBnJbpeDJdEQKAkpvmCxfbXyf6fak0I9MGsNJYxvGDkglRAB2NlaBbCEAeq/LtrVOYt956wPjPUdEecGXr/iEPKNscR78tlWdkCMChQ4fGJqLrVs+PAUiGBPFBoxqG2AvBIcpTdlDl96TcqNtr3rx5rACVukD2n2YMapqJ5XSgSbWjQbJjyUsWyaIQA5566qmhHVIpDzv55JNDdzuKChYAuU4e3wqg+xcoBCD5XMkF16tRNQYgdYJAxHQKAKJqWYiNWuUGYni28BVQAJPNg1C7VEQjMFDNKFpWwMUDyKZFFKdSM4gKRizIml4KW0n7cU6KJciukM4jHYfoKSsG5LOg3st7h1QARFgJgImqut1vSeXq6QSgTGeIBwQ+QCI3yw3mbZQ33XSTvQHkfPkJqChaFDLFAEBHgA6UwIiiFg/K+0PYv5kqaIpSqYrmhjKG4xDgk2mQV7MypUPZP1M+ZQHIeGCmgBUlThU2ahyYmZ5BwWdih1QFMPqXJgQgc3MSA9avWW29jQFZa0IRhLR0HuepTBXlEbyiVb/Ywn28rXrAVFZe+/e0AXQ/dOXoiQoOAkgMSMypzc0CIQDZXFI8YINaBbou2MGGAiCvEaPhARVAB8P910UBdLdVwp4KoJ8BQwCiWMUDNqxdqB7QwbYAuLxlX/siRfGAFNJqc7OAAuhmp6S9pkwca7r0HqkARrRjCEDK4cUDNqpTXT1gCqOywL6oea71gBRZiAcMvs0p4n2pNMMUwIi3GvjYskQ8oAIYzZAhAKm3kzRS47o11AMmsanAJx6wuEUf6wGZgEcFk+LT5maBEIC8u4OsBYZsUq+mApjAhkH48ICTiQF7jYgByEsb5Z0qbregcvcKAYgpKCZl9VrTJo1Ns4m6x0lKPLJzzNTu423ZP1kUVcApLRbqUApA/kpVM1vm0uQdvTJK/50Ve/9x0D4UWmgVTHrwWfsF35aZ/nAdoRbws4AC6Gc/He1pAQXQ04A63M8CCqCf/XS0pwUUQE8D6nA/CyiAfvbT0Z4WUAA9DajD/SygAPrZT0d7WkAB9DSgDvezgALoZz8d7WkBBdDTgDrczwIKoJ/9dLSnBRRATwPqcD8LKIB+9tPRnhZQAD0NqMP9LKAA+tlPR3taQAH0NKAO97OAAuhnPx3taQEF0NOAOtzPAgqgn/10tKcFFEBPA+pwPwsogH7209GeFlAAPQ2ow/0soAD62U9He1pAAfQ0oA73s4AC6Gc/He1pAQXQ04A63M8CCqCf/XS0pwUUQE8D6nA/CyiAfvbT0Z4WUAA9DajD/SygAPrZT0d7WkAB9DSgDvezgALoZz8d7WkBBdDTgDrczwIKoJ/9dLSnBRRATwPqcD8LKIB+9tPRnhZQAD0NqMP9LKAA+tlPR3taQAH0NKAO97OAAuhnPx3taQEF0NOAOtzPAv8HCR7HeqYpWIEAAAAASUVORK5CYII=</thumbnail><scenes select="1"><scene name="2001"><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="label %&apos;text&apos; of size %&apos;size&apos;" type="command" category="pen"><comment x="0" y="0" w="90" collapsed="false">LABEL will stamp text on the stage at the given font size. The direction of the text is the direction the sprite is facing, and color will match the pen color.</comment><header></header><code></code><translations></translations><inputs><input type="%txt">Hello!</input><input type="%n">12</input></inputs><script><block s="doRun"><block s="reportJSFunction"><list><l>text</l><l>size</l></list><l>var stage = this.parentThatIsA(StageMorph),&#xD;    context = stage.penTrails().getContext(&apos;2d&apos;),&#xD;    rotation = radians(this.direction() - 90),&#xD;    trans = new Point(&#xD;      this.center().x - stage.left(),&#xD;      this.center().y - stage.top()&#xD;    ),&#xD;    isWarped = this.Warped,&#xD;    len,&#xD;    pos;&#xD;&#xD;if (isWarped) {endWarp(); }&#xD;context.save();&#xD;context.font = size + &apos;px monospace&apos;;&#xD;context.textAlign = &apos;left&apos;;&#xD;context.textBaseline = &apos;alphabetic&apos;;&#xD;context.fillStyle = this.color.toString();&#xD;len = context.measureText(text).width;&#xD;trans = trans.multiplyBy(1 / stage.scale);&#xD;context.translate(trans.x, trans.y);&#xD;context.rotate(rotation);&#xD;context.fillText(text, 0, 0);&#xD;context.translate(-trans.x, -trans.y);&#xD;context.restore();&#xD;pos = new Point(&#xD;  len * Math.sin(radians(this.direction())),&#xD;  len * Math.cos(radians(this.direction())));&#xD;pos = pos.add(new Point(this.xPosition(), this.yPosition()));&#xD;this.gotoXY(pos.x, pos.y, false);&#xD;this.changed();&#xD;if (isWarped) {this.startWarp(); }&#xD;stage.changed();</l></block><list><block var="text"/><block var="size"/></list></block></script></block-definition><block-definition s="map %&apos;function&apos; over %&apos;lists&apos;" type="reporter" category="lists"><header></header><code></code><translations></translations><inputs><input type="%repRing"></input><input type="%mult%l"></input></inputs><script><block s="doWarp"><script><block s="doDeclareVariables"><list><l>mapone</l><l>mapmany</l></list></block><block s="doSetVar"><l>mapone</l><block s="reifyScript"><script><block s="doIf"><custom-block s="empty? %l"><block var="data"/></custom-block><script><block s="doReport"><block s="reportNewList"><list></list></block></block></script></block><block s="doReport"><block s="reportCONS"><block s="evaluate"><block var="function"/><list><block s="reportListItem"><l>1</l><block var="data"/></block></list></block><block s="evaluate"><block var="mapone"/><list><block s="reportCDR"><block var="data"/></block></list></block></block></block></script><list><l>data</l></list></block></block><block s="doSetVar"><l>mapmany</l><block s="reifyScript"><script><block s="doIf"><custom-block s="empty? %l"><block s="reportListItem"><l>1</l><block var="data lists"/></block></custom-block><script><block s="doReport"><block s="reportNewList"><list></list></block></block></script></block><block s="doReport"><block s="reportCONS"><block s="evaluate"><block var="function"/><custom-block s="map %repRing over %mult%l"><block s="reifyReporter"><autolambda><block s="reportListItem"><l>1</l><l/></block></autolambda><list></list></block><list><block var="data lists"/></list></custom-block></block><block s="evaluate"><block var="mapmany"/><list><custom-block s="map %repRing over %mult%l"><block s="reifyReporter"><autolambda><block s="reportCDR"><l/></block></autolambda><list></list></block><list><block var="data lists"/></list></custom-block></list></block></block></block></script><list><l>data lists</l></list></block></block><block s="doIfElse"><custom-block s="empty? %l"><block s="reportCDR"><block var="lists"/></block></custom-block><script><block s="doReport"><block s="evaluate"><block var="mapone"/><list><block s="reportListItem"><l>1</l><block var="lists"/></block></list></block></block></script><script><block s="doReport"><block s="evaluate"><block var="mapmany"/><list><block var="lists"/></list></block></block></script></block></script></block></script></block-definition><block-definition s="empty? %&apos;data&apos;" type="predicate" category="lists"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doReport"><block s="reportEquals"><block var="data"/><block s="reportNewList"><list></list></block></block></block></script></block-definition><block-definition s="keep items such that %&apos;pred&apos; from %&apos;data&apos;" type="reporter" category="lists"><header></header><code></code><translations></translations><inputs><input type="%predRing"></input><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doIf"><custom-block s="empty? %l"><block var="data"/></custom-block><script><block s="doReport"><block s="reportNewList"><list></list></block></block></script></block><block s="doIfElse"><block s="evaluate"><block var="pred"/><list><block s="reportListItem"><l>1</l><block var="data"/></block></list></block><script><block s="doReport"><block s="reportCONS"><block s="reportListItem"><l>1</l><block var="data"/></block><custom-block s="keep items such that %predRing from %l"><block var="pred"/><block s="reportCDR"><block var="data"/></block></custom-block></block></block></script><script><block s="doReport"><custom-block s="keep items such that %predRing from %l"><block var="pred"/><block s="reportCDR"><block var="data"/></block></custom-block></block></script></block></script></block></script></block-definition><block-definition s="combine with %&apos;function&apos; items of %&apos;data&apos;" type="reporter" category="lists"><header></header><code></code><translations></translations><inputs><input type="%repRing"></input><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doIf"><custom-block s="empty? %l"><block s="reportCDR"><block var="data"/></block></custom-block><script><block s="doReport"><block s="reportListItem"><l>1</l><block var="data"/></block></block></script></block><block s="doReport"><block s="evaluate"><block var="function"/><list><block s="reportListItem"><l>1</l><block var="data"/></block><custom-block s="combine with %repRing items of %l"><block var="function"/><block s="reportCDR"><block var="data"/></block></custom-block></list></block></block></script></block></script></block-definition><block-definition s="if %&apos;test&apos; then %&apos;true&apos; else %&apos;false&apos;" type="reporter" category="control"><header></header><code></code><translations></translations><inputs><input type="%b"></input><input type="%anyUE"></input><input type="%anyUE"></input></inputs><script><block s="doIfElse"><block var="test"/><script><block s="doReport"><block s="evaluate"><block var="true"/><list></list></block></block></script><script><block s="doReport"><block s="evaluate"><block var="false"/><list></list></block></block></script></block></script></block-definition><block-definition s="for %&apos;i&apos; = %&apos;start&apos; to %&apos;end&apos; %&apos;action&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%upvar"></input><input type="%n">1</input><input type="%n">10</input><input type="%cs"></input></inputs><script><block s="doDeclareVariables"><list><l>step</l><l>tester</l></list></block><block s="doIfElse"><block s="reportGreaterThan"><block var="start"/><block var="end"/></block><script><block s="doSetVar"><l>step</l><l>-1</l></block><block s="doSetVar"><l>tester</l><block s="reifyReporter"><autolambda><block s="reportLessThan"><block var="i"/><block var="end"/></block></autolambda><list></list></block></block></script><script><block s="doSetVar"><l>step</l><l>1</l></block><block s="doSetVar"><l>tester</l><block s="reifyReporter"><autolambda><block s="reportGreaterThan"><block var="i"/><block var="end"/></block></autolambda><list></list></block></block></script></block><block s="doSetVar"><l>i</l><block var="start"/></block><block s="doUntil"><block s="evaluate"><block var="tester"/><list></list></block><script><block s="doRun"><block var="action"/><list></list></block><block s="doChangeVar"><l>i</l><block var="step"/></block></script></block></script></block-definition><block-definition s="join words %&apos;words&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%mult%txt"></input></inputs><script><block s="doWarp"><script><block s="doIf"><custom-block s="empty? %l"><block s="reportCDR"><block var="words"/></block></custom-block><script><block s="doReport"><block s="reportListItem"><l>1</l><block var="words"/></block></block></script></block><block s="doReport"><block s="reportJoinWords"><list><block s="reportListItem"><l>1</l><block var="words"/></block><l> </l><custom-block s="join words %mult%txt"><block s="reportCDR"><block var="words"/></block></custom-block></list></block></block></script></block></script></block-definition><block-definition s="list $arrowRight sentence %&apos;data&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doReport"><custom-block s="join words %mult%txt"><block var="data"/></custom-block></block></script></block></script></block-definition><block-definition s="sentence $arrowRight list %&apos;text&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%txt"></input></inputs><script><block s="doWarp"><script><block s="doReport"><block s="reportTextSplit"><block var="text"/><l><option>whitespace</option></l></block></block></script></block></script></block-definition><block-definition s="catch %&apos;tag&apos; %&apos;action&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%upvar"></input><input type="%cs"></input></inputs><script><block s="doCallCC"><block s="reifyScript"><script><block s="doSetVar"><l>tag</l><block var="cont"/></block><block s="doRun"><block var="action"/><list></list></block></script><list><l>cont</l></list></block></block></script></block-definition><block-definition s="throw %&apos;cont&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%s">catchtag</input></inputs><script><block s="doRun"><block var="cont"/><list></list></block></script></block-definition><block-definition s="catch %&apos;tag&apos; %&apos;value&apos;" type="reporter" category="control"><header></header><code></code><translations></translations><inputs><input type="%upvar"></input><input type="%anyUE"></input></inputs><script><block s="doCallCC"><block s="reifyScript"><script><block s="doSetVar"><l>tag</l><block var="cont"/></block><block s="doReport"><block s="evaluate"><block var="value"/><list></list></block></block></script><list><l>cont</l></list></block></block></script></block-definition><block-definition s="throw %&apos;tag&apos; %&apos;value&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%s">catchtag</input><input type="%s"></input></inputs><script><block s="doRun"><block var="tag"/><list><block var="value"/></list></block></script></block-definition><block-definition s="for each %&apos;item&apos; of %&apos;data&apos; %&apos;action&apos;" type="command" category="lists"><header></header><code></code><translations></translations><inputs><input type="%upvar"></input><input type="%l"></input><input type="%cs"></input></inputs><script><block s="doUntil"><custom-block s="empty? %l"><block var="data"/></custom-block><script><block s="doSetVar"><l>item</l><block s="reportListItem"><l>1</l><block var="data"/></block></block><block s="doRun"><block var="action"/><list><block s="reportListItem"><l>1</l><block var="data"/></block></list></block><block s="doSetVar"><l>data</l><block s="reportCDR"><block var="data"/></block></block></script></block></script></block-definition><block-definition s="if %&apos;test&apos; do %&apos;action&apos; and pause all $pause-1-255-220-0" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%boolUE"></input><input type="%cs"></input></inputs><script><block s="doDeclareVariables"><list><l>breakpoint</l></list></block><block s="doIf"><block s="evaluate"><block var="test"/><list></list></block><script><block s="doSetVar"><l>breakpoint</l><block var="test"/></block><block s="doShowVar"><l>breakpoint</l></block><block s="doRun"><block var="action"/><list></list></block><block s="doPauseAll"></block><block s="doHideVar"><l></l></block></script></block></script></block-definition><block-definition s="word $arrowRight list %&apos;word&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%txt"></input></inputs><script><block s="doWarp"><script><block s="doReport"><block s="reportTextSplit"><block var="word"/><l><option>letter</option></l></block></block></script></block></script></block-definition><block-definition s="ignore %&apos;x&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%s"></input></inputs></block-definition><block-definition s="tell %&apos;sprite&apos; to %&apos;action&apos;" type="command" category="control"><header></header><code></code><translations></translations><inputs><input type="%s">Sprite</input><input type="%cs"></input></inputs><script><block s="doRun"><block s="reportAttributeOf"><block var="action"/><block var="sprite"/></block><list></list></block></script></block-definition><block-definition s="ask %&apos;sprite&apos; for %&apos;expression&apos;" type="reporter" category="control"><header></header><code></code><translations></translations><inputs><input type="%s">Sprite</input><input type="%repRing"></input></inputs><script><block s="doReport"><block s="evaluate"><block s="reportAttributeOf"><block var="expression"/><block var="sprite"/></block><list></list></block></block></script></block-definition><block-definition s="list $arrowRight word %&apos;list&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doReport"><block s="reportJoinWords"><block var="list"/></block></block></script></block></script></block-definition><block-definition s="employee, name: %&apos;name&apos; job title: %&apos;title&apos; salary: %&apos;salary&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input><input type="%s"></input></inputs><script><block s="doReport"><block s="reportNewList"><list><block var="name"/><block var="title"/><block var="salary"/></list></block></block></script></block-definition><block-definition s="name from employee %&apos;employee&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doReport"><block s="reportListItem"><l>1</l><block var="employee"/></block></block></script></block-definition><block-definition s="job title from employee %&apos;employee&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doReport"><block s="reportListItem"><l>2</l><block var="employee"/></block></block></script></block-definition><block-definition s="salary from employee %&apos;employee&apos;" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs><input type="%l"></input></inputs><script><block s="doReport"><block s="reportListItem"><l>3</l><block var="employee"/></block></block></script></block-definition></blocks><stage name="Stage" width="480" height="360" costume="0" color="255,255,255,1" tempo="60" threadsafe="false" penlog="false" volume="100" pan="0" lines="round" ternary="true" hyperops="true" codify="false" inheritance="false" sublistIDs="false" id="562"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAAAXNSR0IArs4c6QAADoVJREFUeF7t1cEJAAAIxDDdf2m3sJ+4wEEQuuMIECBAgACBd4F9XzRIgAABAgQIjAB7AgIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECByxcQFpoRMBzwAAAABJRU5ErkJggg==</pentrails><costumes><list struct="atomic" id="563"></list></costumes><sounds><list struct="atomic" id="564"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="1"><sprite name="Sprite" idx="1" x="0" y="-1.4210854715202004e-13" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" costume="0" color="80,80,80,1" pen="tip" id="569"><costumes><list struct="atomic" id="570"></list></costumes><sounds><list struct="atomic" id="571"></list></sounds><blocks></blocks><variables></variables><scripts><script x="10" y="13.333333333333329"><block s="doSetVar"><l>employee database</l><block s="reportNewList"><list><custom-block s="employee, name: %s job title: %s salary: %s"><l>Ben Bitdiddle</l><l>computer wizard</l><l>60000</l></custom-block><custom-block s="employee, name: %s job title: %s salary: %s"><l>Alyssa P Hacker</l><l>computer programmer</l><l>40000</l></custom-block><custom-block s="employee, name: %s job title: %s salary: %s"><l>Cy D Fect</l><l>computer programmer</l><l>35000</l></custom-block><custom-block s="employee, name: %s job title: %s salary: %s"><l>Lem E Tweakit</l><l>computer technician</l><l>25000</l></custom-block><custom-block s="employee, name: %s job title: %s salary: %s"><l>Louis Reasoner</l><l>computer programmer trainee</l><l>30000</l></custom-block><custom-block s="employee, name: %s job title: %s salary: %s"><l>Oliver Warbucks</l><l>big wheel</l><l>650000</l></custom-block><custom-block s="employee, name: %s job title: %s salary: %s"><l>Eben Scrooge</l><l>chief accountant</l><l>75000</l></custom-block><custom-block s="employee, name: %s job title: %s salary: %s"><l>Robert Cratchet</l><l>accounting scrivener</l><l>18000</l></custom-block><custom-block s="employee, name: %s job title: %s salary: %s"><l>Aull DeWitt</l><l>secretary</l><l>25000</l></custom-block></list></block></block></script><script x="10" y="264.6666666666667"><custom-block s="job title from employee %l"><l/></custom-block></script><script x="161.66666666666663" y="429.66666666666674"><block s="reportCombine"><block s="reportKeep"><block s="reifyPredicate"><script></script><list></list></block><block var="employee database"/></block><block s="reifyReporter"><autolambda><block s="reportVariadicSum"><list><l></l><l></l></list></block></autolambda><list></list></block></block></script><script x="51.66666666666666" y="325"><block s="reportCombine"><custom-block s="map %repRing over %mult%l"><block s="reifyReporter"><autolambda><custom-block s="salary from employee %l"><l/></custom-block></autolambda><list></list></block><list><block s="reportKeep"><block s="reifyPredicate"><autolambda><block s="reportLessThan"><custom-block s="salary from employee %l"><l/></custom-block><l>100000</l></block></autolambda><list></list></block><block var="employee database"/></block></list></custom-block><block s="reifyReporter"><autolambda><block s="reportVariadicSum"><list><l></l><l></l></list></block></autolambda><list></list></block></block></script><script x="225.17154947916663" y="269"><custom-block s="name from employee %l"><l/></custom-block></script><script x="541.2819010416666" y="298"><block s="reportGreaterThan"><l></l><l>100000</l></block></script></scripts></sprite><watcher var="employee database" style="normal" x="10" y="10" color="243,118,29" extX="219.5615234375" extY="197"/></sprites></stage><variables><variable name="employee database"><list id="693"><item><list struct="atomic" id="694">Ben Bitdiddle,computer wizard,60000</list></item><item><list struct="atomic" id="695">Alyssa P Hacker,computer programmer,40000</list></item><item><list struct="atomic" id="696">Cy D Fect,computer programmer,35000</list></item><item><list struct="atomic" id="697">Lem E Tweakit,computer technician,25000</list></item><item><list struct="atomic" id="698">Louis Reasoner,computer programmer trainee,30000</list></item><item><list struct="atomic" id="699">Oliver Warbucks,big wheel,650000</list></item><item><list struct="atomic" id="700">Eben Scrooge,chief accountant,75000</list></item><item><list struct="atomic" id="701">Robert Cratchet,accounting scrivener,18000</list></item><item><list struct="atomic" id="702">Aull DeWitt,secretary,25000</list></item></list></variable></variables></scene></scenes></project><media name="2001" app="Snap! 7, https://snap.berkeley.edu" version="2"></media></snapdata>