<snapdata remixID="14826329"><project name="UPC CheckerProgram" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAANzUlEQVR4AexdCWxVVRr+Xl/3zQIFyr60lh2GDsIwLCpFwHEokBDWGBkzA4kWKyhOopMYnUlmoqMBCTo6CUMcB4oxLsnIgFMXFMGBKo4oWyl7pYVCW7aWlra+78f7eLfta5+8Prjv3r/J9+49557t//6v5557znn3RTTqnzJwCxmIgP4pA7eQARXgLSRfqwZaFOCePXtw7tw5VFVV3VSUlZXhu+++U784iIFmAiwoKEBycjIuXLiAysrKm4qamhrExcVh586dDnKBs001CZA9X0ZGBjxjUqxcuRK33XYb1q5diwceeACPPPIIXnnlFaxZswbV1dVynUJhui+++ALz5s3DwYMH8cYbb0h+lnEjiIiIQExMjAjf2a5xhvUmAXbr1g0NDQ0Cioe3RIOGRYsWgeGRI0fihRdewPTp07F792507NgRFO7kyZOxfft2XL16FQkJCVKGUdZPPSYlJYmYjbpDctRCLcGASYBut9vbey1duhQvv/wycnNzpfcbPnw4li1bhtraWjzzzDP4+OOPkZeXh/T0dFCc58+fx4MPPojBgwfjypUr3nIo5BtBXV2dJQjSRoSWAZMAKRT2VjzyNvj000+DorzrrrvQoUMH9OzZU3q+2NhYEWNUVBSmTZsmvSDTsufLzs5GfHy8pGeeQFFbUw3Wa9TP89CarqVbgYEI30bQ6QRF8M3W93FoxRCUPTUU2/84G//58+9CgtKnhksdace2yG3bqN+3XaE457Bhx44dCAX27t0biibbsswWBUgRnD9ZhEGpUSgZlYthj/4D43Nf9OLuR1ch4eezEDtiequIGzkDE3zy+ZYxevFf8LNFz+L07LWI6tQbCVEu6QFZt4FQMH78+HF8+umnMk7t2rUrAkHfvn1Rtvd/OLrt3TaRkpwE3iE++eQTsK5Q2GCnMk0CpGHs/QigEXviRyJ90nzpmRhn4Mu/PYv0fy7FwPxlrWLA+jyg8H0ZE3JcyGkWlsEpnoqKClaH4yWlKB86X84pPF4neC6R7fzBJ/UuXbrIWJbjWX9ge41rVRVnMeTL5zG9fEObSP/+v1J2WlqaPJy1c/NtV5xJgHT6dQC9+mV4xcepFk7DUBzui+cQ43YhKuIakgZkIf3FAm/YiOex4ez30rNxLMkpFuYvLS3FyZMnZXxJQZQnpguxvGbULxHt/FFYWAhf8b300kvIz8/Hc889h9OnT4Nh/mPwSPA2TRFevngRiTEub2tif7MO0ZOXIW7JRkSNWeiNN06Yh+jevTv4cGbEW+RoqWa0IsBGRMbEiwApijFjxiA6OlrCTS2Iz8rG+Y/yETdsfNNLIj7mf+edd8CHFkNkLpcL5eXlGDRokLdMpvNFs8KCjLh06ZK3N+YqT79+/dC/f3/MnTsXy5cvR0pKCtavX485c+bIgxT/SdgT1tfXm2puvHTWc4OoR33xDriSupiuMcA8BKek2NszTtEyAyYBMgkFQngY9oqHYU6LjB49WuKYzhcXPWOjxoZ6VO/Z5hvtPaeoZs2aBZbB8wbPXCPnFL/99ltZcWGYiXk0wHSMa08MHToUZ8+elVske2OW3adPH/D8sccek15wyZIl0iuOGDFCnuSZpqkAG8qKUH+EqzUuXP3/e0xiAns/4tixY+jRo4fpmgbMDJgESKdfB0RsvoLIzMyU3qrjiHGmUmpLDqFq8zpTHAOuuES4M+8Qh7PH4e3ItzyjLsYxvRHmkeH2RqdOncBxKEGBjBo1SuyJjIwEx2wLFy7EmTNnpEfs1asXKM6LntvvBQ+Spy2X2y5vva6oOLj7j5XmRY6Y4Y3ntYrkDLGXa+kqPqGo1Y9mAqQYCIqA4HlTxPQZiOoZK3ClDZSPXYC63kPFybwl0eksq6Vy2UpeM8A0jGtvzJw5U26vfPrt3bs3AkH/2wegNGMGTvTPaRMXUwcjNTUV6enpGDv2mkjb2wY7lWcSIA2j4wlP/+cJNop4KIqioiLs2rVLwqWbXkfce88jpg10+ug1NGz+u4z9OPinY1gWwTp84alMetymcYxvb1AYXLGhSEKBYcOGyYpQe7fbjuWZBOjrfOOcYiH69u0rA3iOlxqvmpfJYgfega65KxHdM7MZRy7Xtfk94wLLMso2jozjdSNsHBmnsDcDzQRIMRCNjZ4+0PNx7bwRhw8fxsCBA2V805SS+ooyRHZMQ+3Jg00veXu1zZs3w3iKZpkEhcYjwYw8GmBYYX8GmgmQoiA88hPxGIIYMmQI2AuyB/R0aiZmIjv3Qk3RbkR17W2KZ4D5WR7XjH3HgIwzrvHItIzzBeMU9mbAJECa6isA45wC4XwWnxA5ldLn7pnoNP/3XsT/OP+X7Fk18Y1PmfM4MOW3uHz5MkpKSnDq1CmvqI2yeWT5LdXNOIW9GTAJ0BADBeG5+3rFwrAvTpWdxr9X/6lNbHntr2gsKpQVD+6U4S4ZlhMbGytlsz6CcaSZRwMMK+zPQDMBUhBE01swJ3A5X0aB1O7dgbGpUV5MHJKOXy/9gzdsXBuTAtQd2ClPwVxl4A5r5ud8HKdBuDzHyeFr9Xlq9Kie5wbsT79aaBIg6aBACEMEPCc4qfr111/LNAyvMa0Bd4euSPxlDiISPIozIn88Mi3BpTiuKLAsgktgXFnh7meGmZxHA8zDOIW9GTAJkE6/DvZIEMFRFF999RW4z423z6aURHdPx9UzJ+FOTG56ScIsc8GCBUhMTPSWxzJ9wYRMZ4Bh+0At8cdAMwFSFIYIeGSYYI+Vk5MDLk1Fuk3ZZCNCybNzUVd2vFk9rg7dZLzHfNwMwLKI3NxcjB8/HhQ2w8xo1McjwTiFvRkwK8ljKx1/TRCNIhyG+e23EydOeMOxObkoffzdgFBx+zh5CuYWLG5AYHnEqlWrQEycOFF6RU/VcuQ11s8j4xT2ZsAkQDr9OiCC4wQ0F+W5jMapGIrD2FbFc19UVlaCS3bG0y6vce5v//79OHLkiHxjjnEGKL4DBw6I8Ejz9bo9s+CMUNiegWYCNMRBMfCct97Vq1fLd4GPHj0qYuGKxrp16+QL5Bs3bpTvC2/ZsgVvv/02uMVqw4YNIjiOF1kGN51y3x/nAxkm+ERM8XEtlnWRaR55jeA54xT2ZsAkQJpKxxOe/g8lxw7L0tuKFSuQlZXlfYjgdQpo0qRJSEtLE7CH5AZPCpBPt/w2HMd9ERER0pM++eST4G2Y4mJeio/iZo8Z3VjLqkXcLNuAROqHrRkwCZD75Azn85hZdwiFhbvkweODDz6A8cV17nW777775P0x3Fly7733yqZOflmdYqX4fG/DU6dOxRNPPCFbn1JSUuQ2TfEVFxfLjuSso/8SklmnAb4eRCL1I6wZaKvxJgFyDMelNvZSLnc0OkRUY07560g6tAU1FyrkxUF8eVBT7Nu3T+rZunWr3zRGns8++0yW5D7//HPEntkLd/4SDHCflvysl+ADz4QJEyROP+zNgEmA7M24cZQ7l4f/6n6cGHw/ajKy0S81AXfHHsXUuOJ2RWbUOcRljsPxfjn4Jj5LbtX8Hsa4cePszbpa52XAJEDGcsfwnXfeicqqKhR3/AWKe0y9KTh17oLsVObrPbj1n21R2J+BZgKkyZ07dwbHbRzT3UzobZfsOwstCtBZFKi1t5IBFeCtZF/rbvkVvbbgRY0ICwa0BwwLN9m3kSpA+/o2LCxTAYaFm+zbSBWgfX0bFpapAMPCTfZtpArQfr4NK4tUgGHlLvs1VgVoP5+GlUUqwLByl/0aqwK0n0/DyiIVYFi5y36NVQHaz6dhZVG7CjCsLNfGWoIBFaAl3ODcRqgAnet7S1iuArSEG5zbCBWgc31vCctVgJZwg3MboQL04/u33noLr776aoA/ueqnEI1ukwEVoB+KpkyZgg8//BB5eXnyHsM1a9aIIPn6Ej9ZNPoGGFAB+iGN76Z5+OGH5ccU+T3pgoIC8LdO5s+fD/7kRH5+PvgWMD/ZNTpABlSAARLlm4xv/GLY7XbzoAiCARWgH/L4fhzedvkSdf4+yj333AO+BezNN9/Epk2bMG/ePPldYT/ZNTpABlSAfoji6+iys7PlNcLbtm3DQw89hMWLF8tPTvjJotE3wIAK0A9ps2fPBn+8mj/n6ieJRgMIlgQVYLAMav6gGFABBkWfZg6WARVgsAxq/qAYUAEGRZ9mDpYBFWCwDGr+oBhQAQZFn2YOloHwFWCwlmt+SzCgArSEG5zbCBWgc31vCctVgJZwg3MboQJ0ru8tYbkK0BJucG4jVIDh53tbtVgFaCt3hp8xKsDw85mtWqwCtJU7w88YFWD4+cxWLVYB2sqd4WeMCjD8fGarFv8kAdrKcjXGEgyoAC3hBuc2QgXoXN9bwnIVoCXc4NxGqACd63tLWK4CtIQbnNsIFWBAvtdEoWJABRgqZrXcgBhQAQZEkyYKFQMqwFAxq+UGxIAKMCCaNFGoGFABhopZLTcgBlSAAdHk3EShtlwFGGqGtfxWGVABtkqPXgw1AyrAUDOs5bfKgAqwVXr0YqgZUAGGmmEtv1UGVICt0qMXQ82AdQUYasu1fEswoAK0hBuc2wgVoHN9bwnLVYCWcINzG6ECdK7vLWG5CtASbnBuI1SA1vO9o1qkAnSUu61nrArQej5xVItUgI5yt/WMVQFazyeOapEK0FHutp6xKkDr+cRRLTIJ0FGWq7GWYEAFaAk3OLcRKkDn+t4SlqsALeEG5zZCBehc31vC8h8AAAD//wTinvgAAAAGSURBVAMAGtOVJUE7/eQAAAAASUVORK5CYII=</thumbnail><scenes select="1"><scene name="UPC CheckerProgram"><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="listTraverse" type="command" category="other"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doFor"><l>i</l><l>1</l><l>11</l><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="doChangeVar"><l>check</l><block s="reportListItem"><block var="i"/><block var="UPCcode"/></block></block></script><list></list></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="34"><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="35"></list></costumes><sounds><list struct="atomic" id="36"></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="41"><costumes><list struct="atomic" id="42"></list></costumes><sounds><list struct="atomic" id="43"></list></sounds><blocks></blocks><variables></variables><scripts><script x="109" y="10.000000000000014"><block s="receiveGo"></block><block s="doSetVar"><l>UPCcode</l><block s="reportNewList"><list></list></block></block><block s="doRepeat"><l>12</l><script><block s="doAsk"><l>Input UPC digit</l></block><block s="doAddToList"><block s="getLastAnswer"></block><block var="UPCcode"/></block></script></block><block s="doSetVar"><l>check</l><l>0</l></block><block s="doFor"><l>i</l><l>1</l><l>12</l><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="doChangeVar"><l>check</l><block s="reportListItem"><block var="i"/><block var="UPCcode"/></block></block></script><list></list></block></script></block><block s="doSetVar"><l>check</l><block s="reportVariadicProduct"><list><block var="check"/><l>3</l></list></block></block><custom-block s="listTraverse"></custom-block><block s="doChangeVar"><l>check</l><block s="reportListItem"><l>12</l><block var="UPCcode"/></block></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="check"/><l>10</l></block><l>0</l></list></block><script><block s="doSayFor"><l>Valid</l><l>2</l></block></script><script><block s="doSayFor"><l>Invalid</l><l>2</l></block></script></block><block s="doSayFor"><block s="reportJoinWords"><list><l>Check digit: </l><block var="check"/></list></block><l>2</l></block><block s="doIf"><block s="reportVariadicOr"><list><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>0</l></list></block><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>1</l></list></block><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>6</l></list></block><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>7</l></list></block><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>8</l></list></block></list></block><script><block s="doSayFor"><l>Regular UPC Code</l><l>2</l></block></script><list><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>2</l></list></block><script><block s="doSayFor"><l>Random weight item</l><l>2</l></block></script><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>3</l></list></block><script><block s="doSayFor"><l>National Drug Code and National Health related item</l><l>2</l></block></script><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>4</l></list></block><script><block s="doSayFor"><l>Non-food item</l><l>2</l></block></script><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>5</l></list></block><script><block s="doSayFor"><l>Coupon</l><l>2</l></block></script><block s="reportVariadicEquals"><list><block s="reportListItem"><l>1</l><block var="UPCcode"/></block><l>9</l></list></block><script><block s="doSayFor"><l>Coupon</l><l>2</l></block></script></list></block></script><script x="462.34765625" y="101.00000000000006"><block s="reportNewList"><list><l>0</l><l>2</l><l>8</l><l>0</l><l>0</l><l>0</l><l>0</l><l>4</l><l>9</l><l>7</l><l>4</l><l>4</l></list></block></script></scripts></sprite><watcher var="UPCcode" style="normal" x="10" y="10" color="243,118,29" extX="80" extY="70"/><watcher var="check" style="normal" x="179" y="29.000001999999995" color="243,118,29"/></sprites></stage><variables><variable name="UPCcode"><list struct="atomic" id="281">0,2,8,0,0,0,0,4,9,7,4,4</list></variable><variable name="check"><l>80</l></variable></variables></scene></scenes></project><media name="UPC CheckerProgram" app="Snap! 11.0.8, https://snap.berkeley.edu" version="2"></media></snapdata>