<snapdata remixID="12378304"><project name="4.12 UPC CODE CHECKER PROGRAM" app="Snap! 8.2, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAADOhJREFUeF7tnQlwFFUax/8zuSB3QhIImgAJt0DAIHJIKcfCcoRDDhFEkK3CEiWAHKsQrzIgIrKAW7WCGEKoCJWDxBgSYkRQQM7IciyIEA6JtcsNMRCyhpmt72XnkaaTzJRk5iWZ71VRYWa6+3vv17963f36HQaz2WwGJyagiICBBVREnsMKAiwgi6CUQJUC/vjjj/juu+8qDDUYUPkqbc/PISEhGDp0KAICApRC4eCOI6ATcPv27WjdurUUzyKcI/8eOXIEMTExjqPAkZQR0AhYUFCAJk2aiMwkJydj8uTJePfddzF9+nT06dMHHh4e2LJlC/z9/WEymZCSkoLZs2fLzOfm5mLIkCG1UpiWLVvWynH4IHWbgEbA5cuXY8yYMSLHJNrYsWOxYsUKrF69Gp988glef/11nDp1CgkJCZg2bZrYjkShfdLT07FmzRrQMXJycuDm5vZQJW/VqtVD7c871w8CGgGXLVsmBaTsh4eH49atWwgKCkJhYaEoEYlx8eJF0P0a1YLl5eUwGo1wdXUVNeTt27fF91evXn0oApGRkQ+1P+9cPwhoBPzwww81AqosAt2Hcmr4BDQCfvDBB1JATw83lC/vi8ZuBhz07IFGbi445turVp+KvW6dw8jiDEHZp8tgFPVeIIm3bdu24dPnEmrbAZcsWSIFLCu5gYiU8dgdtRAd+tTOg0V1vH3+0R/u5t/x67R8uUm7du349DgBAU0NGB8fLwX8/c4t/JqxDO3/8rHdMRzJT8XAwr/j4tQ8GatDhw52j8sB1BPQCPj++++LJ19qeC4vLUZ6Vi6mTJkiPtu7HbDp2n74Zco2Gadjx47q6XAO7E5AI+B7770nBKR07+5vyMnf6bCHktB1A3DhxVxZ4Mcee8zuhecA6gnoBLS0A5rKSpCd960UkrJqqQkt2a7Nz80/H4hzL2wVNSClTp06qafDObA7AY2A77zzzv0a7/c7yMr9xmE1YFjiYJydlC0L3KVLF7sXngOoJ6AR8O2335bCGcpL8WVOvsMEDN/wZxRO/EoSiYqKUk+Hc2B3AhoB4+LipHAupjJkZOc5TMCWG4fi9IQvZYG7detm98JzAPUENAIuWrRICudq/q94CrbcE9o7qxHJw/Hzc5kyzOOPP27vkHz8OkBAI+Cbb74phXM3lCM1c6vDBGy9aQR+GrdFIunevXsdwMNZsDcBjYBvvPGGbAf0MN5DSka2RsDafOp98Km6zeaRODk2XbYDPvHEE/YuOx+/DhDQCLhgwQIpYGNXMzalfemwGrB96rP417OpUsAnn3yyDuDhLNibgEbA+fPnSwE93YAvUjMdJmCHtDE4PjpFCtizZ097l52PXwcIaAScN2+eFM7L3YCNm9OlkPZ+FdcpYzyOjtwsG6J79epVB/BwFuxNQCPg3LlzpYDeHkYkbUpzWA3YOfM5IaAl9e7d295l5+PXAQIaAefMmSOF823sisTkFIcJGJX1PP4Z84VE8tRTT9UBPJwFexPQCEgDjCztfn6ebkjYuNlul+D169eD/u3atUu8Y+6WPQmHhyfL8vbt29feZefj1wECGgFjY2OlgAFeHliX9IX4nJGRgTZt2tilg0CLFi1w4cIFROdMRsHQjRLJ008/XQfwcBbsTUAj4MyZM6WAgT6N8FliMoqKisRIN0o0GMmWtHv3blS+hFINR7XrqlWrNLvTiLrFixdj0qRJ6J77Ig4NSZK/P/PMM7aE4m3qOQGNgK+++qq85Ab5eqIwOQ5J532QmZkJek3Xr18/+ZR64MABTJw4ERs2bMCECROwcuVKDBw4UEjq4uIixgefP39e4CHxZs2aJUbO0Sg6SjS6joYALFy4EOfOnUOPvKk4MDhRNsP079+/nqPl7NtCQCPgjBkzpIDB/l44uWERNl/0BXXT8vHxEaJYEl06aWwwSUeD1q9fv468vDwMHjwYJ0+elN8FBgaKezxqY7TUpBEREaABUPTqj/5Gh/nghdtp2D9ovRRwwIABtuSft6nnBDQC0uXQ8gYixN8bEanjsSlgMnL2n0DXrl1hrW2OerAcPnzYKpLU1FTQa7+lS5eKv/5r/gQPQzn2Dvxc1rAkNqeGT0Aj4KVLl3D06FFR6iY+jdA2Y5L4/9bSNnCFGdtKI6Ug9H11Y0Us2Kz9Hu5yE7N990nKJCClmzdvYty4cQ2fPpdQPz3bp59+Ku7PKFGHALqEOiKdPn0aZ8+eFfINGzYM3t7ejgjLMRQT4PkBFZ8AZw/PAjq7AYrLzwIqPgHOHp4FdHYDFJefBVR8Apw9PAvo7AYoLj8LqPgEOHt4FtDZDVBc/moFtCzVUBszY/n5+YE6F/C8z4rPdh0MX6WA27ZtE0s11JQ+fmUUujf6j9Ui9Z+7BvcerZhmIysrS0x0zokJWAjoBNy/f7/o+WKt5vNbOwh+HkabSNK8f5bj8bx/NiFzmo10Ar711luyU+r3338v+va1b99edBr19fUVyzU0bdoUIYnD4VtJQM/Z22AM7YiSv4br4J15Pkt+R30Ceeo1p/HLakF1AlLHUku3K+rZTAJShwR3d3eUlZWBulyVlpYibNMYjYDei8/AdOkU7qwepgtKA84tie4DaYkHTkyACOgEvHLliliMxtolOCJtgkbAmnDSaDfL8Xi0G4tXmUCVDyFr166FtYViOnfubFNNRr2oqZsVCUiXbtqPExOo9iGE0TABRxLQ1YB0f0djOmhBQmupWbNmKPzpmGY516r2Kb55A81bVaz7kZ+fj5dfftnaofl3JyGgE3Dfvn02yUd8PoqdiFXdbFsTrnReAa5duyawlpSUgOf/cxLDrBRTJyCt1Wtr2hz/ChZFFMnNXcK6wjV6LMoy43SHuDZjl+huT4nWJOYGaVspN+ztdAIeOnRIlnjQoEFilButmkljRUaNGgV6Sr58+bKoJdOWxiIu8r6ArlExMN+5gXund+uoXZq+Azdu3BDfHz9+HFOnTm3YZLl0NhHQCbhnzx65I81UX1xcLN6M0FKs1BZoSbTdVyvmI671fQFrikjrwFmWcCWpX3vtNZsyyBs1bAI6AdetW2e1CcaCpG1YCPw+s76QodH/EezvuUTsRkM/aSYFTkyACFTZDkiSUFtgTXPBPDhf9IM4q/p9+PDhGDFiBJNnApJAtd2xvv76a3Gv9kdmRqVG7PouGj2l03yJ9A6ck/0IVCngmTNnNBGbBAZizbhIBHu6WM3Jsxt+xrXr18V2wcHBoL6A9TWNHj1aZp3e6KSkpIAX0q7ds6kTMC0tDbRWb+WaL7hJIBqv6GFTZMPsnTh/vVTsT+1+9X2iycoSWgAYjUbRMSM7+/7adjbB4Y10BHQC0hOqZcVKy2RDoc1C4PU3/az1hkY+MN/9TXvQWd/izOUS+R1NalSfU3UC3r17F1u3bq3PRasTedcJSL2hAwICROZoqQR6M9Iy/FF4rdTOWm98NAqmIn2jtSl2O04WVVyCKdXn9T4qy0cdKmhWL74E1663OgFpqYaRI0dqLsFtIlvpBKw2G3N24fDpX8T+JC8drz4mfghxzFmr8iEkPj5eNxcgLR5oqRmryxp1ZPjhhx/EzydOnABN+cuJCdREgIdlsh9KCWgETEpK0kwuXlPO3N3cYDDdw7WrNY+MM5nM8A4IgtHogmPHjonLOycmYCEgBaTpcqmzga2peWgzGJZ0gcGGHVzm78GFq7fFlnv37sVLL71kw168iTMQkALu3Lmzxnu8Hj16gGbGt6RmTYN1TTMu4d1w75cq5oie9S0Kr1QISIk6OXBiAkRACnjw4EHZ/jd+/HjRZ49mMwgKChIdCKgLlslkQmhoKNLT0xH2SHN4rayqbdAb5rv32wEpiDl2O079+5Ykzp1RWT7dJTghIQHt2lV0m6cmlOjoaBQUFIh5ommajrCwsIoVjaKjQbJGtmoB71W2LShomvkNjl24Io5NyznExMTwGWACFa6ZqdvK/9OOHTtsxuLl5YmO6bbNZF88a58Y6mm5/Dpq4nObC8MbKiOga4ZJTEyUbXl/pMtV5ZJU3p9eydFCOJyYQGUC3A7IPiglwAIqxc/BWUB2QCkBFlApfg7OArIDSgmwgErxc3AWkB1QSoAFVIqfg7OA7IBSAiygUvwcnAVkB5QSYAGV4ufgLCA7oJQAC6gUPwdnAdkBpQRYQKX4OTgLyA4oJcACKsXPwVlAdkApARZQKX4OzgKyA0oJsIBK8XNwFpAdUEqABVSKn4OzgOyAUgIsoFL8HJwFZAeUEmABleLn4CwgO6CUAAuoFD8HZwHZAaUEWECl+Dk4C8gOKCXAAirFz8FZQHZAKQEWUCl+Ds4CsgNKCbCASvFzcBaQHVBKgAVUip+Ds4DsgFICLKBS/BycBWQHlBJgAZXi5+AsIDuglAALqBQ/B2cB2QGlBFhApfg5+P8Avx3N8z+KSokAAAAASUVORK5CYII=</thumbnail><scenes select="1"><scene name="4.12 UPC CODE CHECKER PROGRAM"><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="Find Total Sum" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>totalSum</l><block s="reportVariadicSum"><list><block var="evenSum"/><block var="oddSum"/></list></block></block><block s="doSetVar"><l>totalSum</l><block s="reportVariadicSum"><list><block var="totalSum"/><block s="reportListItem"><l><option>last</option></l><block var="list"/></block></list></block></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="totalSum"/><l>10</l></block><l>0</l></list></block><script><block s="doSayFor"><l>Code is correct.</l><l>2</l></block></script><script><block s="doSayFor"><l>Code is incorrect</l><l>2</l></block></script></block></script></block-definition><block-definition s="Add Evens" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>positionoflist</l><l>1</l></block><block s="doSetVar"><l>evenSum</l><l>0</l></block><block s="doRepeat"><l>11</l><script><block s="doIf"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="positionoflist"/><l>2</l></block><l>0</l></list></block><script><block s="doSetVar"><l>evenSum</l><block s="reportVariadicSum"><list><block var="evenSum"/><block s="reportListItem"><block var="positionoflist"/><block var="list"/></block></list></block></block></script></block><block s="doChangeVar"><l>positionoflist</l><l>1</l></block></script></block></script></block-definition><block-definition s="Add Odds" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>positionoflist</l><l>0</l></block><block s="doSetVar"><l>oddSum</l><l>0</l></block><block s="doRepeat"><l>11</l><script><block s="doIf"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="positionoflist"/><l>2</l></block><l>1</l></list></block><script><block s="doSetVar"><l>oddSum</l><block s="reportVariadicSum"><list><block var="oddSum"/><block s="reportListItem"><block var="positionoflist"/><block var="list"/></block></list></block></block></script></block><block s="doChangeVar"><l>positionoflist</l><l>1</l></block></script></block><block s="doSetVar"><l>oddSum</l><block s="reportVariadicProduct"><list><block var="oddSum"/><l>3</l></list></block></block></script></block-definition><block-definition s="CollectAndStoreUPCCode" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doDeclareVariables"><list><l>code</l><l>i</l></list></block><block s="doAsk"><l>Enter a UPC Code</l></block><block s="doSetVar"><l>code</l><block s="getLastAnswer"></block></block><block s="doSetVar"><l>i</l><l>1</l></block><block s="doRepeat"><custom-block s="length of code"></custom-block><script><block s="doAddToList"><block s="reportLetter"><block var="i"/><block var="code"/></block><block var="UPCCode"/></block><block s="doChangeVar"><l>i</l><l>1</l></block></script></block></script></block-definition><block-definition s="length of code" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><l></l></block></script></block-definition><block-definition s="enoughDigits?" type="predicate" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportVariadicEquals"><list><block s="reportListAttribute"><l><option>length</option></l><block var="UPCCode"/></block><l>12</l></list></block></block></script></block-definition><block-definition s="oddDigits*3" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportVariadicProduct"><list><custom-block s="sumOddDigits"></custom-block><l>3</l></list></block></block></script></block-definition><block-definition s="allDigitsButCheckDigit" type="reporter" category="variables"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportDifference"><block s="reportListAttribute"><l><option>length</option></l><block var="UPCCode"/></block><l>1</l></block></block></script></block-definition><block-definition s="sumOddDigits" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doDeclareVariables"><list><l>sum</l><l>i</l></list></block><block s="doSetVar"><l>sum</l><l>0</l></block><block s="doSetVar"><l>i</l><l>1</l></block><block s="doRepeat"><custom-block s="allDigitsButCheckDigit"></custom-block><script><block s="doIf"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="i"/><l>2</l></block><l>1</l></list></block><script><block s="doSetVar"><l>sum</l><block s="reportVariadicSum"><list><block var="sum"/><block s="reportListItem"><block var="i"/><block var="UPCCode"/></block></list></block></block></script></block><block s="doChangeVar"><l>i</l><l>1</l></block></script></block><block s="doReport"><block var="sum"/></block></script></block-definition><block-definition s="sumEvenDigits" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doDeclareVariables"><list><l>sum</l><l>i</l></list></block><block s="doSetVar"><l>sum</l><l>0</l></block><block s="doSetVar"><l>i</l><l>1</l></block><block s="doRepeat"><custom-block s="allDigitsButCheckDigit"></custom-block><script><block s="doIf"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="i"/><l>2</l></block><l>0</l></list></block><script><block s="doSetVar"><l>sum</l><block s="reportVariadicSum"><list><block var="sum"/><block s="reportListItem"><block var="i"/><block var="UPCCode"/></block></list></block></block></script></block><block s="doChangeVar"><l>i</l><l>1</l></block></script></block><block s="doReport"><block var="sum"/></block></script></block-definition><block-definition s="checkDigit" type="reporter" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportListItem"><l>12</l><block var="UPCCode"/></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="false" hyperops="true" codify="false" inheritance="true" sublistIDs="false" id="295"><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="296"></list></costumes><sounds><list struct="atomic" id="297"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites select="1"><sprite name="Sprite" idx="1" x="0" y="0" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" costume="0" color="80,80,80,1" pen="tip" id="302"><costumes><list struct="atomic" id="303"></list></costumes><sounds><list struct="atomic" id="304"></list></sounds><blocks></blocks><variables></variables><scripts><script x="55" y="44.33333333333334"><block s="receiveGo"></block><block s="doSetVar"><l>UPCCode</l><block s="reportNewList"><list></list></block></block><custom-block s="CollectAndStoreUPCCode"></custom-block><block s="doIf"><block s="reportNot"><custom-block s="enoughDigits?"></custom-block></block><script><block s="doSayFor"><l>the code is invalid, there are not enough digits</l><l>2</l></block><block s="doStopThis"><l><option>all</option></l></block></script></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="reportModulus"><block s="reportVariadicSum"><list><block s="reportVariadicSum"><list><custom-block s="sumOddDigits"></custom-block><custom-block s="sumEvenDigits"></custom-block></list></block><custom-block s="checkDigit"></custom-block></list></block><l>10</l></block><l>0</l></list></block><script><block s="doSayFor"><l>This is a Valid UPC code</l><l>2</l></block></script><script><block s="doSayFor"><l>This is not a Valid UPC Code</l><l>2</l></block></script></block></script></scripts></sprite><watcher var="UPCCode" style="normal" x="10" y="10" color="243,118,29" extX="80" extY="70"/><watcher var="list" style="normal" x="13" y="127.000002" color="243,118,29"/><watcher var="sum" style="normal" x="11" y="149.00000799999998" color="243,118,29"/><watcher var="i" style="normal" x="12" y="172.00000599999998" color="243,118,29"/><watcher var="code" style="normal" x="6" y="194.000004" color="243,118,29"/></sprites></stage><variables><variable name="UPCCode"><list struct="atomic" id="367"></list></variable><variable name="list"><l>0</l></variable><variable name="code"><l>0</l></variable><variable name="i"><l>0</l></variable><variable name="sum"><l>0</l></variable></variables></scene></scenes></project><media name="4.12 UPC CODE CHECKER PROGRAM" app="Snap! 8.2, https://snap.berkeley.edu" version="2"></media></snapdata>