Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <project name="circle" app="Snap! 4.0, http://snap.berkeley.edu" version="1"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAACYElEQVR4nO3SsSq3YRjHccdofJAMQgaU1REoq0EWB2G0yQGI+g9SDoDBRrks3sWgcPPrdX0+6/PcV7/hO1cQNJceQG8CJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAnwnaOjo1pZWan19fWan5+vw8PD9KQ/TYBV9fLyUru7ux/+c3Z2VpeXl7+0qI/2AZ6cnHzq/8XFxR9a0lPrAA8ODr70bm9vb/CSvtoGeH9//633a2trg5b01jbA6+vr9ASqaYA3NzdD7iwsLAy501nLADc2NobceXp6GnKns5YB3t3dpSfwpmWAIz0+PqYn/NcESFTLAGezWXoCb1oGuLq6OuTO8/PzkDudtQzw6upqyJ1pmobc6axlgFVV5+fn6QlU4wAfHh6+9X5zc3PQkt7aBlhVtbOz86V3W1tbg5f01TrAqqrj4+NP/b+8vPwzQ5pqH+A/29vbH34/PT2t29vb3xnTiADfubi4qKWlpZqmqaZpqv39/fSkP02ARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJEqARAmQKAESJUCiBEiUAIkSIFECJOoVacO1MgQ0DmUAAAAASUVORK5CYII=</thumbnail><stage name="Stage" costume="0" tempo="60" threadsafe="false" scheduled="false" id="1"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAJAUlEQVR4nO3dXahl513H8T1JmgyJTZhE6uhFsZGKlqqhNb4Rw6HQIYfj3v/ff52sG23wgDpCFKIoXlSxR6EiJGIFCUYMJYUKKkirpW2QGgtKrRXbVCG0sWmSJjZpY5r4QquIeuFucZpJJzNzzjxzDp/P/drPd1+tvdZ+XhYLAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAQ2JnZ+foNE03rlar714ul6/a2to6trGxcdnoLgA4NKrqNVX1W0nuT/LXSf4pyZe6+4kk/5jk00meTfJfSf4jyae6+3eSvGl7e/v60f0AcCDs7u5e0t1vTHJXkoeTPNrd91XVT3X3969Wq29aLBZHTnftarV6eZLXJ/mZJH+4vkk/l+Te7e3tV1/grwIAB8KRqro1ySeq6vEkv9Td33W+H5rkhiS/luSpJO+fpmlrd3f3kr0IBoCD7Eh3V3c/mORvuvuW/Rhkc3Pziu7+0SR/W1WfT7KxH+MAwEVvuVy+sqoe6e6/r6rlhRp3tVpNSR5Pcs88z9dcqHEBYLhpmraq6rNJfmGxWFzwV8Kbm5tXJ7k7yWeqqi/0+ABwQW1sbFzW3b+e5NFpmr5vdM9qtbp5PYv6LaNbAGBfLJfLK5N8IskHuvu60T1fNs/z8SQfS/IbixeZYQ0AB9I8z5cn+dMkv78Y8Mr5TLa2to4l+ask987zfOnoHgA4b/M8X5rknd397ov55nbixImruvuB7v7QwpMwAAddVf1ukg/s7OwcHd1yJrfddttVST6a5I7RLQBwzqrq9qp6YnNz8+rRLS9Vkm9O8tQ0TTeObgGAszZN0zcmebqqvmN0y9nK/3lka2vr2OgWADgr3f3HSX51dMe5qqrfTvLR0R0A8JJV1a3d/Q+bm5tXjG45V+tlU08m+Z7RLQBwRuslR1/o7ptGt5yvqvrJJO8d3QEAZ1RVP5zkz0Z37IX1j4lPV9UPjG4BgK+pqj7U3TW6Y68k+bHu/svRHQDwoqZpel2Sxw7TmbsbGxuXVdWz29vbrx7dAgCnleS96xOODpX1yUk/N7oDAF5gd3f3kiT/tr29ff3olr3W3bd09wdHdwDAC3T3a5N8cnTHftjc3LwiyXPzPF87ugUATrFesvP20R37Jcn9VfXm0R0AcIok76iqHx/dsV+6+86qum90BwCcIslTVfWa0R37pao6ybtGdwDAKarqvzc2Ni4b3bFf1kus7A0NwMXjxIkTVyX599Ed+6m7r0vy7OgOAPiKeZ6PV9VnR3fst6r6oiMKAbhodPe3HtYlSP9fkue7+xWjOwBgsVgsFsvl8qYknxrdsd+SfGlnZ+fo6A4AWCwWi8U8zzckeXx0x35an4z0n6M7AOArlsvllVX1xdEd+2k9CeuZ0R0AcIokn5vn+fjojv3S3d+e5OnRHQBwiiQfrqrvHd2xX7r7h6wDBuCik+SBJHeM7tgv3f3WqvqV0R0AcIqqujPJvaM79kt3fzDJidEdAHCK7e3tb0vy2GKxODK6Za+tZ0D/y+bm5tWjWwDgBarqoWmaXje6Y69N07Tq7kdHdwDAaXX3nUneMrpjryX5vSRvG90BAKc1TdPNSZ5cHKLX0FtbW8eSPLdcLr9+dAsAvJgjST7e3TU6ZK9U1c93932jOwDga6qqZZKPLQ7BU/Du7u4lSR6ZpunG0S0AcCZH1pty3Do65HxV1e1V9djoDgB4Sbr7lu7+5MmTJ182uuVcrVarb0jyVJIbRrcAwEvW3Q8d5BnR3f1H3f3W0R0AcFbmeT7e3U909xtGt5ytquqqesjZvwAcSN39hu5+4iCdkrRcLl+V5Pnuvml0CwCcs+7+5e7+8DzPl49uOZP1/74PT9N0++gWADgv8zxfWlV/V1XvuZhf6c7zfE2Sj1fVm0e3AMCeOHny5MuSvDPJA6vV6uWje77aPM/XJvlIkrtGtwDAnlpvanF3ko9093Wje75sfYrTw0nuXxyCzUMA4LSS/GZ3P7NarW4e3dLdP5Lk6SQ7o1sAYN+tVqtVks8kuXvEGbvr/3vfXlUPdfdrL/T4ADDM+iZ4T5LHk7zpQoy5s7NzNMkdVfX57v6LeZ6/7kKMCwAXnSQbST7X3Q92908sl8sr93qMeZ4vr6rb10/d71qtVt+512MAwEF0pLvf2N3vTvJMkrdV1Q/u7u5ecq4fuLOzc3Sapq0k91TV81X1viSv38toADg01jtRvSPJk0m+UFXv6e5fTHJiuVy+cp7na776mq2trWNJbuju6u47u/t9SZ7r7j+vqp9N8i0jvgsAHEjzPB+vqk5y1/pwh2eSPJ/kf9bbRf5zkn9d32wfTPInSf4gyU/P83zt6H4AOHTmeb5me3v7+u5+xegWAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAODw+V8XTiSdr6EcxQAAAABJRU5ErkJggg==</pentrails><costumes><list id="2"></list></costumes><sounds><list id="3"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites><sprite name="Sprite" idx="1" x="0" y="8.526512829121202e-14" heading="173" scale="1" rotation="1" draggable="true" hidden="true" costume="0" color="80,80,80" pen="tip" id="8"><costumes><list id="9"></list></costumes><sounds><list id="10"></list></sounds><variables></variables><blocks></blocks><scripts><script x="132" y="89"><block s="receiveGo"></block><block s="gotoXY"><l>0</l><l>0</l></block><block s="clear"></block><block s="down"></block><custom-block s="circle - turn %s deg, move %s"><l>10</l><l>5</l></custom-block><block s="hide"></block></script></scripts></sprite></sprites></stage><blocks><block-definition s="map %'function' over %'lists'" type="reporter" category="lists"><inputs><input type="%repRing"></input><input type="%mult%l"></input></inputs><script><block s="doWarp"><script><block s="doDeclareVariables"><list><l>mapone</l><l>mapmany</l></list></block><block s="doSetVar"><l>mapone</l><block s="reifyScript"><script><block s="doIf"><custom-block s="empty? %l"><block var="data"/></custom-block><script><block s="doReport"><block s="reportNewList"><list></list></block></block></script></block><block s="doReport"><block s="reportCONS"><block s="evaluate"><block var="function"/><list><block s="reportListItem"><l>1</l><block var="data"/></block></list></block><block s="evaluate"><block var="mapone"/><list><block s="reportCDR"><block var="data"/></block></list></block></block></block></script><list><l>data</l></list></block></block><block s="doSetVar"><l>mapmany</l><block s="reifyScript"><script><block s="doIf"><custom-block s="empty? %l"><block s="reportListItem"><l>1</l><block var="data lists"/></block></custom-block><script><block s="doReport"><block s="reportNewList"><list></list></block></block></script></block><block s="doReport"><block s="reportCONS"><block s="evaluate"><block var="function"/><custom-block s="map %repRing over %mult%l"><block s="reifyReporter"><autolambda><block s="reportListItem"><l>1</l><l/></block></autolambda><list></list></block><list><block var="data lists"/></list></custom-block></block><block s="evaluate"><block var="mapmany"/><list><custom-block s="map %repRing over %mult%l"><block s="reifyReporter"><autolambda><block s="reportCDR"><l/></block></autolambda><list></list></block><list><block var="data lists"/></list></custom-block></list></block></block></block></script><list><l>data lists</l></list></block></block><block s="doIfElse"><custom-block s="empty? %l"><block s="reportCDR"><block var="lists"/></block></custom-block><script><block s="doReport"><block s="evaluate"><block var="mapone"/><list><block s="reportListItem"><l>1</l><block var="lists"/></block></list></block></block></script><script><block s="doReport"><block s="evaluate"><block var="mapmany"/><list><block var="lists"/></list></block></block></script></block></script></block></script></block-definition><block-definition s="empty? %'data'" type="predicate" category="lists"><inputs><input type="%l"></input></inputs><script><block s="doReport"><block s="reportEquals"><block var="data"/><block s="reportNewList"><list></list></block></block></block></script></block-definition><block-definition s="keep items such that %'pred' from %'data'" type="reporter" category="lists"><inputs><input type="%predRing"></input><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doIf"><custom-block s="empty? %l"><block var="data"/></custom-block><script><block s="doReport"><block s="reportNewList"><list></list></block></block></script></block><block s="doIfElse"><block s="evaluate"><block var="pred"/><list><block s="reportListItem"><l>1</l><block var="data"/></block></list></block><script><block s="doReport"><block s="reportCONS"><block s="reportListItem"><l>1</l><block var="data"/></block><custom-block s="keep items such that %predRing from %l"><block var="pred"/><block s="reportCDR"><block var="data"/></block></custom-block></block></block></script><script><block s="doReport"><custom-block s="keep items such that %predRing from %l"><block var="pred"/><block s="reportCDR"><block var="data"/></block></custom-block></block></script></block></script></block></script></block-definition><block-definition s="combine with %'function' items of %'data'" type="reporter" category="lists"><inputs><input type="%repRing"></input><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doIf"><custom-block s="empty? %l"><block s="reportCDR"><block var="data"/></block></custom-block><script><block s="doReport"><block s="reportListItem"><l>1</l><block var="data"/></block></block></script></block><block s="doReport"><block s="evaluate"><block var="function"/><list><block s="reportListItem"><l>1</l><block var="data"/></block><custom-block s="combine with %repRing items of %l"><block var="function"/><block s="reportCDR"><block var="data"/></block></custom-block></list></block></block></script></block></script></block-definition><block-definition s="if %'test' then %'true' else %'false'" type="reporter" category="control"><inputs><input type="%b"></input><input type="%anyUE"></input><input type="%anyUE"></input></inputs><script><block s="doIfElse"><block var="test"/><script><block s="doReport"><block s="evaluate"><block var="true"/><list></list></block></block></script><script><block s="doReport"><block s="evaluate"><block var="false"/><list></list></block></block></script></block></script></block-definition><block-definition s="for %'i' = %'start' to %'end' %'action'" type="command" category="control"><inputs><input type="%upvar"></input><input type="%n">1</input><input type="%n">10</input><input type="%cs"></input></inputs><script><block s="doDeclareVariables"><list><l>step</l><l>tester</l></list></block><block s="doIfElse"><block s="reportGreaterThan"><block var="start"/><block var="end"/></block><script><block s="doSetVar"><l>step</l><l>-1</l></block><block s="doSetVar"><l>tester</l><block s="reifyReporter"><autolambda><block s="reportLessThan"><block var="i"/><block var="end"/></block></autolambda><list></list></block></block></script><script><block s="doSetVar"><l>step</l><l>1</l></block><block s="doSetVar"><l>tester</l><block s="reifyReporter"><autolambda><block s="reportGreaterThan"><block var="i"/><block var="end"/></block></autolambda><list></list></block></block></script></block><block s="doSetVar"><l>i</l><block var="start"/></block><block s="doUntil"><block s="evaluate"><block var="tester"/><list></list></block><script><block s="doRun"><block var="action"/><list></list></block><block s="doChangeVar"><l>i</l><block var="step"/></block></script></block></script></block-definition><block-definition s="join words %'words'" type="reporter" category="operators"><inputs><input type="%mult%txt"></input></inputs><script><block s="doWarp"><script><block s="doIf"><custom-block s="empty? %l"><block s="reportCDR"><block var="words"/></block></custom-block><script><block s="doReport"><block s="reportListItem"><l>1</l><block var="words"/></block></block></script></block><block s="doReport"><block s="reportJoinWords"><list><block s="reportListItem"><l>1</l><block var="words"/></block><block s="reportJoinWords"><list><l> </l><block s="evaluate"><block s="reifyReporter"><autolambda><custom-block s="join words %mult%txt"><block s="reportCDR"><block var="words"/></block></custom-block></autolambda><list></list></block><list></list></block></list></block></list></block></block></script></block></script></block-definition><block-definition s="list->sentence %'data'" type="reporter" category="operators"><inputs><input type="%l"></input></inputs><script><block s="doWarp"><script><block s="doReport"><custom-block s="combine with %repRing items of %l"><block s="reifyReporter"><autolambda><custom-block s="join words %mult%txt"><list><l></l><l></l></list></custom-block></autolambda><list></list></block><block var="data"/></custom-block></block></script></block></script></block-definition><block-definition s="sentence->list %'text'" type="reporter" category="operators"><inputs><input type="%txt"></input></inputs><script><block s="doWarp"><script><block s="doDeclareVariables"><list><l>result</l><l>thisword</l><l>emptyword</l></list></block><block s="doSetVar"><l>result</l><block s="reportNewList"><list></list></block></block><block s="doSetVar"><l>thisword</l><l></l></block><block s="doSetVar"><l>emptyword</l><l></l></block><custom-block s="for %upvar = %n to %n %cs"><l>i</l><l>1</l><block s="reportStringSize"><block var="text"/></block><script><block s="doIfElse"><block s="reportEquals"><block s="reportLetter"><block var="i"/><block var="text"/></block><l> </l></block><script><block s="doIf"><block s="reportNot"><block s="reportEquals"><block var="thisword"/><block var="emptyword"/></block></block><script><block s="doAddToList"><block var="thisword"/><block var="result"/></block><block s="doSetVar"><l>thisword</l><block var="emptyword"/></block></script></block></script><script><block s="doSetVar"><l>thisword</l><block s="reportJoinWords"><list><block var="thisword"/><block s="reportLetter"><block var="i"/><block var="text"/></block></list></block></block></script></block></script></custom-block><block s="doIf"><block s="reportNot"><block s="reportEquals"><block var="thisword"/><block var="emptyword"/></block></block><script><block s="doAddToList"><block var="thisword"/><block var="result"/></block></script></block><block s="doReport"><block var="result"/></block></script></block></script></block-definition><block-definition s="catch %'tag' %'action'" type="command" category="control"><inputs><input type="%upvar"></input><input type="%cs"></input></inputs><script><block s="doCallCC"><block s="reifyScript"><script><block s="doSetVar"><l>tag</l><block var="cont"/></block><block s="doRun"><block var="action"/><list></list></block></script><list><l>cont</l></list></block></block></script></block-definition><block-definition s="throw %'cont'" type="command" category="control"><inputs><input type="%s">catchtag</input></inputs><script><block s="doRun"><block var="cont"/><list></list></block></script></block-definition><block-definition s="catch %'tag' %'value'" type="reporter" category="control"><inputs><input type="%upvar"></input><input type="%anyUE"></input></inputs><script><block s="doCallCC"><block s="reifyScript"><script><block s="doSetVar"><l>tag</l><block var="cont"/></block><block s="doReport"><block s="evaluate"><block var="value"/><list></list></block></block></script><list><l>cont</l></list></block></block></script></block-definition><block-definition s="throw %'tag' %'value'" type="command" category="control"><inputs><input type="%s">catchtag</input><input type="%s"></input></inputs><script><block s="doRun"><block var="tag"/><list><block var="value"/></list></block></script></block-definition><block-definition s="for each %'item' of %'data' %'action'" type="command" category="lists"><inputs><input type="%upvar"></input><input type="%l"></input><input type="%cs"></input></inputs><script><block s="doUntil"><custom-block s="empty? %l"><block var="data"/></custom-block><script><block s="doSetVar"><l>item</l><block s="reportListItem"><l>1</l><block var="data"/></block></block><block s="doRun"><block var="action"/><list><block s="reportListItem"><l>1</l><block var="data"/></block></list></block><block s="doSetVar"><l>data</l><block s="reportCDR"><block var="data"/></block></block></script></block></script></block-definition><block-definition s="circle - turn %'deg' deg, move %'px'" type="command" category="motion"><inputs><input type="%s"></input><input type="%s"></input></inputs><script><block s="doRepeat"><block s="reportQuotient"><l>360</l><block var="deg"/></block><script><block s="forward"><block var="px"/></block><block s="turn"><block var="deg"/></block></script></block></script></block-definition></blocks><variables></variables></project>
Advertisement
Add Comment
Please, Sign In to add comment
