<snapdata remixID="12178095"><project name="4.5" app="Snap! 7, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAEVxJREFUeF7tnXdUVVf2x790BNSgQFQ6iCYmmEnGMktBrBF7bEgVYUqsy0m3xZ6YNr8Yoy4rI1Es8TcyUZdjRid2I5oYlRg0BLuABAujdB7M2uet+3j33tcCyHv3es4/LLznnrPLx33uaRu7urq6OvDCLWAlC9hxAK1ked4tswAHkINgVQsYBfDWrVs4cOAASkpKQKO0nZ2dzf9s0aIFIiIi8Nxzz1nVqLxzyy1gEMBjx44hMDDQ8lZsrGZ5eTk6d+5sY1JxcQxZQAbg0aNHFQ2foKRGo0FISAj3uo1bQAQgDbs1NTUikS9fvowxY8bg4sWLCAsLQ0JCAjIyMtjPGzdu4MGDB/D29sbatWvZ89zcXJtR+fvvv8fYsWNtRh4uiNwCIgA3bNiAAQMGiGpt2rQJixcvxs6dOzF+/HhcuXKFRRb6OXDgQPazoKAA27Ztw8KFC3Hu3DmbsfP58+fxyiuv2Iw8XBAzAH788ccYN26caLIRGhqK8PBwPPPMMwxCfQB79OgBT09PpKeno1evXuy9q1ev2sxkhWTp378/97sNW0AUAT/66KMGDVn5+fno06cPrl27JhvCrak7AUhRmhfbtYAIwA8//FAWAZWw/GJsmYgDaLvgCZKJAPzggw9kETDQrwNWjvJHaxf7JtXGrglbc/PqgD7v7UdpaamoVYrIgwYNasKeeFNNbQERgMuWLWMRUCgUWfKX9kG39s7sn4ocvHDWbxx6DE+06sL0zR+OoODsQQwu/0Ynq8Pkr3Cz2p3JJRQOYFPj0vTtiQB8//33ZRHQeeUAeLvZ458tohGZMlcmgZOTE1a/9Spa5xxCQ6Kaoz0w+Xgx7ty5Y7F2tPzj7OyMhyX38Yf//IW9V5e0CflOvqI2rl+/jpdfftnidnnF5reACMD33ntPFgFdVg1kABZPOWpQOk/Pp5CfGAKHhtCn16LzirMWa+/u7s5m40uWLMHgHl2QUrqdAXjbsYMsAg4ePNjidnnF5reACMClS5fKIqDr6kHY6pWKuKRJTDoa4k6dOoX4+Hjk5eXB28sLBYlBMsntHBwRllmEn0e2gefo6WgZOQY3Xje+JOK4/Du2fCP0ITQoTIL0f/fw8NAB+Pnnn8N7TRRqE//OANQvFAGjo6Ob36q8R4stYBGAPz3zRzw7JFnUKK0PEoBeXm1RmBhssMNOu+8xAP0W78Kt+WNMCmUMQEMv0WSjrKyM7brQ+qPP2r4cQItdblsVRQDSjod0IdptzWBcfv5VdBwQJ5Jc2Hbz8fZGYZJpAIPWnEHJ1+m4n7nSqPb2/3cac+fOBX2Hmjsj+8033+gmQbTQ3G59fwbgTft2oskRRcAhQ4bYlsW5NCILyACU7p0KAIb2j9W9SIu7NBGYMGEC1q1daxBAr+QFaDN2Ju5mLEPbhNmo09Qgd7SPUfPb/S0L9vbapZ7a2lqTbiIAhUIAtt8wALWJabhp3142BA8dOpS73IYtIAKQ9nKFCCjI7LFuCC51+TNCB8QZ3GLz9/fDrVj/xqv4ySncvHmTRTBfX1+TyzzSCNhh40DUJqThut3TuvdIIPpPMmzYsMbLxlt4bBaQASiNgARgTpc/IbS/eAjWl8hhYTRqS0saLGTQliu4WmD5MsyhQ4d0ffXr1w++aYOgSUjDDbunRTJwABvskmZ7UQTgggULZLPgluuHgiYhIXpDsFQ6R00VZqXGmv12M6RVC3cPfLA5E48ePbJYaSmA/psGMwCvQzzEE4DDhw+3uF1esfktIAJw/vz5MgBbbRiGiwRgvwkGpQsMCMD1uAA4NmId0CX4eZS+usZi7Q8fPqyr27dvXwSkR0OTsBHX6uQAjhgxwuJ2ecXmt4AIwHfffVcGYOuNw/Fj5xSE9NNGOPpGo0OotMOQlZUFPz8/FE00fPK4Vd8YtHtdCxYtx5gq1cuOwdXVlVWhI/WmDkFQBBSe0xAc+MUQaOI34kqtl2ghmiLgyJEjm9+qvEeLLSACcN68eTIAn0obgexOBGB9BHRwcAAdeb9w4QJolmkMQEGKp6d/hjsrZ5oUqur9o6BLRQKApipLI2DQ5qGoid+Iq7VeotdoUsMBtJgFq1QUAUjrcNJJiOffR+JC2CQE940RCdizZ0/k5OTgqdatUZQcalT4kLRsXEkNN6tcxdLDoK1AWgeUnmqRvnzkyBHdP0VFRSEkYzgD8IqmrQzAUaNGme2bV7CeBUQAzpkzRwZgm02jcKFjMoL0AKT91e3bt7N1u67h4SYBFHZDzKlYvuQQaIuNirkJiRTA0K0jGIB5NeJhnu64cADNWd66z0UAzp49WwZg2/RXcC50IouAhg5+BgcFmQTQUvVKF/1HF/nc3NwY3MYOmhKAwjcgRcCO20aiJm4DfpEASEPw6NGjLRWB17OCBUQAzpo1S7YV5/XFaPwQkiQbgvVldV8gvsj0W/UIWHcOOQV3LX6Nro4Kha4ChG0fxQDMrfYUTV44gBab1GoVRQC+8847sgjovXkMfghORGDUeKNCPtelCy5ln6dTeb9ZEYpkNfZOv+k9KYCdvxyNagKw6ilROzQE05VSXmzXAiIA3377bVkE9NkyFmeDExDYRwug9HiUn68vCv/YBW6NWAhsEz8b1zr2M9i+oeNYxgD8ubK1KAJyAG0XPEEyEYBvvfWWLAI+nTEO3wXGIyhqvO6b7Ndff0VMTAxoPS40NATFk8IarWnJu1+jTRvtJOLevXsG2xO+CSl1iFAiIyPx7P+PRXXcelyuaC167/bt2w265ddoZXgDFlvAYgAD+9TfFaHj8FVVVewYfe/evYwCaOfkAkdPH/gu3oVrk7ubFOrBvP1o21a7jHL3runvQSmAXf4xziCAFAH177hYbBVesdksIALwjTfekEWM9tticCYgFgGR9QCSdLQQTQD2jYpCcYrhCOg5cgrce0bDLTzS7E7IvTn7WIoPKhRhTZXjx4/rHlM2rOczY1Adux455S1Fr9F9ZQ5gs7HUoI4sAvC0fywoAgpDIKW7WLVqFRwdHREZEWEUQIeW2iE1NOMXiwGk6EqRy9RWHEVA4TkNwQRgVex6XJIASEMwpRPhxXYtIALwtddek0VA3x2xyPKNQYDeEKyvTufOnXA3pVOjNSyetZel+aBy//59k+2dOHFC97x3797o+lUsqmLX4adS7UK2UCgC0rcqL7ZrAYsAPEUARhrOMkWLxo1dB/SZk4GLmlYWW0kK4Au74wwCSBGQTm3zYrsWEAE4c+ZM2TKM/854fNthPPwjtOtphpZFgoKC4OHu3iAty8pKkXflqu5dQ+3r3xGh56dPn2aTIBquKUHS7/bEMwB/fOgmGropAnIAG+SWZntJBqD0MAIBeLL9OBYBDW2N0TpgwZTfw9u14ak7KAJmV3s0OKvWi3sTUDVhHX585CYbgmNj6++yNJtVeUcWW0AE4IwZM2QRMPAfiTjRbgz8IwwPwR1DQ1A69QWLOzRWseCNTLPHsSjhJM3UhUJnEbds2YLf70tC5YR1yP6vqywCxsUZv0rQaKF5A422gAxAaQQUAPTrLd7SolyCK1asgIuzM8qmGQbQd/4O3F48AUGrTqEi9ywKl081KnD+67vg76+93ER7uMbKmjVrsGPHDnYQdvPmzaxat39NRGXMWmQ/1J4nFAolzuQANpqRx9qACMDp06fLZsFBu5JwzGc0+wY0ly2/uLgYXl5eJuvRMS4CZ9++fbJ6dA6QMi7QVcvly5czECllsLTf1NRUpKWl6f69+/5kFgEvlLjIAKT2eLFdC4gAnDZtmgzA4MyJONx2JPZcKARFPYKHTqAYKrSD8emnnyIpKYllqafMBZMnT2ZQfvvtt6AhlHL2LVq0iB1mvXTpEugABL0jFDq/R4vce/fuBeUrpOfGCmVFOHnyJHp8PYlFwPMSAAsLCxnQvNiuBUQATp06VQZgyD+T8XHlYIS/2A0HDx4EZVEliAwVWr+jS0K0nldUVMTW87p164aKigr2N0foLgmBR6ee9+zZw+7tBgQEiOCjvDNdu3Zl9bdu3WoUIFr/E5Zj/nAgFRUE4ANtGjn9ITgxMdF2rc8lE/+lJFqIpmuM+kNe6FeTWHasVW2m4cyZM/jkk09EmfD1l00IMMojTZeVvvzyS1AWq+7duzNoKYkQ5R9MTk5mEW737t1siP3ss89Ym3S/5M0332QuoeGZDpJSRKXIKU3VQdtvtB1HP5e8/mfMaXWUAXjuvpNoEkKAp6SkcDfbsAVEETAzM1N3LF6QuePuFAbg4jsvYeyU2aAsqlOmTGGPBVCFusZ+J9AIbto71j9IYOn7+u3T8E9t0Bbc+mWzkVq5iz0uJwDvOYpMTfqsXr3ahs3PRRMBSOagoU8/AobtSWUAUrlV0wr7nfvg2b7Wvehz9/IZPPz5FBLcL9R7cMa/cfKnG6IIyNPz2j7gMgCzs7NBOwhCierii5qVtp/g59604+z7Uij0nUoTIF5s2wIyAAVxKVER/X0Q4aaabauhlY4mO5SzkCYePj7GM3EpQZcnRUajAD4pBuB6WtcCHEDr2v+J750D+MQjYF0DcACta/8nvncO4BOPgHUNwAG0rv2f+N6bDMCs6RXouVKb3+9xlnS7h0iuE99+s6Q/TQXg8PjFMynKnhdL4TfcES8uEZ/asUR+oU5D9f8tfTRn3UYBuN3rEWKLtReBzrxWiZ/XV2HcDQ+4tLFD3uZqnJpSgYRHclgORJdj0H7t2b3aaoAyc+RurEbWDG19O3uADB00wRFFJzQYf9MDJ/9UgXvnNLj7fa0MQEPt/TCvErkbqhFTqJWP2qPy0jIXhM9ylskn7U/fCZa0n5tWjTN/rUR8iQcM/c0yoX9ql/4DSfU9/ddK9FjuwuSk5zkrqnB2bhXG5rnD1cfOpP7NCUxT99VkAO6PKkP0Ebd6A35ehWdnOOt+1xe86KQGPr0ckG7/EC8tdUH4HGfkfVGN0IlOuvrS/+lXt1UjOK7+ubn2hOf/HliGlw+64dzCSvxuYX3kyZHIZyqyGJJX2v5O/0fsP4qxUl5Yhxbt6vMYS/WVAii1pyn9mxqK5myvyQCUGvDHD6vgHqg1eHCsPPlQTVkdbu3R4ORfKljUuPudBm27ORgF8NcsDbx71j+XGknaHkWksFQn/CuiDEOOywGUymduaDPXPsmT/3UNjiZU6EYFfRmlAEr1ldpP+rs5/ZsTmqbs67EBSA6N+MIVeenVLAJJS4b7QySUthQBF7nZFSWXa9k3khQI+v2FBc44v6jK4DegtL3MTqWgPz1Xnl/L+ik+rcGNr2rw8JdaRO1owdrXl88cgObap+e9Nrjip+XVGJYl11cKIPUn1feF+c44v1irnxRAc/o3JRTN2VajAGxOQXlf6rQAB1CdflWMVhxAxbhKnYJyANXpV8VoxQFUjKvUKSgHUJ1+VYxWHEDFuEqdgnIA1elXxWjFAVSMq9QpKAdQnX5VjFYcQMW4Sp2CcgDV6VfFaMUBVIyr1CkoB1CdflWMVhxAxbhKnYJyANXpV8VoxQFUjKvUKSgHUJ1+VYxWHEDFuEqdgnIA1elXxWjFAVSMq9QpKAdQnX5VjFYcQMW4Sp2CcgDV6VfFaMUBVIyr1CkoB1CdflWMVhxAxbhKnYJyANXpV8VoxQFUjKvUKSgHUJ1+VYxWHEDFuEqdgnIA1elXxWjFAVSMq9QpKAdQnX5VjFYcQMW4Sp2CcgDV6VfFaMUBVIyr1CkoB1CdflWMVhxAxbhKnYJyANXpV8VoxQFUjKvUKSgHUJ1+VYxWHEDFuEqdgnIA1elXxWjFAVSMq9QpKAdQnX5VjFYcQMW4Sp2CcgDV6VfFaMUBVIyr1CkoB1CdflWMVhxAxbhKnYJyANXpV8VoxQFUjKvUKSgHUJ1+VYxWHEDFuEqdgnIA1elXxWjFAVSMq9QpKAdQnX5VjFYcQMW4Sp2CcgDV6VfFaPU/mwx+Lw1QDh0AAAAASUVORK5CYII=</thumbnail><scenes select="1"><scene name="4.5"><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="Create array" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="clear"></block><block s="setColor"><color>153,0,239,1</color></block><block s="setEffect"><l><option>ghost</option></l><l>100</l></block><block s="gotoXY"><l>-200</l><l>0</l></block><block s="doSetVar"><l>array</l><block s="reportNewList"><list></list></block></block><block s="doDeleteFromList"><l>1</l><block var="array"/></block><block s="doSetVar"><l>array lenght</l><l>20</l></block><block s="doFor"><l>i</l><l>1</l><block var="array lenght"/><script><block s="doSetVar"><l>number</l><block s="reportRandom"><l>1</l><l>100</l></block></block><block s="doAddToList"><block var="number"/><block var="array"/></block></script></block><block s="doSetVar"><l>search number</l><block s="reportRandom"><l>1</l><l>100</l></block></block></script></block-definition><block-definition s="all but first letter of %&apos;string&apos;" type="reporter" category="operators"><comment x="0" y="0" w="199" collapsed="false">Takes a text string as input, and reports a new text string containing all but the first character of the input.</comment><header></header><code></code><translations>pt:_ sem o primeiro caractere&#xD;ca:_ sense la primera lletra&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="string"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="all but first letter of %txt"><l></l></custom-block></autolambda><list></list></block><block var="string"/></block></block></script></block><block s="doReport"><block s="reportJoinWords"><block s="reportCDR"><block s="reportTextSplit"><custom-block s="require nonempty %s %s"><block var="string"/><l>All but first of empty word.</l></custom-block><l><option>letter</option></l></block></block></block></block></script></block-definition><block-definition s="all but first word of %&apos;sentence&apos;" type="reporter" category="operators"><comment x="0" y="0" w="223.000001" collapsed="false">Takes a text string as input, divides it into words treating one or more spaces as a word separator (only spaces count; punctuation is part of the word) and reports a text string containing all but the first word, with one space between words and no spaces at the beginning or end. (Note: consider using SENTENCE➞LIST and processing the resulting list instead of doing recursion on sentences in text string form.  List operations are faster.)</comment><header></header><code></code><translations>pt:_ sem a primeira palavra&#xD;ca:_ sense la primera paraula&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doIfElse"><block s="reportListIsEmpty"><block var="sentence"/></block><script><custom-block s="error %txt"><l>All but first of empty sentence.</l></custom-block></script><script><block s="doReport"><block s="reportCDR"><block var="sentence"/></block></block></script></block></script></block><block s="doReport"><custom-block s="list $arrowRight sentence %l"><block s="reportCDR"><custom-block s="require nonempty %s %s"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block><l>All but first of empty sentence.</l></custom-block></block></custom-block></block></script></block-definition><block-definition s="all but last letter of %&apos;string&apos;" type="reporter" category="operators"><comment x="0" y="0" w="218" collapsed="false">Takes a text string as input, and reports a new text string containing all but the last letter of the input.</comment><header></header><code></code><translations>pt:_ sem o último caractere&#xD;ca:_ sense la darrera lletra&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="string"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="all but last letter of %txt"><l></l></custom-block></autolambda><list></list></block><block var="string"/></block></block></script></block><block s="doReport"><block s="reportJoinWords"><block s="reportListAttribute"><l><option>reverse</option></l><block s="reportCDR"><block s="reportListAttribute"><l><option>reverse</option></l><block s="reportTextSplit"><custom-block s="require nonempty %s %s"><block var="string"/><l>All but first of empty word.</l></custom-block><l><option>letter</option></l></block></block></block></block></block></block></script></block-definition><block-definition s="all but last word of %&apos;sentence&apos;" type="reporter" category="operators"><comment x="0" y="0" w="211.99999999999997" collapsed="false">Takes a text string as input, divides it into words treating one or more spaces as a word separator (only spaces count; punctuation is part of the word) and reports a text string containing all but the last word, with one space between words and no spaces at the beginning or end.  (Note: consider using SENTENCE-&gt;LIST and processing the resulting list instead of doing recursion on sentences in text string form.  List operations are faster.)</comment><header></header><code></code><translations>pt:_ sem a última palavra&#xD;ca:_ sense la darrera paraula&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doIfElse"><block s="reportListIsEmpty"><block var="sentence"/></block><script><custom-block s="error %txt"><l>All but last of empty sentence.</l></custom-block></script><script><block s="doReport"><block s="reportListAttribute"><l><option>reverse</option></l><block s="reportCDR"><block s="reportListAttribute"><l><option>reverse</option></l><block var="sentence"/></block></block></block></block></script></block></script></block><block s="doReport"><custom-block s="list $arrowRight sentence %l"><block s="reportListAttribute"><l><option>reverse</option></l><block s="reportCDR"><block s="reportListAttribute"><l><option>reverse</option></l><custom-block s="require nonempty %s %s"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block><l>All but last of empty sentence.</l></custom-block></block></block></block></custom-block></block></script></block-definition><block-definition s="first word of %&apos;sentence&apos;" type="reporter" category="operators"><comment x="0" y="0" w="236" collapsed="false">Takes a text string as input, divides it into words treating one or more spaces as a word separator (only spaces count; punctuation is part of the word) and reports a text string containing only the first word, with no spaces before or after it.</comment><header></header><code></code><translations>pt:a primeira palavra de _&#xD;ca:primera paraula de _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIfElse"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doIfElse"><block s="reportListIsEmpty"><block var="sentence"/></block><script><custom-block s="error %txt"><l>First of empty sentence.</l></custom-block></script><script><block s="doReport"><block s="reportListItem"><l>1</l><block var="sentence"/></block></block></script></block></script><script><block s="doReport"><block s="reportListItem"><l>1</l><custom-block s="require nonempty %s %s"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block><l>First of empty sentence.</l></custom-block></block></block></script></block></script></block-definition><block-definition s="last letter of %&apos;word&apos;" type="reporter" category="operators"><comment x="0" y="0" w="260" collapsed="false">Takes a text string as input, and reports the last character in the string.</comment><header></header><code></code><translations>pt:o último caractere de _&#xD;ca:primera lletra de _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="word"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="last letter of %txt"><l></l></custom-block></autolambda><list></list></block><block var="word"/></block></block></script></block><block s="doIf"><block s="reportEquals"><block s="reportStringSize"><block var="word"/></block><l>0</l></block><script><custom-block s="error %txt"><l>Last of empty word.</l></custom-block></script></block><block s="doReport"><block s="reportLetter"><block s="reportStringSize"><block var="word"/></block><block var="word"/></block></block></script></block-definition><block-definition s="last word of %&apos;sentence&apos;" type="reporter" category="operators"><comment x="0" y="0" w="262" collapsed="false">Takes a text string as input, divides it into words treating one or more spaces as a word separator (only spaces count; punctuation is part of the word) and reports a text string containing only the last word of the input, with no spaces before or after it.</comment><header></header><code></code><translations>pt:a última palavra de _&#xD;ca:darrera paraula de _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doIfElse"><block s="reportListIsEmpty"><block var="sentence"/></block><script><custom-block s="error %txt"><l>Last of empty sentence.</l></custom-block></script><script><block s="doReport"><block s="reportListItem"><l><option>last</option></l><block var="sentence"/></block></block></script></block></script></block><block s="doReport"><block s="reportListItem"><l><option>last</option></l><custom-block s="require nonempty %s %s"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block><l>Last of empty sentence.</l></custom-block></block></block></script></block-definition><block-definition s="empty word? %&apos;word&apos;" type="predicate" category="operators"><comment x="0" y="0" w="208" collapsed="false">Takes a text string as input, and reports TRUE if the string has no characters in it of any kind, otherwise false.</comment><header></header><code></code><translations>pt:a palavra _ está vazia&#xD;ca:paraula buida? _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="word"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="empty word? %txt"><l></l></custom-block></autolambda><list></list></block><block var="word"/></block></block></script></block><block s="doReport"><block s="reportEquals"><block s="reportStringSize"><block var="word"/></block><l>0</l></block></block></script></block-definition><block-definition s="empty sentence? %&apos;sentence&apos;" type="predicate" category="operators"><comment x="0" y="0" w="221" collapsed="false">Takes a text string as input, and reports TRUE if the input contains no characters other than spaces (therefore, no words when the string is considered as a sentence), otherwise FALSE.</comment><header></header><code></code><translations>pt:a frase _ está vazia&#xD;ca:frase buida? _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="sentence"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportListIsEmpty"><block var="sentence"/></block></block></script></block><block s="doReport"><block s="reportListIsEmpty"><custom-block s="sentence $arrowRight list %txt"><block var="sentence"/></custom-block></block></block></script></block-definition><block-definition s="join words %&apos;words&apos;" type="reporter" category="operators"><comment x="0" y="0" w="230.66666666666666" collapsed="false">Like JOIN, takes any number of words (text strings) and reports a sentence with its inputs concatenated, but inserts a blank space between the inputs.&#xD;Consider using SENTENCE (Lists palette) instead.</comment><header></header><code></code><translations>de:füge Wörter zusammen _&#xD;ca:uneix les paraules _&#xD;es:unir las palabras _&#xD;fr:fusionne les mots _&#xD;pt:uma frase com as palavras _&#xD;</translations><inputs><input type="%mult%txt"></input></inputs><script><block s="doIf"><block s="reportListIsEmpty"><block var="words"/></block><script><block s="doReport"><l></l></block></script></block><block s="doDeclareVariables"><list><l>first</l><l>bf</l></list></block><block s="doSetVar"><l>first</l><block s="reportIfElse"><block s="reportIsA"><block s="reportListItem"><l>1</l><block var="words"/></block><l><option>list</option></l></block><custom-block s="join words %mult%txt"><block s="reportListItem"><l>1</l><block var="words"/></block></custom-block><block s="reportListItem"><l>1</l><block var="words"/></block></block></block><block s="doSetVar"><l>bf</l><custom-block s="join words %mult%txt"><block s="reportCDR"><block var="words"/></block></custom-block></block><block s="doIf"><custom-block s="empty sentence? %txt"><block var="bf"/></custom-block><script><block s="doReport"><block var="first"/></block></script></block><block s="doIf"><custom-block s="empty sentence? %txt"><block var="first"/></custom-block><script><block s="doReport"><block var="bf"/></block></script></block><block s="doReport"><block s="reportJoinWords"><list><block var="first"/><l> </l><block var="bf"/></list></block></block></script></block-definition><block-definition s="list $arrowRight sentence %&apos;data&apos;" type="reporter" category="operators"><comment x="0" y="0" w="165.33333333333334" collapsed="false">Takes a sentence in list form and reports the sentence as a text string.</comment><header></header><code></code><translations>de:Liste $arrowRight Satz _&#xD;ca:llista $arrowRight frase _&#xD;es:lista $arrowRight frase _&#xD;fr:liste $arrowRight phrase _&#xD;pt:uma frase com as palavras em _&#xD;</translations><inputs><input type="%l"></input></inputs><script><block s="doReport"><custom-block s="join words %mult%txt"><block var="data"/></custom-block></block></script></block-definition><block-definition s="sentence $arrowRight list %&apos;text&apos;" type="reporter" category="operators"><comment x="0" y="0" w="196" collapsed="false">Takes a sentence in text string form and reports the sentence as a list of its words.</comment><header></header><code></code><translations>de:Satz $arrowRight Liste _&#xD;ca:frase $arrowRight llista _&#xD;es:frase $arrowRight lista _&#xD;fr:phrase $arrowRight liste _&#xD;pt:uma lista com as palavras da frase _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doReport"><block s="reportKeep"><block s="reifyPredicate"><autolambda><block s="reportNot"><block s="reportEquals"><block s="reportStringSize"><l></l></block><l>0</l></block></block></autolambda><list></list></block><block s="reportTextSplit"><block var="text"/><l><option>word</option></l></block></block></block></script></block-definition><block-definition s="word $arrowRight list %&apos;word&apos;" type="reporter" category="operators"><comment x="0" y="0" w="146.42857142857144" collapsed="false">report a list in which each item is one letter from the input word</comment><header></header><code></code><translations>de:Wort $arrowRight Liste _&#xD;ca:paraula $arrowRight llista _&#xD;es:palabra $arrowRight lista _&#xD;fr:mot $arrowRight liste _&#xD;pt:uma lista com os caracteres da palavra _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIf"><block s="reportIsA"><block var="word"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="word $arrowRight list %txt"><l></l></custom-block></autolambda><list></list></block><block var="word"/></block></block></script></block><block s="doReport"><block s="reportTextSplit"><block var="word"/><l><option>letter</option></l></block></block></script></block-definition><block-definition s="list $arrowRight word %&apos;list&apos;" type="reporter" category="operators"><comment x="0" y="0" w="158.57142857142858" collapsed="false">join all the items of the input list&#xD;into a single word, and report it</comment><header></header><code></code><translations>de:Liste $arrowRight Wort _&#xD;ca:llista $arrowRight paraula _&#xD;es:lista $arrowRight palabra _&#xD;fr:liste $arrowRight mot _&#xD;pt:uma palavra com os caracteres em _&#xD;</translations><inputs><input type="%l"></input></inputs><script><block s="doIf"><block s="reportListIsEmpty"><block var="list"/></block><script><block s="doReport"><block var="list"/></block></script></block><block s="doIf"><block s="reportEquals"><block s="reportFindFirst"><block s="reifyPredicate"><autolambda><block s="reportIsA"><l></l><l><option>list</option></l></block></autolambda><list></list></block><block var="list"/></block><l></l></block><script><block s="doReport"><block s="reportJoinWords"><block var="list"/></block></block></script></block><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><block s="reportIfElse"><block s="reportIsA"><l></l><l><option>list</option></l></block><block s="reportNewList"><list><custom-block s="list $arrowRight word %l"><l/></custom-block></list></block><l></l></block></autolambda><list></list></block><block var="list"/></block></block></script></block-definition><block-definition s="sentence %&apos;phrase&apos;" type="reporter" category="lists"><comment x="0" y="0" w="302.6666666666667" collapsed="false">SENTENCE is the main constructor for sentences, represented&#xD;as lists of words.  It takes zero or more inputs, each of which can&#xD;be either a list or a text string.  If a list, the input is assumed to be&#xD;a list of words.  If a text string, it is converted to a list of words using&#xD;SENTENCE→LIST.  Then all the lists of words are appended to form a new list of words.&#xD;&#xD;If the inputs are lists of lists rather than lists of words, SENTENCE,&#xD;like APPEND, does only one level of flattening, reporting a list of&#xD;all the items of all the input lists.</comment><header></header><code></code><translations>ca:frase _&#xD;</translations><inputs><input type="%mult%s"></input></inputs><script><block s="doReport"><block s="reportConcatenatedLists"><block s="reportMap"><block s="reifyReporter"><autolambda><block s="reportIfElse"><block s="reportIsA"><l></l><l><option>list</option></l></block><l></l><custom-block s="sentence $arrowRight list %txt"><l></l></custom-block></block></autolambda><list></list></block><block var="phrase"/></block></block></block></script></block-definition><block-definition s="error %&apos;msg&apos;" type="command" category="control"><header></header><code></code><translations>pt:lança o erro _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doApplyExtension"><l>err_error(msg)</l><list><block var="msg"/></list></block></script></block-definition><block-definition s="printable %&apos;data&apos;" type="reporter" category="lists"><comment x="0" y="0" w="188.66666666666666" collapsed="false">Takes a (possibly deep) list as input,&#xD;and reports a human-readable text form &#xD;of the list (namely, Lisp notation).</comment><header></header><code></code><translations>ca:notació textual de _&#xD;</translations><inputs><input type="%l"></input></inputs><script><block s="doIf"><block s="reportNot"><block s="reportIsA"><block var="data"/><l><option>list</option></l></block></block><script><block s="doReport"><block var="data"/></block></script></block><block s="doIf"><block s="reportListIsEmpty"><block var="data"/></block><script><block s="doReport"><l>()</l></block></script></block><block s="doReport"><block s="reportJoinWords"><list><l>(</l><block s="reportCombine"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="printable %l"><l/></custom-block></autolambda><list></list></block><block var="data"/></block><block s="reifyReporter"><autolambda><block s="reportJoinWords"><list><l></l><l> </l><l></l></list></block></autolambda><list></list></block></block><l>)</l></list></block></block></script></block-definition><block-definition s="require nonempty %&apos;text&apos; %&apos;message&apos;" type="reporter" category="operators" helper="true"><comment x="0" y="0" w="220" collapsed="false">Helper function for word/sentence library.&#xD;Reports its first input, unless that input is empty, in which case it gives its second input as an error message.</comment><header></header><code></code><translations></translations><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doIfElse"><block s="reportIfElse"><block s="reportIsA"><block var="text"/><l><option>list</option></l></block><block s="reportListIsEmpty"><block var="text"/></block><block s="reportEquals"><block s="reportStringSize"><block var="text"/></block><l>0</l></block></block><script><custom-block s="error %txt"><block var="message"/></custom-block></script><script><block s="doReport"><block var="text"/></block></script></block></script></block-definition><block-definition s="first letter of %&apos;word&apos;" type="reporter" category="operators"><comment x="0" y="0" w="260" collapsed="false">Takes a text string as input, and reports the first character in the string.</comment><header></header><code></code><translations>pt:a primeira palavra de _&#xD;ca:primera lletra de _&#xD;</translations><inputs><input type="%txt"></input></inputs><script><block s="doIfElse"><block s="reportIsA"><block var="word"/><l><option>list</option></l></block><script><block s="doReport"><block s="reportMap"><block s="reifyReporter"><autolambda><custom-block s="first letter of %txt"><l></l></custom-block></autolambda><list></list></block><block var="word"/></block></block></script><script><block s="doReport"><block s="reportLetter"><l>1</l><custom-block s="require nonempty %s %s"><block var="word"/><l>First of empty word.</l></custom-block></block></block></script></block></script></block-definition><block-definition s="Contains" type="reporter" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>found</l><block s="reportBoolean"><l><bool>false</bool></l></block></block><block s="doFor"><l>i</l><l>1</l><block s="reportListAttribute"><l><option>length</option></l><block var="array lenght"/></block><script><block s="doIf"><block s="reportEquals"><block var="ramdom number"/><block s="reportListItem"><l>1</l><block var="array"/></block></block><script><block s="doSetVar"><l>found</l><block s="reportBoolean"><l><bool>true</bool></l></block></block></script></block></script></block></script></block-definition><block-definition s="Contain" type="predicate" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>found</l><block s="reportBoolean"><l><bool>false</bool></l></block></block><block s="doFor"><l>i</l><l>1</l><block var="array lenght"/><script><block s="doIf"><block s="reportEquals"><block var="ramdom number"/><block s="reportListItem"><l>1</l><block var="array"/></block></block><script><block s="doSetVar"><l>found</l><block s="reportBoolean"><l><bool>true</bool></l></block></block></script></block></script></block></script></block-definition><block-definition s="Index of" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>match</l><l>-1</l></block><block s="doFor"><l>i</l><l>1</l><block var="array lenght"/><script><block s="doIf"><block s="reportEquals"><block s="reportListItem"><block var="i"/><block var="array"/></block><block var="search number"/></block><script><block s="doSetVar"><l>match</l><block var="i"/></block></script></block></script></block></script></block-definition><block-definition s="Get ready to write" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doAsk"><l>What letter are you looking for ?</l></block><block s="doSetVar"><l>search letter</l><block s="getLastAnswer"></block></block><block s="setEffect"><l><option>ghost</option></l><l>100</l></block><block s="gotoXY"><l>-200</l><l>0</l></block><block s="setColor"><color>160,0,242,1</color></block></script></block-definition><block-definition s="Create word array" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="clear"></block><block s="doSetVar"><l>array lenght</l><l>25</l></block><block s="doSetVar"><l>match</l><l></l></block><block s="doSetVar"><l>not found</l><block s="reportBoolean"><l><bool>true</bool></l></block></block><block s="doSetVar"><l>word array</l><block s="reportNewList"><list><l>Hollow</l><l>God</l><l>Knight</l><l>Over</l><l>Watch</l><l>Lightning</l><l>Water</l><l>Fire</l><l>Grass</l><l>Ghost</l><l>Dragon</l><l>Fairy</l><l>Metal</l><l>Rock</l><l>Ground</l><l>Normal</l><l>Dark</l><l>Fighting</l><l>Bug</l><l>Soccer</l><l>Duck</l><l>Code</l><l>Heart</l><l>Night</l><l>Day</l></list></block></block></script></block-definition><block-definition s="First word that starts with" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doFor"><l>i</l><l>1</l><block var="array lenght"/><script><block s="doIf"><block s="reportAnd"><block s="reportEquals"><block s="reportLetter"><l>1</l><block s="reportListItem"><block var="i"/><block var="word array"/></block></block><block var="search letter"/></block><block var="not found"/></block><script><block s="doSetVar"><l>match</l><block s="reportListItem"><block var="i"/><block var="word array"/></block></block><block s="doSetVar"><l>not found</l><block s="reportBoolean"><l><bool>false</bool></l></block></block></script></block></script></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="false" hyperops="true" codify="false" inheritance="true" sublistIDs="false" id="859"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAAAXNSR0IArs4c6QAAHR1JREFUeF7t3X2U5XddH/D3925CJGbuBAotxVMQIlbQNkBFBcKBnCL2QVugPDWFnTsJNFhBoNYKYkWPD4fTCo2CImAyswscKC2VtlRUBB+K8qCooNhaK+BDLZUimZklCmTvr+e3s0Nml0kydza732+++5o/s3Pn+/m8Pp+Z93343ZsSXwQIECBAgMA5Fyjn/EQHEiBAgAABAhHAloAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBARwBXRHEiBAgAABAWwHCBAgQIBABQEBXAHdkQQIECBAQADbAQIECBAgUEFAAFdAdyQBAgQIEBDAdoAAAQIECFQQEMAV0B1JgAABAgQEsB0gQIAAAQIVBLoM4LUce3DJ/DeS4UdnWX5OBdc77ZHr2XhlUr5lyOQhq7nkN++0jSj8nAi8OcNd/zxb3z0kT0pynyTj35RjSf7TLNPVc1LEHXiI/b8DMf2o2xUQwLdLdH59w53pD9Bahi8q2To2pDx2NUu/cH5Nqo1uj2TzNUPyrGT4zZL8lyHlWDIsJZOPz7L0o21Uuf8q7kz7v/+ufGerAs0H8Fq2HlMy/Px+AIeUK8c/xB4B70dr7++5M/0BWsvGw0rK+3fmfvCu3fIgAi/JMLlfNjeTsjlk6f6rKX9xkJ/T0m3uTPvfkptaDibQfABfnxvvP8nkn+5uryTPTzIfkh/Z/d/nmb/mmlz6kV0B/MpZlp97MJrz81Z3pj9AR7L5zCF5rQCus6tHsvmXhuT/JXnbLNNvqlPFHXvqnWn/79jO/bQaAs0H8F4o69m8McnNs0zvsde/3xLA5bqS4c1D8tJk+FtJGW/3szdn+BfPzPKfnX7btWw8o6Q8Jxm+cvy3IeW3k+G61Sy/6aDDWcvWT5cMj/1Mlu56bcrn9vo5r85w4UXZuqkkP7uS6d/f+Z71bF6T5NnJ8KCklGT43ZKsfyTTV3xvynz3z1rL5stK8s8PZXjAzTl0LDl+XUn5hiR3TfKJpPydWZY+vHObtXzq0pJDP5Tk8UkuTobfGVK+d5Lh64eU5x70NeCD9vvm/OklN+WiFw4pTyoZ/lpStpLhQyXlJSuZvmd3r6/LxpcdT/m9W5vJkLxoNdOXnsl8F/Xc736cC5/t3R3KerZWy4n9yZcluSAZfn/I5LWzXPKqkjLst+Y9HN9UUp56O7f/9lmm4359/mu/+7zz+zuk/PBqlsY727t+xsb3J+XFu+903ZCNr52kvDcZnjck7y8pP5jkYeNr0UPKuw4lLzicpT899ffl7Oz/QU3d7vwU6DyA89Ykj05yfVI+kgx/L8k3JvnPs0z/4V6/2Ek+NKS8epLhs0NydZKHDxlesJrl6w6yIuvZfHmSFxxPvuKaTH93r59xNFsPnGf4nZL8m5VM/+X4PevZ+rfJ8Pwh5Wcmmb9+SI4n5R8nGR9pXD/L9Jmn1X84KUeGDIfHIE7ygKS8c3xNrmT+VyaZPPdwlv77LeG+8Y6kPHZIbpikvH3IcP+xziQf3e75YBdhHbTfk8E03mG4PskvDxmWS8q3bF/YUx66+87D6/PJ6fFc+JQh+QcnPX6oJLtsJ+9fySUfOpP5rmdjIc/97sa58BlrWcvG94x3XpIcHTL83CQZ5ilXluTqkrx0JdMX7bfm07/vSLauTIbL5sm0JC9Lhg+UlB/f/X3zTN63mkt+65Z92/8+LxrAR/Kphww59OtJecPJ3/HTf9/fPcv0Uaftw1nZ/4Oaut35KdB7AI8XZT56lqVf2hnvWjbHi0Uuv0tyz6syHZ8+y5FsfvmQjOH0kUluevDh3OvT439/c4a73JStDyS5bJ5y36uz9IlF12TnadKSfNNKpm/b6/Zr2XpiyfCWksxWMj1yfY5dfijz8Qrk93w0S1fsPNodH9Ucyeb4h+NvJ/OvnuXSsbYTX7c8Csj/GB8AlVzw9Su5+H/vfd7G15WU8VHlW2eZPmGXzVeUZPyjecFBA/gg/R7Jn91nyAXvTfJrs0zHUD3xdTQ3fvU8k19NhlfNsvzPTu9lJ2Ru7ynog8x3Ec9FduJc+axn4w9Lyh+tZPrI3fUdyebRIXnwfbP00CtTbl6k9i/0P3avkvn/SfKWWabjVdB7fi26z4sG8C3PeI3H7/37Ps8F97k6F//R+B1rOXv7fyaebnv+CfQewL80y3R8BPz5r1te4xm+ZjXLvzr+w5FsfueQ/MCQ4VtXs/yKU/9gbV07ZBjv3T9zlun46Gyhrxuy+YjJiUd0+bbVTF++lhN/tP5k/CGfy+SvPiuX/N+d8yeZP+xwLv219Wx8X1K+KxlWZlk+uvvAtWw8raS8sWT4vpUsf/fOv+1+WrYkj1rJ9N23VujOeclw1SzLbzzVZ/O/JbnioAF8kH5vrc6TVzn/eTK8c5blx55BAC8830U8F1mIc+Wzns3xztd8nvLQg9xx3E9PJ3f5dgN40X0+gwC+1d/3efLIqzP9ld2/72dj//fj5nsI7Ah0HcBD8urVTMfXwHYH8Be8hrSWrTeUDFedfu95+5d142uGlPclw4Eu6Dr5WuunkuHHZ1n+5vVsjheUnQjOIfmu1UzX17P5uiT/5DM5dsm1ufdN69n8D0n+0U4gn3qH4NjfHDL/4JDh361m+Wk7/7aWT31pyaHx6eMPzzL9qtta8fVsvna8QzHP8HVXZ/l9pwXwDUlWDxrAB+l3PP9k4H3HkDyqJPdKclGSuySZjE9JzzK94qABfJD5LuK5yJ+Tc+Vzy52sHCvJ24fk5+a54O07jwIXqfnW7yDt7xHwovt80ADe7+/72dz/O8LVzzh/BDoP4P1dxLGWzbeW5JTXhL9wBYY3zbI8vga78Nd6Nv9kvMhpfBS3ns23jVeOjldUJblklumT17M5PhK/+yzTy8YfvvN66PHMLxuv6j41IG+8LJn8r9OvPN0VGD85y/SJt1XkTiCVTC7f47XSVyXl2QcN4PHcxfvdeEBJGQ0uGpIfS8p7S45vzHPo5kmGd555AC8+30U8F12Ic+czvrSRa5PhMSfvzIyl/vwk5VsPZ+m3F637C+8A7S+AF93ngwfwfn/ft+9wn639P1NXtz9/BATw9lPQ4+tizyjJC+cZ/mCv8U9S/vi2nta9rZU5ks13zpPLPptjD7ool3yypDwjyaEhw2s+k6V7XJSt8bXoX9x5/XM9m/8+yZP2egS86wrvN86ydNXpj4CH5MhqprPbDuDN68eLcfZ6BLwTzmcSwIv3u/PpW7lmNdPxEfiJr/Fiq5tz4caZBvBB5rsTwPvxXPTPxbny2anraD7+xcldr5injK/TjruxcXOGL9/rnQCL9LL/p6AX2+fbDuDN8crqb9v9uv/igX12938RQ997fgsI4BOPODe/vST/ekiesJrpeOX0Hfq1no1XbD+qLE8tGd54PJ+5xxflwgs+l8knSvLkIfmPu69MveXioqyOT1HvLuZINp4+pLxufI14lqUfOEgAH8nGS4aU70mGp8+y/IZTH2FvjlcP/40zCeBF+13P1s8kw+OGHL/fau72sZ16jmTj7w4pP3WmAXyQ+Z7NAD5XPnst8Y5FSZ64kulPnsmi7zeAF93no9n6qnmG3xqv0F/NdHwr3ue/dp6tOpMAPtv7fyambnt+CQjgEwF84vXT8WndX7k4S1c+JeX4LcG28fySrEwyuWr323gWWZP1bH1zMvzYeLVoUpZmWRrfbjM+8v7lJB8fkifuDsP1bH1ltv8Avf9jWXrEzlXQ2588tDV+5OIjS/LAlUz/58ECeOvKIcO7SvJTh7P0jTvvCT2SzSuGZLwIK2cWwIv2e+I18KdPUh5zOEu/OJ5/fT6xdCgXvSvJQ5J8YJbp155uvp6NFyTl5XtdTHPqH+3F53t2A/js+pwMsPFllfHtRj9x2h245w0p193eleP72e/9BvCi+/wT2bj7BSmfHJIPrmb64J1ars/mXz+0fZX+hWcWwGd3//dj53sIjAIC+OQerGdzfF/k+Ab+924/wpxvjW/3KcnhZHjXRzN93OkffrHfFTqarUfPM/xCMowftvEdK1l+5Xjb9Wy9OJl/Z1IuPj3w1rP9VFuSn06Go+XEU9aTZ4yPFJPh+2dZ/ld7hMxH9/OU6ckPaXhPScZQe9uQ8l+T+b1KynjB2vj2pMeXHH/oSu72G/vtcff3LdrvWjYfX5Lx0djvlZSXDSc+SzjXDilHS4anJcOXJsMT7pLJr++8dWz7DsyJC+TGty+Nd2LWJsmnh+QeyfAlsyyf8kERi873bAbw2fY5eUdtvHDwQUPKK0qGMbTmQ8rlJcNzkvLhi7P0iN13NA8y5/0G8PauL7bP69kc3zo4vnf3LSXlHUPm907Ks7Z/H8aLBLc/dnb82Ys+BX229/8glm5zfgoI4F1zX8vWk0uG5yW5/MRbaVN+f0he/9ksXXdrn2K1n7W5IVv3nGQ48Uk8JTffdyV3/8PtANn5AIHxj+PSF5/+Wbpr2XxWyfDspDwwGYZsfzLX+H94OuWtSdt/hLavgt5PAI/ffzRbf3mejI8ex0/eGi9++tAk5UXJ8PCTb8l6+GqWx3Bb+Osg/Z58NDt+8MaXJPlYUl45fpj/eraeMvY8XkQ0ZHjqapbHP8Cf/zr5vtrxjsr9knw2yR+X5N0rmZ7y8aXbRvuf76KeiyCdC5835Ma7fS6TF5/8oJJ7b190nz9IypuO5y9+5Jrcc2uRmvf63kUCeNt///t8fT5970lufnlJGS8gmyb54CTlhUOGB2x//Oj8cau59B0HCeCzvf9n6ur254/AnTKAz5/x6JQAAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQtIICbHo/iCBAgQKBXAQHc62T1RYAAAQJNCwjgpsejOAIECBDoVUAA9zpZfREgQIBA0wICuOnxKI4AAQIEehUQwL1OVl8ECBAg0LSAAG56PIojQIAAgV4FBHCvk9UXAQIECDQt8P8BytXE4XGBbvwAAAAASUVORK5CYII=</pentrails><costumes><list struct="atomic" id="860"></list></costumes><sounds><list struct="atomic" id="861"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="1"><sprite name="Sprite" idx="1" x="88" y="2.842170943040401e-14" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" costume="0" color="160,0,242,1" pen="tip" id="866"><costumes><list struct="atomic" id="867"></list></costumes><sounds><list struct="atomic" id="868"></list></sounds><blocks></blocks><variables></variables><scripts><script x="20" y="19.99999999999999"><block s="receiveKey"><l><option>y</option></l><list></list></block><custom-block s="Create array"></custom-block><block s="doIfElse"><custom-block s="Contain"></custom-block><script><block s="write"><block s="reportJoinWords"><list><l>We have a match of the number</l><block var="search number"/></list></block><l>20</l></block></script><script><block s="write"><l>We have no match </l><l>20</l></block></script></block></script><script x="229.66666666666666" y="119.99999999999994"><block s="receiveKey"><l><option>w</option></l><list></list></block><custom-block s="Create array"></custom-block><custom-block s="Index of"></custom-block><block s="doIfElse"><block s="reportGreaterThan"><block var="match"/><l>-1</l></block><script><block s="write"><block s="reportJoinWords"><list><l>The location of the match position is </l><block var="match"/></list></block><l>20</l></block></script><script><block s="write"><l>We have no match </l><l>20</l></block></script></block></script><script x="10.333333333333334" y="176.66666666666683"><block s="receiveKey"><l><option>t</option></l><list></list></block><custom-block s="Create word array"></custom-block><custom-block s="Get ready to write"></custom-block><custom-block s="First word that starts with"></custom-block><block s="doIfElse"><block var="not found"/><script><block s="gotoXY"><l>-200</l><l>0</l></block><block s="write"><block s="reportJoinWords"><list><l>The word </l><block var="search letter"/><l> was found</l></list></block><l>20</l></block></script><script><block s="gotoXY"><l>-200</l><l>0</l></block><block s="write"><l>Word not found</l><l>20</l></block><block s="setColor"><color>142,69,255,1</color></block></script></block></script></scripts></sprite><watcher var="array" style="normal" x="10" y="10" color="243,118,29" extX="120" extY="105"/><watcher var="array lenght" style="normal" x="10" y="39.500001999999995" color="243,118,29" hidden="true"/><watcher var="number" style="normal" x="10" y="69.00000399999999" color="243,118,29" hidden="true"/><watcher var="search number" style="normal" x="10" y="98.50000599999998" color="243,118,29" hidden="true"/><watcher var="found" style="normal" x="10" y="128.00000799999998" color="243,118,29" hidden="true"/><watcher var="ramdom number" style="normal" x="10" y="157.50000999999997" color="243,118,29" hidden="true"/><watcher var="match" style="normal" x="10" y="187.00001199999997" color="243,118,29" hidden="true"/><watcher var="search letter" style="normal" x="10" y="216.50001399999996" color="243,118,29" hidden="true"/><watcher var="not found" style="normal" x="10" y="246.00001599999996" color="243,118,29" hidden="true"/><watcher var="word array" style="normal" x="10" y="275.50001799999995" color="243,118,29" hidden="true"/></sprites></stage><variables><variable name="array"><list struct="atomic" id="965">16,7,6,42,29,42,26,31,77,75,71,31,29,95,25,39,62,19,34,15</list></variable><variable name="array lenght"><l>25</l></variable><variable name="number"><l>15</l></variable><variable name="search number"><l>83</l></variable><variable name="found"><bool>false</bool></variable><variable name="ramdom number"><l>0</l></variable><variable name="match"><l></l></variable><variable name="search letter"><l>water</l></variable><variable name="not found"><bool>true</bool></variable><variable name="word array"><list struct="atomic" id="966">Hollow,God,Knight,Over,Watch,Lightning,Water,Fire,Grass,Ghost,Dragon,Fairy,Metal,Rock,Ground,Normal,Dark,Fighting,Bug,Soccer,Duck,Code,Heart,Night,Day</list></variable></variables></scene></scenes></project><media name="4.5" app="Snap! 7, https://snap.berkeley.edu" version="2"></media></snapdata>