<snapdata remixID="12258785"><project name="UPCCode" app="Snap! 8.1, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAACydJREFUeF7tnQlQFskVxx/iKqxkDWgFNGgpErx1NVieqBiMriURUQREdI1aSTSilnd53/Hc1G7VplxXo6BcCguCiEJ537eiZnVFN4IGT+K6inwcpl5vpmXgkyVZ6uth/HeVhTPffP1e/9+vXndP98xn9/r169eEAgUUKWAHABUpD7NCAQAIEJQqYBXAq1evUmZmJnHvbGdnV+Gv5nF1f+7q6koBAQHk6OioVBQYt50CFQBMTU2l9u3b/5Ae/wuf5o6tjs+cOUNBQUG2UwGWlCmgA/DYsWPk7u4unDl37hz5+fnRtWvX6M6dO7R9+3YqKCigxMREunv3LnXq1IkiIyOpd+/e0vkJEybQpk2bqqUxzZo1q5Z6UImxFdABuG7dOho2bJjwODs7m7y9venBgwd09uxZGjVqFI0fP57mzZtHycnJFBwcTK9evaLCwkKKiIighQsX0rJly2j//v20ePFiCg8PFxm0fHdd1ePmzZsbWzl4Vy0K6ABcs2YNDR8+XI75PDw8RNZzcHCg27dvC4MtWrQQcPJfi8UiAHRycqLnz5+L67Rjzpplx4jlu/HyY8vyn3P9KOZXQAfg6tWrZQZU3XRPT0/VLsC+DRTQAbhq1SqZARs3cqPvFrQh+1pEN3/WiXLf96K8Ou5WZ8Vvmw3/2Pnm32dRt6f7RDOdfD6me21Hy/q9vLxs0HyYUK2ADsCVK1fKDFj4PJ88do6gw13+Qu269NT52bRpU7p64RyVlBRX6n9paSm5uP1SNxbUvvDkyRMqKioiNzc3avC5jzh97/cZsr6WLVuq1gb2baCADsDly5fLDFj04hm9TF1BrmM+reDGOv/ONMXjzQSjMj/dY3PpxIkTpE0qatWqJS7nvwzh7NmzKSL0I/K98VfK+XifzICtW7e2QfNhQrUCOgB5FqvNgotffkdZ+2OoW3CE8PH69evk4uIiMlZkSHcKa/Qm+zUcs4gcPD+k3AVDK7THI/EhHTp0SAKoXVC7dm0B4KxZs2jjxo3k+oUv3R2TLr/fpk0b1drAvg0U0AG4dOlSASCP3UpffU9pmYd0s+Lc3FxxnzAqtIcOwEbTv6BSSwE9+GzKWwHs378/3bp1S9TN/y5cuEB8r+/y5cvk6+tLjb78Df1z9F7xff68Xbt2Nmg+TKhWQAfgkiVLKDAwUHSDDOCejIPyuOymmehRPjoAK2tE+QxYXFws6j9w4ID8Wr9+/ajxZj/6NjxN3roBgKrRsI19HYCLFi2SGY8sL2l3eqYuA2qz2gaOdSh/sneVPKz3tyzKy8sTN625NGjQQEDG3bJWX9++fanJ1gF0OyxVjgE7dOhQpfpxUc1WQAcgr2ZoY0C7ogJK3pth9b7gv+/doZOzR1BpFXYShuz+Wizd8Y1qLjyD5nLw4EGpHHfBTbcNpOyRKfJcx44da7ay8L5KCugAnD9/vsx49iWF9NWefRLAixcvUkpKilhyixvrS+GNSqpkoHnCA5HteFWFC6+scOFzWuEM2CxqEH0TkiwzIK81o5hfAR2AvM6rZcDapRZKSNmry4A8S16wYAEljPOrMAZ0X/aV1VlweQBfvHghVD18+LBUt0+fPuSxYzDdDE6S5zp37mx+9dFC/YbUuXPnygxYh4ppZ/IeeRwSEkI3btygS5cuUeL4/joAnYdMpPzkz63KyQByd+vj40NPnz6lx48fi7HfkSNH5BiQd9R4xvyOvg5KlBmQN0KgmF8BXQacM2eOzHh17UooPilVzIK1om0gSP7DAAqrYhfsGnWHTp8+LTYvcHn27JmAjDOgVh8D6BUXQP8YniBtdenSxfzqo4X6DMg3hbXdMI72rykmIdnqLJh3LFflRjFPPG7evGl1Z/XRo0flec6OrXYG0rXAnRLKrl27IjzvgAK6DDhz5kyRATkzMYDRu5KszoI3z/0T/bFOdpXk8YzPEUtxWgbkbpgLd8HafkEGsPWuYXR1aLz4jM8DwCrJW+Mv0gE4Y8YMmfHqvWdHUXEJ4pjLli1bqH79+gLItD/7V5iE/Coxj74JdKsgSLNdeWLGqwHIY0CtK+blve7du4vjtolBlBUQJzOgdr7GK4wGVKqADsDp06fLlQ+nOrUoMnaXLgPy7hbeRJAeMaTKS3EMIE9CtP19Dx8+tOpQ+6RgujIkVnbLPXr0QOjeAQV0AE6bNk1mwA8catPW6HjdGJCh4O5035SA/ykDlgWQt/hb2yfYcXcoXfKPlhmwV69e74D8aKIOwKlTp8qMV9/xPdqyPVaOCcuuBZ/d9gkNfvjmRnJlMrpt/5ZOnTpFjRs3Fpfl5+cLyNLS0og3wGpjwQ9TRtLFwTtkVTwuRDG/AjoA+eEibRbsXK8ufRkZLY6PHz9OvEO5YcOG1bojmqG2t7enkpIS+nVaOJ0fFCXr55vTKOZXQAfg5MmTZQZ0cXKgTdt2iO6Su2YuOTk54pgfXNeeHS4vkda9lj3Pj29yBrx//77uaTkeT0ZFRVFYWBh57x1N5z6KlF/j5TkU8yugA3DSpEkyAzb84H3KiPyEjuVYKCkpidavX0+8QYC7z6ysLDp58iS1bdtWrO3yfcFx48bRo0ePxDW83MY3nPkJOX46Lj09nQYOHChg48c1tczHzxqPHDlSHHfdP5bODNgqMyBv0UIxvwI6ACdOnCjHfAzgv3bMop3PvYiX6LgwTFw4A3LhzMhjOZ6Y8HZ+BjM2Npa4Ht7xfOXKFXEdPyu8du1a8f+MjAwxk46JiaHQ0FCKjo4mb3dHGlWQTKd/+3dxDUMOAM0Pn4h12bdjrVixQt4A/sXPncRDSVucx9KVW/eoVatWxHv03vZ6jp49e4qMd/78eZHRtGLt+ri4OBoxYgTFx8eLB9y7Z44Tl5/02yxvTvNbGVDMr4AOQO46ecLB0PAYsGVSmFDgWGFTumxxpVtFLtWqSLe69yi43g/ZVAOQ4eVd04MGDapWW6jMmApUeDnRhg0bxNiOIeQNAc7OzjbxnF//wct0/M/f31+8bQHF/Arg/YDmj7GhWwgADR0e8zsHAM0fY0O3EAAaOjzmdw4Amj/Ghm4hADR0eMzvHAA0f4wN3UIAaOjwmN85AGj+GBu6hQDQ0OExv3MA0PwxNnQLAaChw2N+5wCg+WNs6BYCQEOHx/zOAUDzx9jQLQSAhg6P+Z0DgOaPsaFbCAANHR7zOwcAzR9jQ7cQABo6POZ3DgCaP8aGbiEANHR4zO8cADR/jA3dQgD4lvDwr3Xyb+cFBQUZOoA13TkAWEkE+RcCtNeM8A8t8ntwmjRpUtNjbij/AeCPhGPo0Io/QctvjeAf2+ZfjkL5aQoAwP8TQIvFQqmpqT9NfXxb/3Ys6KFXoGwXnJ2dLbpg/r1klOpTABnwLVry6+j4HdbWuuDqkx81AUAwoFQBAKhUfhgHgGBAqQIAUKn8MA4AwYBSBQCgUvlhHACCAaUKAECl8sM4AAQDShUAgErlh3EACAaUKgAAlcoP4wAQDChVAAAqlR/GASAYUKoAAFQqP4wDQDCgVAEAqFR+GAeAYECpAgBQqfwwDgDBgFIFAKBS+WEcAIIBpQoAQKXywzgABANKFQCASuWHcQAIBpQqAACVyg/jABAMKFUAACqVH8YBIBhQqgAAVCo/jANAMKBUAQCoVH4YB4BgQKkCAFCp/DAOAMGAUgUAoFL5YRwAggGlCgBApfLDOAAEA0oVAIBK5YdxAAgGlCoAAJXKD+MAEAwoVQAAKpUfxgEgGFCqAABUKj+MA0AwoFQBAKhUfhgHgGBAqQIAUKn8MA4AwYBSBQCgUvlhHACCAaUKAECl8sM4AAQDShX4D7xbQPO6VDT6AAAAAElFTkSuQmCC</thumbnail><scenes select="1"><scene name="UPCCode"><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="enoughDigits?" type="predicate" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doReport"><block s="reportEquals"><block s="reportListAttribute"><l><option>length</option></l><block var="UPCCode"/></block><l>12</l></block></block></script></block-definition><block-definition s="allDigitsButCheckDigit" type="reporter" category="lists"><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="sumEvenDigit" 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="reportEquals"><block s="reportModulus"><block var="i"/><l>2</l></block><l>0</l></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="sumOddDigit" 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="reportEquals"><block s="reportModulus"><block var="i"/><l>2</l></block><l>1</l></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><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="sumOddDigit"></custom-block><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"><block s="reportStringSize"><block var="code"/></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></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="161"><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="162"></list></costumes><sounds><list struct="atomic" id="163"></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="168"><costumes><list struct="atomic" id="169"></list></costumes><sounds><list struct="atomic" id="170"></list></sounds><blocks></blocks><variables></variables><scripts><script x="221" y="187.33333333333337"><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>That code is invalid, it is not enoguh digits</l><l>2</l></block><block s="doStopThis"><l><option>all</option></l></block></script></block><block s="doIfElse"><block s="reportEquals"><block s="reportModulus"><block s="reportVariadicSum"><list><block s="reportVariadicSum"><list><custom-block s="oddDigits*3"></custom-block><custom-block s="sumEvenDigit"></custom-block></list></block><custom-block s="checkDigit"></custom-block></list></block><l>10</l></block><l>0</l></block><script><block s="doSayFor"><l>This is a Valid UPC-A Number</l><l>2</l></block></script><script><block s="doSayFor"><l>I am sorry - that is not a valid number</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"/></sprites></stage><variables><variable name="UPCCode"><list struct="atomic" id="227">0,2,0,3,5,7,1,2,2,6,8,2</list></variable></variables></scene></scenes></project><media name="UPCCode" app="Snap! 8.1, https://snap.berkeley.edu" version="2"></media></snapdata>