<snapdata remixID="14891241"><project name="upc code checker" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAQAElEQVR4AeydCXAVVRaGzwtJCEECIayi7IiOMjJTlAwIFIi7MoI7armjqCgjLkSdQnADRHEtEUStURmY0QL3EhHFKQRFlkCEsBMIkJmwyL4FknnflfvsTt5LwvJCp/uk8r9zl77LOfev291364Ri/VMLnEALJIj+qQVOoAWUgCfQ+Fq0SFQCZmdny8svvywvvfRSpcpJkybJpk2btF0CZIFSBJw6daqkpaVJnz595Morr6xU2alTJ9mzZ4989NFHAWqCYKvqIuCCBQukbdu2En4mlaKiolLIz8+XunXrmvBBgwaZ65KTk42f68844wwTRvpjQYcOHYLdKgHS3kXA6dOnR8g0ZswYqVmzpnTr1k24JWdmZkpKSopccskl0rJlS6lWrZq59qqrrpJ33nlHunTpYswGEY8HTGbx/NG8PWEBFwEhju257r77bqlfv77MmDFDevXqJc8995ycffbZ8sUXXxjiDR8+XFq0aGH8/fv3l/Xr1xuglc3jWCT5KPxvARcBIQwkBLhXrlxpyOaUBQUF4vRv3rzZPLcRtmXLFjl06JBJQx5HAspzXu9/06uGWMBFQAgAEUD1xARJerWH1B7TQ5LHXiprJzx+XJEbzm/r+NskLZw/ZTRc8Lbr+VH0LxAWcBEQ4kFCsHVzgWSkJsi/6t8uxQOmSetbRxm0ue0FaXfP69LxobfLRadH3hGut2mR1t8mnN/Bv46U/936pdRISpDQ3AmunjMQ1lcl3eOAEA8SAmyzJLG1XH79ba6eiWuGXNxe8m9sXi429G1mniOXLl1qbs0HDx6MkKywsFCSkpLk3XfflX/Xu43iXOWYAP3xvQUSnBpCPAvCpyZ1iZBi165dkpWVZfyNkouJduG0T7e6/NYDyawbafMnHHz55ZfS/cqbiTJ523gToD/xsICn8iyTgMkpqabn4sWCIRhqjhvpRFLjlrL+772dQRE3hMLTunVrRCS/tWvXyoEDB4ThHZsn11qYi/XH9xYok4CWDFZeeumlppcqaZXC/NXS5OkpJYNdft6SCbB55eTkCAPf+/fvj+Rp45Bcq/C/BVwE5PnOAtXpmYANW716tenButyVSbQLK67IcPmth6k13AzfMM9r84NkNl8k1yAt8Cv8bwEXASGFBapbtyWF9f/5ihskM79BuXis4GRhbDAjI8P0cjY9+eGmDIAfSZgFfoX/LeAiIESwQHXrLilHX9xORjQuKBfDG2yUU045xZCwYcOG0qBBg8hbcMk8S5aHX+F/C7gIaHsfJKpbkuCvXbu2fPvtt4ZAidVCRLuQ1uM6lz+WhzzJj3ikRTQ/YQp/W8BFQMhhgdrWzXPbvffeK/369TMEJM6JlNbt5eCWfGdQKffJJ58sKSkpJj35AWf+JLB+JH6F/y3gIqDtjZCojrR46qmnhAFl/MQ5sW9lluxZ9B9nUCn3xo0bZd++fZFnQecFNk+khTNe3f61gIuA9DwAEqAy7mjoP3me1M6cEEGdx/4p0dBw1HThzZllXRs2bBBIGC0/wpzl2fIJU/jbAi4C0vCgJCHwOzHi/ltl9bC+knsYa4ZeL9Gw9IEeUq9ePdm9e7eZdmPmw+ZDORaEYeaSfsIU/rZAVAJCBNSGGBbff/+9DB061DzD1dmQLRnVEyS9AqhVqxZZmTdg1heSH/mnpqaa23H79u1NnlxEuAV+hf8tUCYBLRmQ5557runFcEczS6tJa6MFlwojPYB45GmJyIWEW+BX+N8CLgLSO1mgOm+qFgsXLhTmb/ETVxI7Z35cMiiqn/TRwMW2bCR+/0A1iWUBFwFt74MkAdLirLPOktdee83cNpNPSiPahYLXB7r81rN3717rNNLmd91115l9JHl5eSZPIm0cEr/C/xZwEZCexwLVbU+1detWMwds/V2GvCX5D02R/EGTpTy5aNEis5nJ7hmxeUyYMEHef/99YXyQMMqzZSPxK/xvARcB6XksUB33559/LmeeeaY0adLE9FSEsUEJWRy+yCmLiovNxnJnOGRavny5DBw4UGbNmhXJg3RM002ZMsWEhbMyknCAX+F/C7gICFksUB03y6hYyzdu3DjztkoYe4EXL15sTk7ADTp27CjsC0a2a9fObG7nWsDt+8UXXxReOPBbfPLJJ2bHHX5bHm6AX+F/C7gISM9jgepnFOeZ2+eKFSvkrrvuihCQuJEjR5qXklatWglL7SFXYmKimS/Ozc2VefPmmevJj+vPP/98GTFihAmDYJ9++qlcdtllgtyUNV3441oL/Ar/W8BFQG6zkAMSoPotJ2VJ3759ZeLEicI+YOLA/fffL+PHj5fnn39eeDtmio3Vzdu3b5fGjRub1S/NmjWLkI3l/Bz58d5775kwbussbrWy6fqvKc7Ekb8t3wTqT5W2QHmVdxHw5pt/35txsLBQQiGRHjMHyIa8ddK5SbLkzZwcxpQwSsv3nn5AZvxjVDguenzezN/D26XtM9c1LNoszaf+Tf6YXCDFjppCZIdXnT62gIuAp556qvzyyy+mJ9q8Y48ceHSBnDRyrYwZO05uH/ZGGGPCOH4y85X3pc0Li6XmiFzJv+MbUy7Tdhz34WObq2oOC7gISPiDDz4oF110kUHdjIxwLxiqBCTIaaedZsrs3bs31VAExAKlCBgQvVVNj1hACeiRhghqNZSAQW15j+jtIuAbb7xhXkIYx6sMzJ8/XziTMC620EyrhAUiBBw7dqz07NnTLLlis3g0MNZHeCxZN72OhF7sIqmvdi0X9dNrmwMwmY7TI3mrBFfiUskIAVmbx4FBJfHmm28KYTfddJPgfvTRR82RGoRBRKcsLDxgTtRKTQoJaDA6zyUJsyjat9PkWxgeb2Q2JS7aaaaet0CEgPRsFuzhYJ6W1cysYmbet0aNGtKjRw+ZM2eOOaaXoZpzzjlHmPtlVoO00WYwavSbaIxQ7U99jLQ/zHiQBuC24SqDZYEIAenNAISgR3r44YelefPmZgyQ6bhQKCQ//vijNG3a1ODXX38VTjxIT083S7VIV+yczgjbEULufauvWeVyaIH77JjioiLTk5LOHt8RTqL/AbNAhIDTpk0TyAAJ2YA+e/Zs+e6774RPJ+AfNmyYXHDBBcIihGeffVY4Vo31fB988IGwto90q5Yvc5lvd2Yz47fSeMI/hqfVa0bKY7tnOFj/A2iBCAGHDBliVqbs3PnbsxmEsuA5zbqRsfw79uyTWT3Hy+zz3zYSNyjp/zEcP2f+QmGh67p168yG9wDaPl4qV6l8IwSk1qNHjzbr8+jpLrzwQrGIl58P4dgFEJSvCJ4FXAQMnvqq8Ym2QEwCzpw507zx5ubmSm4lgmdPbssn2jBafuVYICoBWZLF8EudOnUiLwr2BeVIZcH6XKnxSsUGpzmBi0+BscA1Pz+/ciygpZxQC0QlIEMs9kWjPMnYYFZWlhlUdr6g2HSrc7KlZnKCGZBmELrOZQ8bd8a9k4wkzILTs2y6n3766YQaRguvHAtEJSD7O+jpwB133GH2bnz22WfCGzLL9tkDwtgdG5a6d+8u3K7Z28F35FimP2rUKAGkF9daZ5FQWkOJ9ce4IWkAPWGs6zTcPxaISkDOcoYE9GgcKHT55ZcLvSK73iAGt0h2yiUkJBjyMY33xBNPSCgUMjvj2rZtawanSV9cwlZF2/9rQiCbcTh+mBGx5bKP2BGlTp9aICoBmYqDPJDhmWeekWuuuUaYbuNWy+A0BGTDeVpamrDRiON3CcfNwHXnzp3lzjvvNM+PeevcZ8YUThttTLlv/A1GOn8guS23e7hndcap258WiErArl27Gm35ECGEsLDPZ0fib9/1osigdMkB6ZJ+ZkQ4TZ9HAE5MMJXQH19bICoB0Zge6Oqrr44MRjMoHa8BafIG5H/ttdcKixyog8L/FohJQP+rrhp6wQJKQC+0QoDroASM0fgdOnQwq3xiRJcIVu/RWqBMAjK+xwLUypyKc5b1888/m0POj1a5Y0k3d+5cYatAnz59BHCiK2fkHEuemra0BWIS8HhOxzGcw5vz/l3bpHoFp+UYb2SYh0FvBrxLVz3+IRwdZ0tp0aKFsB0BMrKKh7FRG6fy6C0Qk4CMydlhFytpAIhk/VZu375d+AzD6aefLtu2bTMNZa975JFHhMWs+DeuXye1Dk/LpXW8ykzF2X0j9YfnGL+dlmMoxuZ/ogh49GbVlBW1QEwCQgB6LsDwCEepQa4BAwbIk08+Kffdd585GWvZsmVmQSk9xI4dO4TegZ5ryZIlwteVcDObQj7OSiXUa2G8e8ddL9VadZZQYnXjtz/MlJAGsDDChlempLez5a1Zs8acBkavOHnyZOFkLxun8ugtEJOAzum4bt26Cbvi2A+yatUq4dmsV69eJozFCMyC8EEayMY3gKkOZ0AjATMk9IDi2DQCwYhL6TdRDq2aFY5yT9oRD/lIx3Mh11YmeAlhHBTCgaysLGnTpk1lViEQZcUkoHM67p577jH7QViYwD4QCEUDQTym5ADzwvjZQcd1fKZ1xowZgptwyJSTvTBiVDslZ/eL7H6idSQOB+khH+m4tRNWmeAl5MYbb6zMIqtkWcda6ZgEPNbpOBrwm2++iSzTgkyt2/+l3P0idnouOztbmArkUYAzqo9VUU3vTQvEJCDVdU7HNWrUSOjdIAbSIp5+PuHAUNDXX/92gip1UvjLAmUS0KrKWkA2pjP0wLMf0uJo/GxE2jJ5mNT69llJ++45I3GDkv5bb7lFeMFhDI7bsa2TSn9YoFwC8sLRsmVLs4mc2+jxQKi4SDI7p8n1f0gtF4kHdootkxcBf5hdtbAWKJeArHRmPA4wDMMnFwYPHiycep+ZmWkkhxqxh4O4/v37mxU0nJrANYAXFivJh++J2AqkPvaTJLTsJDUfn2MkQzI2DskJCqQB1au7h2qIV1RtC5RLQIjErQ/wGQbOjOEFgzE/hiXoIRknhIQff/yxsQZfPoJ0DFCDUCgkvCXz/RDyYYhFDv/tGd7RHP8Rqt1IUno/Y4ZkIOThaIGspLGw4Sr9YYFyCchqaHsLRKanp8uHH34oX331lZkjZYCWb4jwssD0GV9RIp5PO/BpBotJkyYJH6shj5CEXNZjHHDX4KayZ3RPE160eraR/CQkJkVuwT/88ANBv0F/fWGBcgnIJiQOkoQ4xwsLw0MshYOzpOaItWWi2tClMm/JSkPAnJwcGTRokC+Mrkr8boFyCcilAwcONIdXcps9XkivW1dCoVCZqFEjVc477zxTNr0sdVH4ywIVIqC/VFZtvGQBJaCXWiOAdVECBrDRvaSyEtBLrVGxuvjqKiWgr5qz6imjBKx6bearGisBfdWcVU8ZJWDVazNf1VgJ6KvmrHrKKAGrXpv5qsZHREBfaa7KeMICSkBPNENwK6EEDG7be0JzJaAnmiG4lVACBrftPaG5EtATzRDcSigBK9T2elG8LKAEjJdlNd8KWUAJWCEz6UXxsoASMF6W1Xwr/OXsWQAAAORJREFUZAElYIXMpBfFywJKwHhZVvOtkAWUgBUyU3AvirfmSsB4W1jzL9MCSsAyzaOR8baAEjDeFtb8y7SAErBM82hkvC2gBIy3hTX/Mi2gBCzTPBoZbwt4l4Dx1lzz94QFlICeaIbgVkIJGNy294TmSkBPNENwK6EEDG7be0JzJaAnmiG4lVACeq/tA1UjJWCgmtt7yioBvdcmgaqREjBQze09ZZWA3muTQNVICRio5vaeskpA77VJoGrkImCgNFdlPWEBJaAnmiG4lVACBrftPaG5EtATzRDcSigBg9v2ntD8/wAAAP//tpufrwAAAAZJREFUAwAsDmdwLKHavgAAAABJRU5ErkJggg==</thumbnail><scenes select="1"><scene name="upc code checker"><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="Upc code checker" type="reporter" category="control"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><l>define check UPC (code)&#xD;set [sumOdd v] to (0)&#xD;set [sumEven v] to (0)&#xD;&#xD;repeat (11)     // first 11 digits&#xD;    if ((item (counter) of (code)) mod 2 = 1)&#xD;        change [sumOdd v] by (item (counter) of (code))&#xD;    else&#xD;        change [sumEven v] by (item (counter) of (code))&#xD;end&#xD;&#xD;set [total v] to ((sumOdd * 3) + sumEven)&#xD;set [checkDigit v] to (10 - (total mod 10))&#xD;if (checkDigit = 10)&#xD;    set [checkDigit v] to (0)&#xD;&#xD;if (checkDigit = (item 12 of code))&#xD;    report (true)&#xD;else&#xD;    report (false)&#xD;</l></block></script></block-definition><block-definition s="UpcCodeChecker" type="command" category="control"><header></header><code></code><translations></translations><inputs></inputs><script><block s="clear"></block><block s="doSetVar"><l>codeList</l><block s="reportNewList"><list></list></block></block><block s="doRepeat"><l>12</l><script><block s="doAsk"><l>enter digits of the UPC code one at  time</l></block><block s="doAddToList"><block s="getLastAnswer"></block><block var="codeList"/></block></script></block><block s="doSetVar"><l>oddSum</l><l>0</l></block><block s="doFor"><l>i</l><l>1</l><block s="reportListAttribute"><l><option>length</option></l><block var="codeList"/></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>oddSum</l><block s="reportVariadicSum"><list><block var="oddSum"/><block s="reportListItem"><block var="i"/><block var="codeList"/></block></list></block></block></script><list></list></block></script></block><block s="doSetVar"><l>oddSum</l><block s="reportVariadicProduct"><list><block var="oddSum"/><l>3</l></list></block></block><block s="doFor"><l>i</l><l>1</l><block s="reportListAttribute"><l><option>length</option></l><block var="codeList"/></block><script><block s="doIf"><block s="reportVariadicAnd"><list><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="i"/><l>2</l></block><l>0</l></list></block><block s="reportNot"><block s="reportVariadicEquals"><list><block var="i"/><l>12</l></list></block></block></list></block><script><block s="doSetVar"><l>evenSum</l><block s="reportVariadicSum"><list><block var="evenSum"/><block s="reportListItem"><block var="i"/><block var="codeList"/></block></list></block></block></script><list></list></block></script></block><block s="doSetVar"><l>savedSum</l><block s="reportVariadicSum"><list><block var="evenSum"/><block var="oddSum"/></list></block></block><block s="doSetVar"><l>checkDigit</l><block s="reportVariadicSum"><list><block var="savedSum"/><block s="reportListItem"><l><option>last</option></l><block var="codeList"/></block></list></block></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="checkDigit"/><l>10</l></block><l>0</l></list></block><script><block s="doSayFor"><l>YES</l><l>5</l></block></script><script><block s="doSayFor"><l>NO</l><l>5</l></block><block s="doSayFor"><block s="reportJoinWords"><list><l>Check Digit needs to be </l><block s="reportDifference"><l>10</l><block s="reportModulus"><block var="savedSum"/><l>10</l></block></block></list></block><l>2</l></block></script></block></script></block-definition></blocks><primitives></primitives><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="173"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAQAElEQVR4AezVC27kNhAEUCP3P3SC/NZeez6SSDWb9YJg1zsjkV2vDdQfH/4jQIAAAQIEbhdQwLeTu5AAAQIECHx8ZBew3wACBAgQIFAkoICL4F1LgAABAtkCCjh3/5ITIECAQKGAAi7EdzUBAgQI5Aoo4NzdZyeXngABAsUCCrh4Aa4nQIAAgUwBBZy5d6mzBaQnQGABAQW8wBKMQIAAAQJ5Ago4b+cSE8gWkJ7AIgIKeJFFGIMAAQIEsgQUcNa+pSVAIFtA+oUEFPBCyzAKAQIECOQIKOCcXUtKgACBbIHF0ivgxRZiHAIECBDIEFDAGXuWkgABAgQWE7i5gBdLbxwCBAgQIFAkoICL4F1LgAABAtkCCvjG/buKAAECBAj8J6CA/5PwNwECBAgQuFFAAd+InX2V9AQIECDwWUABf9bwMwECBAgQuElAAd8E7ZpsAekJECDwu4AC/l3EvwkQIECAwA0CCvgGZFcQyBaQngCBnwQU8E8qPiNAgAABApMFFPBkYMcTIJAtID2BRwIK+JGMzwkQIECAwEQBBTwR19EECBDIFpD+mYACfqbjOwIECBAgMElAAU+CdSwBAgQIZAu8Sq+AXwn5ngABAgQITBBQwBNQHUmAAAECBF4J7F3Ar9L7ngABAgQIFAko4CJ41xIgQIBAtoAC3nf/khEgQIDAwgIKeOHlGI0AAQIE9hVQwPvuNjuZ9AQIEFhcQAEvviDjESBAgMCeAgp4z71KlS0gPQECDQQUcIMlGZEAAQIE9hNQwPvtVCIC2QLSE2gioICbLMqYBAgQILCXgALea5/SECCQLSB9IwEF3GhZRiVAgACBfQQU8D67lIQAAQLZAs3SK+BmCzMuAQIECOwhoID32KMUBAgQINBMYHABN0tvXAIECBAgUCSggIvgXUuAAAEC2QIKeOD+HUWAAAECBN4VUMDvSnmOAAECBAgMFFDAAzGzj5KeAAECBI4IKOAjWp4lQIAAAQKDBBTwIEjHZAtIT4AAgaMCCviomOcJECBAgMAAAQU8ANERBLIFpCdA4IyAAj6j5h0CBAgQIHBRQAFfBPQ6AQLZAtITOCuggM/KeY8AAQIECFwQUMAX8LxKgACBbAHprwgo4Ct63iVAgAABAicFFPBJOK8RIECAQLbA1fQK+Kqg9wkQIECAwAkBBXwCzSsECBAgQOCqQO8Cvpre+wQIECBAoEhAARfBu5YAAQIEsgUUcN/9m5wAAQIEGgso4MbLMzoBAgQI9BVQwH13lz259AQIEGguoICbL9D4BAgQINBTQAH33JupswWkJ0BgAwEFvMESRSBAgACBfgIKuN/OTEwgW0B6ApsIKOBNFikGAQIECPQSUMC99mVaAgSyBaTfSEABb7RMUQgQIECgj4AC7rMrkxIgQCBbYLP0CnizhYpDgAABAj0EFHCPPZmSAAECBDYTOFjAm6UXhwABAgQIFAko4CJ41xIgQIBAtoACPrB/jxIgQIAAgVECCniUpHMIECBAgMABAQV8ACv7UekJECBAYKSAAh6p6SwCBAgQIPCmgAJ+E8pj2QLSEyBAYLSAAh4t6jwCBAgQIPCGgAJ+A8kjBLIFpCdAYIaAAp6h6kwCBAgQIPBCQAG/API1AQLZAtITmCWggGfJOpcAAQIECDwRUMBPcHxFgACBbAHpZwoo4Jm6ziZAgAABAg8EFPADGB8TIECAQLbA7PQKeLaw8wkQIECAwA8CCvgHFB8RIECAAIHZAmsX8Oz0zidAgAABAkUCCrgI3rUECBAgkC2ggNfdv8kIECBAYGMBBbzxckUjQIAAgXUFFPC6u8meTHoCBAhsLqCAN1+weAQIECCwpoACXnMvpsoWkJ4AgQABBRywZBEJECBAYD0BBbzeTkxEIFtAegIhAgo4ZNFiEiBAgMBaAgp4rX2YhgCBbAHpgwQUcNCyRSVAgACBdQQU8Dq7MAkBAgSyBcLSK+CwhYtLgAABAmsIKOA19mAKAgQIEAgT+K2Aw9KLS4AAAQIEigQUcBG8awkQIEAgW0ABf9q/HwkQIECAwF0CCvguafcQIECAAIFPAgr4E0b2j9ITIECAwJ0CCvhObXcRIECAAIF/BRTwvxD+yhaQngABAncLKOC7xd1HgAABAgT+ElDAfyH4n0C2gPQECFQIKOAKdXcSIECAQLyAAo7/FQBAIFtAegJVAgq4St69BAgQIBAtoICj1y88AQLZAtJXCijgSn13EyBAgECsgAKOXb3gBAgQyBaoTq+AqzfgfgIECBCIFFDAkWsXmgABAgSqBWoLuDq9+wkQIECAQJGAAi6Cdy0BAgQIZAso4Lr9u5kAAQIEggUUcPDyRSdAgACBOgEFXGeffbP0BAgQCBdQwOG/AOITIECAQI2AAq5xd2u2gPQECBD4UMB+CQgQIECAQIGAAi5AdyWBaAHhCRD4W0AB/83gDwIECBAgcK+AAr7X220ECGQLSE/gfwEF/D+FHwgQIECAwH0CCvg+azcRIEAgW0D6LwIK+AuHfxAgQIAAgXsEFPA9zm4hQIAAgWyBb+kV8DcSHxAgQIAAgfkCCni+sRsIECBAgMA3gagC/pbeBwQIECBAoEhAARfBu5YAAQIEsgUUcMz+BSVAgACBlQQU8ErbMAsBAgQIxAgo4JhVZweVngABAqsJKODVNmIeAgQIEIgQUMARaxYyW0B6AgRWFFDAK27FTAQIECCwvYAC3n7FAhLIFpCewKoCCnjVzZiLAAECBLYWUMBbr1c4AgSyBaRfWUABr7wdsxEgQIDAtgIKeNvVCkaAAIFsgdXTK+DVN2Q+AgQIENhSQAFvuVahCBAgQGB1gbkFvHp68xEgQIAAgSIBBVwE71oCBAgQyBZQwPP272QCBAgQIPBQQAE/pPEFAQIECBCYJ6CA59lmnyw9AQIECDwVUMBPeXxJgAABAgTmCCjgOa5OzRaQngABAi8FFPBLIg8QIECAAIHxAgp4vKkTCWQLSE+AwFsCCvgtJg8RIECAAIGxAgp4rKfTCBDIFpCewNsCCvhtKg8SIECAAIFxAgp4nKWTCBAgkC0g/SEBBXyIy8MECBAgQGCMgAIe4+gUAgQIEMgWOJxeAR8m8wIBAgQIELguoICvGzqBAAECBAgcFtiqgA+n9wIBAgQIECgSUMBF8K4lQIAAgWwBBbzN/gUhQIAAgU4CCrjTtsxKgAABAtsIKOBtVpkdRHoCBAh0E1DA3TZmXgIECBDYQkABb7FGIbIFpCdAoKOAAu64NTMTIECAQHsBBdx+hQIQyBaQnkBXAQXcdXPmJkCAAIHWAgq49foMT4BAtoD0nQUUcOftmZ0AAQIE2goo4LarMzgBAgSyBbqnV8DdN2h+AgQIEGgpoIBbrs3QBAgQINBd4FoBd09vfgIECBAgUCSggIvgXUuAAAEC2QIK+Pz+vUmAAAECBE4LKODTdF4kQIAAAQLnBRTwebvsN6UnQIAAgUsCCvgSn5cJECBAgMA5AQV8zs1b2QLSEyBA4LKAAr5M6AACBAgQIHBcQAEfN/MGgWwB6QkQGCKggIcwOoQAAQIECBwTUMDHvDxNgEC2gPQEhgko4GGUDiJAgAABAu8LKOD3rTxJgACBbAHphwoo4KGcDiNAgAABAu8JKOD3nDxFgAABAtkCw9Mr4OGkDiRAgAABAq8FFPBrI08QIECAAIHhAq0KeHh6BxIgQIAAgSIBBVwE71oCBAgQyBZQwG32b1ACBAgQ2ElAAe+0TVkIECBAoI2AAm6zquxBpSdAgMBuAgp4t43KQ4AAAQItBBRwizUZMltAegIEdhRQwDtuVSYCBAgQWF5AAS+/IgMSyBaQnsCuAgp4183KRYAAAQJLCyjgpddjOAIEsgWk31lAAe+8XdkIECBAYFkBBbzsagxGgACBbIHd0yvg3TcsHwECBAgsKaCAl1yLoQgQIEBgd4HnBbx7evkIECBAgECRgAIugnctAQIECGQLKODH+/cNAQIECBCYJqCAp9E6mAABAgQIPBZQwI9tsr+RngABAgSmCijgqbwOJ0CAAAECPwso4J9dfJotID0BAgSmCyjg6cQuIECAAAEC3wUU8HcTnxDIFpCeAIFbBBTwLcwuIUCAAAECXwUU8FcP/yJAIFtAegK3CSjg26hdRIAAAQIEfgko4F8WfiJAgEC2gPS3CijgW7ldRoAAAQIE/hFQwP84+JMAAQIEsgVuT6+Abyd3IQECBAgQ+PhQwH4LCBAgQIBAgcBSBVyQ35UECBAgQKBEQAGXsLuUAAECBNIFFPAyvwEGIUCAAIEkAQWctG1ZCRAgQGAZAQW8zCqyB5GeAAECaQIKOG3j8hIgQIDAEgIKeIk1GCJbQHoCBBIFFHDi1mUmQIAAgXIBBVy+AgMQyBaQnkCqgAJO3bzcBAgQIFAqoIBL+V1OgEC2gPTJAgo4efuyEyBAgECZgAIuo3cxAQIEsgXS0yvg9N8A+QkQIECgREABl7C7lAABAgSyBT4+FHD6b4D8BAgQIFAioIBL2F1KgAABAukCyQWcvnv5CRAgQKBQQAEX4ruaAAECBHIFFHDq7uUmQIAAgVIBBVzK73ICBAgQSBVQwKmbz84tPQECBMoFFHD5CgxAgAABAokCCjhx6zJnC0hPgMASAgp4iTUYggABAgTSBBRw2sblJZAtID2BZQQU8DKrMAgBAgQIJAko4KRty0qAQLaA9EsJKOCl1mEYAgQIEEgRUMApm5aTAAEC2QLLpVfAy63EQAQIECCQIKCAE7YsIwECBAgsJ3BrAS+X3kAECBAgQKBIQAEXwbuWAAECBLIFFPBt+3cRAQIECBD4JaCAf1n4iQABAgQI3CaggG+jzr5IegIECBD4KqCAv3r4FwECBAgQuEVAAd/C7JJsAekJECDwXUABfzfxCQECBAgQmC6ggKcTu4BAtoD0BAj8LKCAf3bxKQECBAgQmCqggKfyOpwAgWwB6Qk8FlDAj218Q4AAAQIEpgko4Gm0DiZAgEC2gPTPBRTwcx/fEiBAgACBKQIKeAqrQwkQIEAgW+B1egX82sgTBAgQIEBguIACHk7qQAIECBAg8Fpg5wJ+nd4TBAgQIECgSEABF8G7lgABAgSyBRTwrvuXiwABAgSWFlDAS6/HcAQIECCwq4AC3nWz2bmkJ0CAwPICCnj5FRmQAAECBHYUUMA7blWmbAHpCRBoIaCAW6zJkAQIECCwm4AC3m2j8hDIFpCeQBsBBdxmVQYlQIAAgZ0EFPBO25SFAIFsAelbCSjgVusyLAECBAjsIqCAd9mkHAQIEMgWaJdeAbdbmYEJECBAYAcBBbzDFmUgQIAAgXYCQwu4XXoDEyBAgACBIgEFXATvWgIECBDIFlDAw/bvIAIECBAg8L6AAn7fypMECBAgQGCYgAIeRpl9kPQECBAgcExAAR/z8jQBAgQIEBgioICHMDokW0B6AgQIHBdQwMfNvEGAAAECBC4LKODLhA4gkC0gPQECv+uE6gAAAkNJREFU5wQU8Dk3bxEgQIAAgUsCCvgSn5cJEMgWkJ7AeQEFfN7OmwQIECBA4LSAAj5N50UCBAhkC0h/TUABX/PzNgECBAgQOCWggE+xeYkAAQIEsgWup1fA1w2dQIAAAQIEDgso4MNkXiBAgAABAtcFOhfw9fROIECAAAECRQIKuAjetQQIECCQLaCAu+7f3AQIECDQWkABt16f4QkQIECgq4AC7rq57LmlJ0CAQHsBBdx+hQIQIECAQEcBBdxxa2bOFpCeAIEtBBTwFmsUggABAgS6CSjgbhszL4FsAekJbCOggLdZpSAECBAg0ElAAXfallkJEMgWkH4rAQW81TqFIUCAAIEuAgq4y6bMSYAAgWyB7dIr4O1WKhABAgQIdBBQwB22ZEYCBAgQ2E7gUAFvl14gAgQIECBQJKCAi+BdS4AAAQLZAgr47f17kAABAgQIjBNQwOMsnUSAAAECBN4WUMBvU2U/KD0BAgQIjBVQwGM9nUaAAAECBN4SUMBvMXkoW0B6AgQIjBdQwONNnUiAAAECBF4KKOCXRB4gkC0gPQECcwQU8BxXpxIgQIAAgacCCvgpjy8JEMgWkJ7APAEFPM/WyQQIECBA4KGAAn5I4wsCBAhkC0g/V0ABz/V1OgECBAgQ+FFAAf/I4kMCBAgQyBaYn14Bzzd2AwECBAgQ+CaggL+R+IAAAQIECMwXWLmA56d3AwECBAgQKBJQwEXwriVAgACBbAEFvOr+zUWAAAECWwso4K3XKxwBAgQIrCrwJwAAAP//lVwoVAAAAAZJREFUAwDU5ALRcl29HAAAAABJRU5ErkJggg==</pentrails><costumes><list struct="atomic" id="174"></list></costumes><sounds><list struct="atomic" id="175"></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="180"><costumes><list struct="atomic" id="181"></list></costumes><sounds><list struct="atomic" id="182"></list></sounds><blocks></blocks><variables></variables><scripts><script x="458" y="128"><block s="receiveGo"></block><custom-block s="UpcCodeChecker"></custom-block></script></scripts></sprite><watcher var="codeList" style="normal" x="10" y="10" color="243,118,29" extX="80" extY="70"/><watcher var="oddSum" style="normal" x="5" y="114.000002" color="243,118,29"/><watcher var="evenSum" style="normal" x="15" y="141.00000799999998" color="243,118,29"/><watcher var="checkDigit" style="normal" x="18" y="174.00000599999998" color="243,118,29"/><watcher var="savedSum" style="normal" x="25" y="196.000004" color="243,118,29"/></sprites></stage><variables><variable name="codeList"><list struct="atomic" id="194">5,6,7,4,3,2,4,5,6,7,8,8</list></variable><variable name="oddSum"><l>99</l></variable><variable name="savedSum"><l>143</l></variable><variable name="checkDigit"><l>151</l></variable><variable name="evenSum"><l>44</l></variable></variables></scene></scenes></project><media name="upc code checker" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"></media></snapdata>