<snapdata remixID="9303410"><project name="U5L9disease" app="Snap! 5.4, http://snap.berkeley.edu" version="1"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAApjSURBVHhe7dt5TFVXHgfw32MRMCoERcANFwTU4Q/iWveJQtQ2qVrTjsYlOmoaE+247+NoDI4a4xrjWlupcWpiW1OruMVdwb2MFtRRlIxoFVBRUZFl3vfnvc8H9RlQ25Mh309y8+499727nPu957x7HjhKnYTIEC/rlciIMi0gZnNzc+XFixdWiTl+fn4SHBxsLVFV5QpgVlaW3LhxQ8LCwsTHx0dXvk/+/v5yJ/OyZPxy0bnkudf38vKWNl16SmFRsd4M0dHRUrduXWstVTUawMLCQjl+/LiEh4dbxe/f1ZPJ4rU3UaKDfa0Sz6r9eYwU/OkTnb9796507dpV56nq0QBeunRJiouLtSAtLU1SUlIkICBAfH19tRts166d7NixQ4YNGyb5+fmSmpoq165dk+7du0teXp5+1uFwOFsvL6lZs6Y8ePBAmjdvLqdPn9buvH///nJmZ5J8cv9f4u3l0P14hcVItZ5/k8LkRVKSc13LbD49vpArYfE6j23HxcXpPFU9+hBSUFAgaAUxoRVEt4fuD+FDDz1//nxp3769PHr0SJKSkiQiIkICAwN1Awhidna2ZGZmSklJiW4rPT1du/Fnz55p14vtlpaU7XYdgWFSfD1FHMENrBI3zrfax4P9U9WlAQwNDdVw4YLjyz9ask6dOklkZKRERUXJqFGjtItGmBISEiQjI0OaNWumn6lfv77k5ORITEyMPH/+XEJCQjTEaBmLiookNjZWt1tSLkjFV46Iw6+Gvr6OHUB0wVR1uR5Ctm3b9tZf9oOCgrTbfZMX97Ol9fXN4lf63CrxwPkQ8ktogjyp305bVHTB8fEvu2OqelwBxMU+duyYqzs2Dd9B8X2yQ4cOVglVRa4AEpnAX0LIKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjGIAySgGkIxiAMkoBpCMYgDJKAaQjHKUOlnz6t85z2XGyTxJziqwSojeXa9G1SXxg2CJreNnlbxUJoBPi0oldGOmLO9aR4a3qGWVEr27Ten58sWRHPn1r00kwMdhlZYL4LQTueLlXJf4QW2rhOj9mXEyV0qcaftnx1f5KvMd8L+Pi8Tf+1U6id4nZAsZc1cmgMWIp+XQoUM6paWl6WtFVPR9th07dlhzb6/8Pl93DO5lSUlJ1twr9vrKHn95O3fulLlz58rZs2etEtFlOHDggL6+LU/H9t1337n2gdcVK1boezH/9OlTLT927JhrvjIqe312795tzXnmnjHw/oeTNS/b//NYQgK8pVv9APn66691OnXqlDx79kwv3JEjR+TixYty+/Zt6d27t+Tn50vLli2lqKhIxowZoxegUaNGMmfOHKlRo4Z8/vnn8tNPP0lISIisXbtWTp8+LV5eXjJ79mzx9/fXytuzZ498+OGHMmnSJElISNCK279/v5w7d04ePnwoS5Ys0W199tlnWrG1a9eWefPmyYULF8TX11cOHjwomzZtkh9//FECAwP189jH6tWrJTo6WmbNmiV79+6VgQMH6jliP5mZmbJ+/Xrp06ePbmP48OHSuHFjLfv222/1eO1zaNasme4X26lZs6YeI7a7bt063W61atVc6xwOh0RGRsqlS5ekdevWsm/fPpk+fbpMnjxZ6+/u3buycuVK6dKli9Yf1jdo0EASExNl48aNkpGRofWBety6dat89NFHMmPGDNm+fbvud8OGDdK5c2c9D1tKSorWU9OmTWXZsmVaTwhO//795auvvpLu3bvL0qVLpbi4WOt05syZEh4eLvPnz5datWrJ4MGD5fDhw3oeqBvUExqdKVOmaF3ExMS43vvpp5/qMaN+cB6XL1/WYNt1hWPB/jw5fOup5DwtlgGRNaySSgzDIFiouMePH+sJYYc4gLp162rlRUREaOXgZJo0aaIhhcWLF2sZAofw4gSw/urVq7oeFdW2bVvp27evLgMqacGCBVo5a9as0QDk5eXJli1bdFvltW/fXkOFk8c0fvx4qVevnuzatUvCwsI0DO46duyoN09qaqou25+LioqSVq1a6T5wQe/cuaPrIS4uTk6cOCHXr1+XXr166c2EOnBfh3LcrKNGjdLy+Ph4DWZOTo4uo67u378v58+fFz8/P5k2bZp8+eWX4uPjI8nJyfoenHfPnj3l3r17smjRIm0AEBgcG7YNI0aMcLV6qMsWLVpouPG5kSNHark71N/HH3+srTDqYvPmzdKwYUNdh+2ioUHw7Xr6/vvvZejQoboOdYH3IuQ49nHjxmkZAnnmzJnf1NXx48f1taI8BrBbt26abEyYRyX9/PPPujxo0CC9S0ePHq3vnTBhgr5Cv379tCVApeEk0Crh84ATQuVhPQKLSkGl4aK639kLFy7Uux4TKtq+qzDfo0cP/SygYrBtXCz7PYDPQZs2bfTVHY4JdzjWBQcHaxm2gYuEV0w4B0B4bbjxsM7uMNz3Z68D3GjucMHq1Kmj87iJ0GMAbkD0ALjZ0KpPnTrVtQ3UM26qIUOGuPaDG8zeNkKL6wAIQHp6uoYbPRFaQdQrbj60YoA6BmwPNwfqwIb3AlpAu3zixInabeNYUd+A6zh27FhtiOzjRO9Qvq46deqkrxWGp2DbX3bfLp2bmmst/TGcXahONvd5d8uXL7fm/j85v1ZYcy85WyFrrmI81UtFHD16tLSgoMBa+q2bN2+WOm8sa+ntOVtRa+71kC1kzF2ZYZiByXekRXA1+Xu7ly0D0fs071SepOcVytZer3oW/hRHRnlsAZ88eaLfbfBEiYnIk6CgIPH29hZnVy4//PCDlJSUWGtEYmNjXd9BX9cCegwgnnBu3bql5QggHhyIbMgDchEQEKAPShj1wNAYRhHc5ebmajAxylHpACLVGCfDxFaQykMmkA08Ga9atUqfqAsLC621L2HoKCsrS8c9Kx1APPYj4XhERxiJwO4N8YopNDRUx4YHDBjgCiDGEjGojbHDGzdu6KB6pQOIgdbq1avroCkDSOXZAcR4qnsAMUiPgX6MIeKXkjcF8I39KkJnT2hu3Zc5cfL0bIBuF2GsiDcGEL9+2CknehP0kjb8ZIuu1/am54cyXfDgvb9KVJCvdsH47Q/f/eyUM4TkCR5EMGy3bds2/e0bf/gAiFZ2drYOxeB3cXTBVx68kG8SQnU9lAkg/yCV3sWjR49cf+Bhw18H4S+N4HV/kFomgPyTfPq9VOhP8oH/lES/hwr9UxLRH0vkfyaD3o7ujJNGAAAAAElFTkSuQmCC</thumbnail><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" codify="false" inheritance="false" sublistIDs="false" scheduled="true" id="1"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAK1SURBVHhe7cExAQAAAMKg9U9tDB8gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgIsajf4AAXBXLv8AAAAASUVORK5CYII=</pentrails><costumes><list struct="atomic" id="2"></list></costumes><sounds><list struct="atomic" id="3"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites><sprite name="Person" idx="1" x="0" y="0" heading="24" scale="1" volume="100" pan="0" rotation="1" draggable="true" hidden="true" costume="2" color="80,80,80,1" pen="tip" id="8"><costumes><list id="9"><item><costume name="sick" center-x="6" center-y="6.5" image="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAAwAAAANCAYAAACdKY9CAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAADeSURBVChTjZIxTgMxEEX/n92IA0DFJUCKRJQKGmALKkTBCThGUHIMDkGdKA1UKF24ACV3YNmdYbyZAqTdmCdZnv/9bXlkow/DzVEaIf/AmKG4vsXIHmC8oPAgeab2BdoLvvkkWD0nr9ugUs1YYp7qIazBo+hyQS2vziiyCX8vpjoRv8J96DyeFRTtOGQez4o3cBgyj2fF+65D/gPWAvIjVB7PetO2DpnHs7t3KC+3lOKkMwcwbd+lWZ96D07DO7deu7oXX+syv75GQlGdU5qpWXGcNNl+mpZvgmUcBvwAxdpF1qMshv0AAAAASUVORK5CYII=" id="10"/></item><item><costume name="healthy" center-x="8" center-y="6.75" image="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAA4AAAAOCAYAAAAfSC3RAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAADbSURBVDhPlZHrDcIwDIQvCaFFSFCWYAYeGyGGYSkEEyBgAP5SgkC82mA3QUBR1fBJae3ruZYd/NAyE+h0DW3O7lDMWgnh3w592EPJxGcl8hSXbs8nH4Xa5FDi+0dlrLW4diSHxQOR2dUWMYI87OWwECJjSSzCWqgpdRUSysyCixj2Uo2grW2gVN/LYWTZlmYUK5/+gVhR33yE+DT3ShiX9tgNF3IVLzLazr0j3XU0MC22VQd72Eu8u6h0gYYcVG6Yix75Elky9MonNG/T3BAf7ddhjb+FwcYqM/AEUrRPXhMyQHEAAAAASUVORK5CYII=" id="11"/></item></list></costumes><sounds><list struct="atomic" id="12"></list></sounds><blocks></blocks><variables></variables><scripts><script x="221" y="10"><block s="receiveOnClone"></block><custom-block s="cloneInitialize"></custom-block><block s="doForever"><script><block s="doIf"><block s="reportGreaterThan"><block var="time elapsed"/><l>0</l></block><script><block s="bounceOffEdge"></block><block s="forward"><block var="speed"/></block><block s="doIf"><block s="reportEquals"><block s="reportAttributeOf"><l><option>costume name</option></l><block s="reportGet"><l><option>self</option></l></block></block><l>healthy</l></block><script><block s="doIf"><custom-block s="collideWithSick?"></custom-block><script><block s="doSwitchToCostume"><l>sick</l></block><block s="doChangeVar"><l>infected counter</l><l>1</l></block></script></block></script></block></script></block></script></block></script><script x="14.666666666666657" y="23.666666666666657"><block s="receiveGo"></block><custom-block s="initialize"></custom-block><block s="show"></block><block s="doRepeat"><block var="population density"/><script><block s="createClone"><l><option>myself</option></l></block></script></block><block s="hide"></block><custom-block s="activateTimer"></custom-block></script></scripts></sprite><watcher var="speed" style="normal" x="12.3125" y="12.312500000000007" color="243,118,29" hidden="true"/><watcher scope="Stage" s="getTimer" style="normal" x="139.13125000000014" y="6.156257387499977" color="4,148,220" hidden="true"/><watcher var="time elapsed" style="normal" x="4.788194444444343" y="8.345146276388867" color="243,118,29"/></sprites></stage><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="doIf"><block s="reportEquals"><l></l><block s="reportListItem"><l>1</l><block var="words"/></block></block><script><block s="doReport"><custom-block s="join words %mult%txt"><block s="reportCDR"><block var="words"/></block></custom-block></block></script></block><block s="doIf"><block s="reportEquals"><l></l><block s="reportListItem"><l>2</l><block var="words"/></block></block><script><block s="doReport"><custom-block s="join words %mult%txt"><block s="reportCONS"><block s="reportListItem"><l>1</l><block var="words"/></block><block s="reportCDR"><block s="reportCDR"><block var="words"/></block></block></block></custom-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><scripts><script x="229.00000300000002" y="196.77778077777773"><block s="reportJoinWords"><list><l></l><l></l></list></block></script></scripts></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="activateTimer" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doResetTimer"></block><block s="doUntil"><block s="reportEquals"><block var="infected counter"/><block var="population density"/></block><script><block s="doSetVar"><l>time elapsed</l><block s="getTimer"></block></block></script></block><block s="doStopThis"><l><option>all but this script</option></l></block></script></block-definition><block-definition s="initialize" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>time elapsed</l><l>0</l></block><block s="doSetVar"><l>infected counter</l><l>0</l></block><block s="gotoXY"><l>0</l><l>0</l></block><block s="doAsk"><l>How densely populated is the area? 1(sparse) - 250 (very dense)</l></block><block s="doSetVar"><l>population density</l><block s="reportSum"><block s="getLastAnswer"></block><l>1</l></block></block><block s="doAsk"><l>What percentage of the population is infected initially? Enter 1-100.</l></block><block s="doSetVar"><l>percent initially sick</l><block s="getLastAnswer"></block></block><block s="doAsk"><l>How often are people interacting? Enter 1 (not much) - 10 (a lot)</l></block><block s="doSetVar"><l>speed</l><block s="getLastAnswer"></block></block></script></block-definition><block-definition s="cloneInitialize" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSwitchToCostume"><l>healthy</l></block><block s="doIf"><block s="reportLessThan"><block var="infected counter"/><block s="reportProduct"><block var="population density"/><block s="reportQuotient"><block var="percent initially sick"/><l>100</l></block></block></block><script><block s="doSwitchToCostume"><l>sick</l></block><block s="doChangeVar"><l>infected counter</l><l>1</l></block></script></block><block s="setHeading"><block s="reportRandom"><l>1</l><l>360</l></block></block><block s="gotoXY"><block s="reportRandom"><l>-240</l><l>240</l></block><block s="reportRandom"><l>-180</l><l>180</l></block></block></script></block-definition><block-definition s="collideWithSick?" type="predicate" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><custom-block s="for each %upvar of %l %cs"><l>item</l><block s="reportGet"><l><option>neighbors</option></l></block><script><block s="doIf"><block s="reportAnd"><block s="reportTouchingObject"><block var="item"/></block><block s="reportEquals"><block s="reportAttributeOf"><l><option>costume name</option></l><block var="item"/></block><l>sick</l></block></block><script><block s="doReport"><block s="reportBoolean"><l><bool>true</bool></l></block></block></script></block></script></custom-block><block s="doReport"><block s="reportBoolean"><l><bool>false</bool></l></block></block></script></block-definition></blocks><variables><variable name="speed"><l>5</l></variable><variable name="percent initially sick"><l>50</l></variable><variable name="time elapsed"><l>0</l></variable><variable name="infected counter"><l>0</l></variable><variable name="population density"><l>51</l></variable></variables></project><media name="U5L9disease" app="Snap! 5.4, http://snap.berkeley.edu" version="1"></media></snapdata>