<snapdata remixID="14083286"><project name="4.12 UPC Program" app="Snap! 10.1-dev, https://snap.berkeley.edu" version="2"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAE5tJREFUeF7tXQd0FdXW/m5yU0kIoXdCV+mKT5ooJTQpYmg/EEBABfH5EBcgDxX5fYAoCCqgSAk1hl5C7yKiQIQnRZqE/kMoCZAeUv71nTjDHe4NuYaQm3Nz9lqsIZmZM/vs/eXM7O/ss48pIyMjA0qUBRxkAZMCoIMsrx4rLKAAqIDgUAvYBGBcXBzOnTvnUMUc9fBSpUqhdOnSjnp8gXuuFQB37NiBgICAPDGEm9mM7/vWRxV/c54871EP8S5dFc+PXiouOXnyJDp16uRwnQqCAgYAnj17Fvfv3wfjEpPJ9MSPZlMGyi5on2/s/H+DdiA1NVX0+7fffkO/fv3yjW7OqogBgOHh4ahQoYLo6/r169G5c2fcvn0bffr0ET9369YNw4cPx5o1a7Bx40bcvHkTH3/8sbjm3r17OHz4MAIDA/HSSy9h5MiRAsQ1atTA6dOn8fTTT4uRxd3dHSkpKThy5Ag8zC6osLgjCo0/gfhxteDRaRySw8fDa+Ai3D+yBi4lqsLk6YuM2BtI2T0T7u3HIGXzJHE+cX4//Xrtfp5Pv35K3Jd+85w4pmybAo/O40UbJt+SNo9sm3IheJMAIOXQoUN44403nNXv+aZfBgDu27cPbm5uQrk9e/aIY82aNZGUlCRGhE8//RRz5sxB06ZNxf8jIyNx6tQpeHt7IyEhQQCrcOHCiIqKgpeXl7if31PXr1+Hv78/YmJi4OLigvT0dPz666/w9XJHxaVdYHL3hnuHfyMj9ibMDV4VwLl/IBRpf+4DMtJhfjYIqQeWIi3qDLwGLc48/8sicX3Kzq/E/a5VGonz7i3eEfe5VmsmjqlHN8Bcp0NmG4dX2TwmLRwkdD3ba53oAyUiIgLDhg3LN45yVkWsvgEJwtx+Bb/44ov46aefrNot4uuNgNBX841t/whaKQDI/sfHx6Ndu3b5RjdnVcQKgNOnT0edOnXyrL+tWrXKs2c96kEcnfkJQVm1ahVmzZqVL/RydiVs0jD8puMrMq+lWLFiaNSoUV4/Vj3PgRawAuCPP/4oaJi8iIKzetUfPHhQBDxKnN8CBgAyWvXw8BC9Xrp0KYKDg/HJJ5/gzTffFIEHz61evRpFihQRgcTy5ctFVKzJ5s2b0b59Jq1iNptFREkwX7hwQfyO5HbVqlXtsmrJkiVFcKPEuS1gRcPUrl1b9JhA4yj05Zdf4uuvv8Y333yDESNGCEpl/vz5GDhwoLiOAAsKChLfTbNnz8aUKVOwadMmAR5yir6+voKKIcdI2kYDeHZmZTDACFyJc1vAAMB169ZBAyC7XbFiRdy9exfFixfXp+YqV66My5cvgyMUR0GOcqRWOOIRXIwe+Xs/Pz/dcsnJyUhMTEShQoVw6dIluyzKdhUA7TKV1BdZAbBWrVr5okME4FNPPZUvdFFKPDkLGADIGQ4NgG6mdHjPCgRMmQ+/75L5bZib4pKRBteMzJkHz8bBiKo3QG+eo6gCYG5aO3+2ZQXAZ555RmiaHBeDKst74PtSw8U33sOSnpYG2JHLanJ1FRG1LUlLS8O9swdRbdcocfrqwO0GAHL6TolzW8AAQAYSGgDvJ9xFfPhElO7/lZUFEu/FwPRha7jaxpXheu86zXB/8Ffiu5DC70UKp+7474cffkCDKqXQ9fJMXB6w1XCvAqBzg4+9swlA8nOpifewf/tGtOnxurACI1qmapFmuXnlIvynGEfFGuujcX5wfdy/YR1kmKdHiOkt8cC/RkNGuQxMevXqBdI3JWe/jEv9t+j8I6/V/hic3w0Ft4cGAK5YsUJ3elpSLPZtDRcA1AhjRsldunTB7auX4T/VCMBSw6YhauZ7Ni1pmnoAH374ISZOnCja4j9mxjD58/fff0eLFi1QZm4rXOy3Wb+fQFUAdH5gWgFQe+2lJ8dh75b1aNP9QWBACubixYs2AVh18WmcC86Ct5vyK1xdXYU1+d1H2b17t25dArDsvNY433ejPkLyVa0AWMAAyJkNPfK8n4A9m9YaAKiNhLevXUGJaT3ssk6xsctw06+CSMWiMC2LwnQvrb2XX34Z5UPaILLPBr1NAja/UEJ2dVRdlCMLGEbAZcuW6QA0pSZi98Y1AoCWKzf5aixTpgz+2aUl4hMSsn3ojDXbcederN4GRza2p+Ubsj0msFZc2A7neofr7ZHYVgDM1rzSX2AAYFhYmD774JqejJ3hKxHY7cErWOttwp3bKPJ5V7s7nzJxr56gysCDwqQHTQjAgMUdREKoJkyMtZyVsfth6kKpLGAAICkRbfrLnJGCHetWIPCvEZAjFafROD0XH30TRacas1U8qtRF8vljNrnBpP/sEdNwFFIvHAH37t2rv4KbN2+OKks74kzPtbrxmLqvACgVlnKkrAGAoaGhInGA4m5KxbY1y9C6W3/xc2xsLJ599lmRVJB0N9oKgG4lKyA9MR5psdFWiiT87y5wqWeTJk1w9OhRcZ4A1IQArPZDZ5zqvlr/HeeV8zIxNkfWUzc9tgUMAGQKFkdAjlAeLmnYujpMB6Dlk5LvxVgB8FGaxI/fKdaKULh4yRYAq4d1wcluq3Qe0NPTUwHwsd2b/xswAHDJkiViBCQAvcwZ2Lwy1ABALWpNS01FpfTMqDY78a7dFGfOnBELm0S7fy1WslwjwjUjNZd3xYnXVugA5HV169bNrnl1XnILGAC4ePFiHYDebsCmFUvRKsh6bWyN6tWwv2sAinpkTqs9SgL+OQ2XStbSlzsyuqUQgJoQgE+vDMLxrst1ADKfUAEwO+vKf94KgNWqVRO9KuRuQviyxWj9FwA5dfb2229j7ty5yEiK/1uv4Jixm0VOIeXWrVvieOzYMZFr2KxZM/FzrdXdcbRLmE5EE4D16tWT38KqB4+0gAGAixYtggZAHw8XrA9bJACovXo5b0uqBskJVgAsMzoE1yZnzhs/LLfHbBQJrBRmRWtiuSakztqeAoCaMGpWAHR+9BoAuHDhQn3NRmEvM9aGLkCr14KFFRgFv//++2IENKUkWgGQyQjRy6fi1pIJVla7OTpcLFAntZJVRnS99f+D/3YK1e/18fFB/fr1nd8DBbyHBgAuWLBAB6CftxvWLJlv8xsw6sKfqLN8hN2muzFqvZg9oVy7dk0c+d1H0b4F64f3xpGOmcWBKFxLogBot4mlvdAAwJCQEFSpUkV0xt/HA6sWzRUAfHgq7kn8/NymYPzWYbFuSNI2DRo0kNawSnH7LGAAIFe7aQAs6uuJlQvnwL9ybVGkiMLFSNkJS3togYV2LQsbvfLKK3j33Xcxc2ZmISBNGIyQcG64uR8i2i/Sf89FTQqA2Vlb/vMGAM6bN08AkCNccT9vLA+Zjcux6WBwMnbsWLRs2VL0mAvHe/fuDX4zMjBhOY/WrVsLgDKLhUmr2lpgXr9//34xC/Lee+9h2rRputWOHz+uT7f9Y+sAHGy7QKdhuPaYMy9KnNsCBgAywNAAWKJIIfyy8DP8fKewWA/Mb7Lz588LgHA+mOuCCTqOdizlsW3bNrRp00ZUyyLYmH7F1CsCccKECeIcgct1wwT4iRMnRLYLj17J0eh9OwQH2oToAOS9CoDODT72zgDADRs2gFNglJL+PmJR0rq6k0QtP1Y1GDp0aJYW4euS19kjf/zxh0g21Y6xGyejredZ/NJ6ns4DEuTavLQ9bapr5LSAVW2Y7dszV6aVKuorAEgZEdMOjcpkZjTnplyPice7Xpl1CCkEoCYsdKnE+S1gBcCpU6fq32Vt27bNMwuwIml0dLQgqvv27Ztnz1UPcqwFbJZny49V8klM21vYyLEmVU//OxawAmBeVclnvt+cPnVQyS/7Cvmd558U88YUzqbw+1CJc1jAAMC8rJLv7emOEt/bVx3V9YMInL92S0TPHJ1feOEF57C+6oUxCrasks9KBuT9WA2f5dnGjx+PcePGiciUc8Jcs8GRaOfOnShfvjyqV6+OXbt2iSh25cqVom4gk1t5nssuyQ9yXfF3330n7vf19kSpeW2ECzz7foekJUPg+XoIkkJe16vma/5x+eAQzly8pidFkL7RiqkrH8ptAcMIaFkln7MXnK9l3WQmEpAD5LpgrtMg10cwkbhm2hSznPmPtQP5M+mV7t27i5Jt/JkV9snrMd+QZDQpHX8/X5QNySwC7hk8G0lLh8Kr/3wkhgwQVe8zUh6suDONOojjf17ULU1+UAFQbuBp2lt9Az6JKvm2SvGWLOaPcgs72GfFkQfw31PnxAjIZIYePexbk2xf4+oqR1rACoB5WSXf3gr5fI1TOAoPHjzYkfZSz85lC0hDw2j9VnRMLiPAwc05jIbR+q3oGAcjwMGPdxgNo20DkVM6hhnaak8RB6MnFx5vAKAlDcNFSKySX7RoUXz++ediawZts8KPPvoIb731ltio0BYdo1W++rt0jCUlIzYWjLsl9orT6ZjRh3DmUmZGNUXRMbmAAAc3kSUNQ/BwQ0JSK8x0IXdnuVkhRzAmk+YmHaNTMkuGwOTmBZNfGbHrpR6yKzrGwXDJ/cc7jIbRXsGKjsl9p8rUokNpGM1Qio6RCTK5q6t0NIyt7itqJndBkZetOZyGsdVZRc3kJQQc+yyH0zC2duX0cndDiTn2ZcqYx0Tg3NWbIgmC89G5Rc2UKFEC77zzjkjAUPLkLJAlDcOtsjp06IAtW7YYsmImTZoE1nTmEktmv7CUBxcoMWq+c+eOWFPCFXMs9ca0+kGDBomMGmZas/oWgcKMGtI7THTgNayQOnnyZDHXy3xEy0wZretaxszDptAyZfh73s9kidxKVOja9UEVWCZgsLK/kty1QJY0DHfL5CjA1W2WWTFXrlzBqFGjMGPGDLFqjdt7kR/UMmCuX78O/uOmhawDze0ZWOeFeXxsj8LsGqbfk2vkAvSoqCg899xzIoWLFbEsM2V0ADJjZskQqwqsTzpTxhKElqZndjZX+Cl5PAs4nIax9QouUbTI38qUOXLyTzGyXr16FT179nw8izx0d1YA5B+UtoArVx9YwBrLFzSMLZvnB2rGEnxMU+NGPvz8UJJ7FrBJw7BWNBeX56Uw1YqZ0/lF+LmgAPfkvWEFQJbTtZVAautV+ajrvvlgMD6ufCHbHnDruOg3d+gVEdQm1dmazKkuMADwwIED+nYK7CUDDVIRlsL9PRiUNGzYUESxWcn37/fExPqxMLkXgkefGWKth8/kS4gbXVE/avdym1Zuhkjhjp2K+nAqjD2yMwYAch1IuXLlxA1MdyKvxr3hWL2KkSzXgHArL74qGQGz1guj12+//VYsl2S6fNOmTUVku3BMMCY2iBNtcbFRcti/4Nl7JpJCh4lj4rzMwpcU7hHHiJjCBepDhgwpOB4o4D01AJDFIsmhacsfIyMjxZaqBBXrvhBgnPYi+Fg1gaDhoqPPPvtMcH8aBUOwho4bhEkN4uDWsDs8uk9F3JjK8Hp9IRJD+mce5z2ofnC6xxoxAvK5pH+++OKLAu6WgtN9q29Ayy20HscM28LmYEzhB5vRPKoty8KUJKWVFBwL2IyCuXySZDFFCz6yMklunWcZN4JPVcQqOOAT+MqwrLdr0Xeu3SXZ6ijhZtbaH4GjdFDPffIWsAIgt2F4/vnnc/Rk14xUbP1XE5hdTDm6XwQspSqj0ZjM7Ro499qxY8cct6VuzP8WMACQ87Ocl82pzBreDf9p4o5jLaajTLnyojrqiZEj4ZZN4Urut9Qu0B/FGviIR19/Y5dOy0RERCA4+EHEnFPd1H350wIGAGp7ummqMjFA292yWLFiqFSpks79lS1bVux+xPM///yziJTnjuyFf3R7G41bttd7ywyZ1IYNUW7LFlxtl1mKo8jAgbgzf76VRcoE+qNoAx9cHrBVByBpGWbUKHFOCxgAyAVI5P80CQgIEEEBKRimOZFmady4seD/tO9DAnP27NmCmF707354dfTXqBRQWW+DRY5u1KyJ4pMnI+3SJWRERsJcujQ8WrbEjQkTUG70aNzZsQNxS5bArUYNVO2ajou9V+m8IEdAxQs6J/jYKwMAuYsRM0q0yJZgY1oVCWm+Trl1grabppZzx3PkAjlSkft7qXU7NAgapluMe490mjABnoGB8KlbF3EXLgCRkfBu3hwxYWHwCwrC3bVrYfbxQeXXzHBLjxUbVycnJws9CMCHZ2Oc1x0Fr2dWQQgTS7mvW07mg1dOGCrI55DUF+H9TAtERp5H1/R0uMfHP9qyMTGoUP6wAB+F27Zye1cCkH8A3PZBiXNawCYNoxUDykmX7U2jyqptJsBqc8ycF541a1ZO1FD3SGKBLHlASfRXakpuAQVAyR0ou/oKgLJ7UHL9FQAld6Ds6isAyu5ByfVXAJTcgbKrrwAouwcl118BUHIHyq6+AqDsHpRcfwVAyR0ou/oKgLJ7UHL9FQAld6Ds6isAyu5ByfVXAJTcgbKrrwAouwcl118BUHIHyq6+AqDsHpRcfwVAyR0ou/oKgLJ7UHL9FQAld6Ds6isAyu5ByfVXAJTcgbKrrwAouwcl118BUHIHyq6+AqDsHpRcfwVAyR0ou/oKgLJ7UHL9FQAld6Ds6isAyu5ByfVXAJTcgbKrrwAouwcl118BUHIHyq6+AqDsHpRcfwVAyR0ou/oKgLJ7UHL9FQAld6Ds6isAyu5ByfVXAJTcgbKrrwAouwcl118BUHIHyq6+AqDsHpRcfwVAyR0ou/oKgLJ7UHL9/x9SBpg+0nr5eQAAAABJRU5ErkJggg==</thumbnail><scenes select="1"><scene name="4.12 UPC Program"><notes></notes><hidden></hidden><headers></headers><code></code><blocks><block-definition s="oddsCalculator" type="command" category="motion"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>oddCalculator</l><l>0</l></block><block s="doFor"><l>i</l><l>1</l><l>6</l><script><block s="doChangeVar"><l>oddCalculator</l><block s="reportListItem"><block s="reportDifference"><block s="reportVariadicProduct"><list><block var="i"/><l>2</l></list></block><l>1</l></block><block var="UPCCodeList"/></block></block></script></block><block s="doSetVar"><l>oddCalculator</l><block s="reportVariadicProduct"><list><block var="oddCalculator"/><l>3</l></list></block></block></script></block-definition><block-definition s="evensCalculator" type="command" category="motion"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doSetVar"><l>evenCalculator</l><l>0</l></block><block s="doFor"><l>i</l><l>1</l><l>5</l><script><block s="doChangeVar"><l>evenCalculator</l><block s="reportListItem"><block s="reportVariadicProduct"><list><block var="i"/><l>2</l></list></block><block var="UPCCodeList"/></block></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="61"><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="62"></list></costumes><sounds><list struct="atomic" id="63"></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="68"><costumes><list struct="atomic" id="69"></list></costumes><sounds><list struct="atomic" id="70"></list></sounds><blocks></blocks><variables></variables><scripts><script x="30" y="10"><block s="receiveGo"></block><block s="doSetVar"><l>userCodeInput</l><l>0</l></block><block s="doAsk"><l>Input a UPC-A code</l></block><block s="doSetVar"><l>userCodeInput</l><block s="getLastAnswer"></block></block><block s="doSetVar"><l>UPCCodeList</l><block s="reportNewList"><list></list></block></block><block s="doSetVar"><l>codeNumberIndex</l><l>1</l></block><block s="doIfElse"><block s="reportVariadicAnd"><list><block s="reportIsA"><block s="getLastAnswer"></block><l><option>number</option></l></block><block s="reportVariadicEquals"><list><block s="reportTextAttribute"><l><option>length</option></l><block s="getLastAnswer"></block></block><l>12</l></list></block></list></block><script><block s="doFor"><l>i</l><l>1</l><l>12</l><script><block s="doAddToList"><block s="reportLetter"><block var="i"/><block s="getLastAnswer"></block></block><block var="UPCCodeList"/></block></script></block></script><script><block s="doSayFor"><l>Invalid UPC code</l><l>2</l></block></script></block><custom-block s="oddsCalculator"></custom-block><custom-block s="evensCalculator"></custom-block><block s="doSetVar"><l>finalSum</l><block s="reportVariadicSum"><list><block var="oddCalculator"/><block var="evenCalculator"/><block s="reportListItem"><l><option>last</option></l><block var="UPCCodeList"/></block></list></block></block><block s="doSetVar"><l>isValid</l><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="finalSum"/><l>10</l></block><l>0</l></list></block></block><block s="doIfElse"><block s="reportVariadicEquals"><list><block s="reportModulus"><block var="finalSum"/><l>10</l></block><l>0</l></list></block><script><block s="doSayFor"><l>Valid UPC code</l><l>2</l></block></script><script><block s="doSayFor"><l>Invalid UPC code</l><l>2</l></block></script></block><block s="doReport"><block var="isValid"/></block></script></scripts></sprite><watcher var="userCodeInput" style="normal" x="10" y="10" color="243,118,29"/><watcher var="UPCCodeList" style="normal" x="10" y="31.000001999999995" color="243,118,29" extX="80" extY="70"/><watcher var="evenCalculator" style="normal" x="10" y="145.00000599999998" color="243,118,29"/><watcher var="oddCalculator" style="normal" x="10" y="124.00000399999999" color="243,118,29"/><watcher var="codeNumberIndex" style="normal" x="10" y="166.00000799999998" color="243,118,29"/><watcher var="finalSum" style="normal" x="10" y="186.00000599999998" color="243,118,29"/><watcher var="isValid" style="normal" x="11" y="208.00000799999998" color="243,118,29"/></sprites></stage><variables><variable name="userCodeInput"><l>734892437289</l></variable><variable name="UPCCodeList"><list struct="atomic" id="188">7,3,4,8,9,2,4,3,7,2,8,9</list></variable><variable name="evenCalculator"><l>18</l></variable><variable name="oddCalculator"><l>117</l></variable><variable name="finalSum"><l>144</l></variable><variable name="codeNumberIndex"><l>1</l></variable><variable name="isValid"><bool>false</bool></variable></variables></scene></scenes></project><media name="4.12 UPC Program" app="Snap! 10.1-dev, https://snap.berkeley.edu" version="2"></media></snapdata>