{"id":16716,"date":"2019-06-23T14:21:31","date_gmt":"2019-06-23T12:21:31","guid":{"rendered":"http:\/\/www.valcon.it\/librelogo\/?p=16716"},"modified":"2020-06-01T16:27:37","modified_gmt":"2020-06-01T14:27:37","slug":"tvge","status":"publish","type":"post","link":"https:\/\/www.valcon.it\/librelogo\/tvge\/","title":{"rendered":"Turtle Vector Graphics for Everybody"},"content":{"rendered":"

Vedi: https:\/\/conference.libreoffice.org\/2012\/program\/wednesday-secondary-track\/librelogo-2013-turtle-vector-graphics-for-everybody.html<\/a> | <\/em>http:\/\/www.numbertext.org\/logo\/librelogo.pdf<\/em><\/a><\/p>\n

Berlino 17-10-2012 – LibreLogo – Turtle Vector Graphics for Everybody<\/p>\n

\"\"<\/p>\n

REPEAT 250 [ \r\n   CIRCLE  10+REPCOUNT\/10\r\n   FORWARD 5+REPCOUNT\/10\r\n   LEFT    10 \r\n]<\/pre>\n
\"\"<\/p>\n
REPEAT 36 [\r\n   FORWARD 15 LEFT  90\r\n   FORWARD 15 RIGHT 90\r\n   FORWARD 15 RIGHT 90\r\n   FORWARD 15 LEFT  100\r\n]\r\nFILL<\/pre>\n
\"\"<\/p>\n
REPEAT 88 [\r\n   FORWARD 300\r\n   LEFT    89\r\n]\r\nFILL<\/pre>\n
\"\"<\/p>\n
REPEAT 180 [\r\n   FORWARD REPCOUNT*2\r\n   LEFT    91\r\n]\r\nFILL<\/pre>\n
\"\"<\/p>\n
REPEAT 8 [\r\n   FORWARD 150\r\n   LEFT    90\r\n   FORWARD 150\r\n   LEFT    135\r\n   FORWARD 150*SQRT(2)\r\n]\r\nFILL<\/pre>\n
\"\"<\/p>\n
REPEAT 200 [\r\n   FORWARD REPCOUNT*2\r\n   LEFT    90\r\n]\r\nFILL<\/pre>\n
\"\"<\/p>\n
TO wheel size\r\n   REPEAT 8 [\r\n      FORWARD size\r\n      LEFT    90\r\n      FORWARD size\r\n      LEFT    135\r\n      FORWARD size*SQRT(2)\r\n   ]\r\n   FILL\r\nEND\r\n\r\nREPEAT 10 [\r\n   wheel   20+RANDOM 10\r\n   FORWARD 100\r\n   LEFT    36\r\n]<\/pre>\n
\"\"<\/p>\n
REPEAT 360 [\r\n   FORWARD 3\r\n   LEFT    1\r\n]\r\nFILL<\/pre>\n
\"\"<\/p>\n
TO albero ramo\r\n   IF ramo < 2 [ STOP ]\r\n\r\n   FORWARD ramo LEFT 50\r\n   albero ramo\/2\r\n   RIGHT 100\r\n   albero ramo\/2\r\n   LEFT 50 BACK ramo\r\nEND\r\n\r\nPENCOLOR \u201cGREEN\u201d\r\nPENSIZE 2\r\nalbero 200<\/pre>\n
\"\"<\/p>\n
TO x n\r\n   IF n == 0 [ STOP ]\r\n   x(n-1)\r\n   RIGHT 90\r\n   y(n-1)\r\n   FORWARD 4\r\nEND\r\n\r\nTO y n\r\n   IF n == 0 [ STOP ]\r\n   FORWARD 4\r\n   x(n-1)\r\n   LEFT 90\r\n   y(n-1)\r\nEND\r\n\r\nCLEARSCREEN\r\nHOME\r\nPENCOLOR \u201cgreen\u201d\r\nPENSIZE 2\r\nx(12)<\/pre>\n
\"\"<\/p>\n
CLEARSCREEN HOME\r\nPENSIZE 4 PENCOLOR \u201cblack\u201d FILLCOLOR \u201cblack\u201d\r\nh=300\r\ntr=h\/4  sp=h\/20    h1=h-tr-sp\r\nw=h*4\/5 w1=w-tr-sp\r\n\r\nFORWARD tr LEFT 90 FORWARD tr FILL\r\nPENUP FORWARD sp PENDOWN\r\nFORWARD w1 LEFT 90 FORWARD h LEFT 90 FORWARD w LEFT 90 FORWARD h1 CLOSE\r\nHIDETURTLE<\/pre>\n
\"\"<\/p>\n
CLEARSCREEN HOME\r\nPENSIZE 5\r\nlato=100\r\nREPEAT 4 [\r\n   PENUP   FORWARD lato\r\n   PENDOWN FORWARD lato RIGHT 90 FORWARD lato\r\n]\r\nHIDETURTLE<\/pre>\n
\"\"<\/p>\n
...\r\nFILL<\/pre>\n
\"\"<\/p>\n
CLEARSCREEN HOME\r\nPENSIZE 5\r\nlato=100\r\nREPEAT 4 [\r\n   PICTURE\r\n   PENUP   FORWARD lato \r\n   PENDOWN FORWARD lato RIGHT 90 FORWARD lato\r\n]\r\nFILL\r\nHIDETURTLE<\/pre>\n
\"\"<\/p>\n
CLEARSCREEN\r\nPENSIZE 4 PENCOLOR \u201cblack\u201d\r\nlato1=300\r\nlato2=240\r\n\r\nTO box x REPEAT 4 [ FORWARD x RIGHT 90 ] END\r\n\r\nbox lato1 FILLCOLOR [\u201cblue\u201d,\u201cwhite\u201d] FILL\r\nPENUP FORWARD 30 RIGHT 90 FORWARD 30 LEFT 90 PENDOWN\r\nbox lato2 FILLCOLOR \u201cwhite\u201d FILL\r\n\r\nHIDETURTLE<\/pre>\n
Il colore “skyblue” non \u00e8 riconosciuto per nome (???)<\/em><\/p>\n
\"\"<\/p>\n
CLEARSCREEN HOME\r\nlato1=120 \r\nlato2=60\r\n\r\nCOLORI_IN=[[\u201cblack\u201d,\u201csilver\u201d,\u201cgray\u201d,\u201cwhite\u201d,\u201cmaroon\u201d],\r\n           [\u201cred\u201d,\u201cpurple\u201d,\u201cfuchsia\u201d,\u201cgreen\u201d,\u201clime\u201d],\r\n           [\u201colive\u201d,\u201cyellow\u201d,\u201cnavy\u201d,\u201cblue\u201d,\u201cteal\u201d],\r\n           [\u201caqua\u201d,\u201cpink\u201d,\u201ctomato\u201d,\u201corange\u201d,\u201cgold\u201d],\r\n           [\u201cviolet\u201d,\u201cskyblue\u201d,\u201cchocolate\u201d,\u201cbrown\u201d,\u201cinvisible\u201d]]\r\nCOLORI_OUT=[[\u201cwhite\u201d,\u201cblack\u201d,\u201cblack\u201d,\u201cblack\u201d,\u201cwhite\u201d],\r\n            [\u201cblack\u201d,\u201cwhite\u201d,\u201cblack\u201d,\u201cblack\u201d,\u201cblack\u201d],\r\n            [\u201cblack\u201d,\u201cblack\u201d,\u201cwhite\u201d,\u201cwhite\u201d,\u201cblack\u201d],\r\n            [\u201cblack\u201d,\u201cblack\u201d,\u201cblack\u201d,\u201cblack\u201d,\u201cblack\u201d],\r\n            [\u201cwhite\u201d,\u201cblack\u201d,\u201cblack\u201d,\u201cblack\u201d,\u201cblack\u201d]]\r\n\r\nPENSIZE 2\r\nFONTSIZE 18 FONTWEIGHT \u201cbold\u201d FONTFAMILY \u201cCourier New\u201d\r\n\r\nFOR r IN[0,1,2,3,4] [\r\n   FOR c IN[0,1,2,3,4] [\r\n      PENUP\r\n      POSITION [100+lato1*c, 100+lato2*r]\r\n      HEADING 0\r\n      PENDOWN\r\n      FILLCOLOR [5*r+c]          RECTANGLE [lato1,lato2]\r\n      FONTCOLOR COLORI_OUT[r] TEXT      COLORI_IN[r]\r\n   ]\r\n]\r\nHIDETURTLE<\/pre>\n
\"\"<\/p>\n
PENSIZE   30\r\nPENCOLOR  \u201cfuchsia\u201d\r\nFILLCOLOR \u201cpurple\u201d\r\nSQUARE    360\r\n\r\nPENCOLOR  \u201cgreen\u201d\r\nFILLCOLOR \u201clime\u201d\r\nCIRCLE    300\r\n\r\nFONTSIZE   80\r\nFONTWEIGHT \u201cbold\u201d\r\nTEXT       \u201cLogo\u201d\r\n\r\nHIDETURTLE<\/pre>\n
\"\"<\/p>\n
FONTCOLOR \u201cgreen\u201d\r\nFONTSIZE 40\r\nPENUP\r\nREPEAT 10 [\r\n   FORWARD 150\r\n   LABEL   \u201cLogo\u201d\r\n   BACK    150\r\n   LEFT    36\r\n]<\/pre>\n
\"\"<\/p>\n
PENUP\r\nFONTFAMILY \u201cSymbola\u201d\r\nPICTURE [\r\nREPEAT 25 [\r\n   POSITION ANY\r\n   FONTCOLOR ANY\r\n   dimensione=50+RANDOM 50\r\n   FONTSIZE dimensione\r\n   carattere=RANDOM \u201c😀😁😂😃😄😅😆😇😈😉😊😋😌😍😎😏😐😑😒😓😔😕😗😖😘😙😚😛😜😝😞😟😠😡😢😣😤😥😦😧😨😩😪😫😬😭😮😯😰😱😲😳😴😵😶😸😷😹😺😻😼😽😾😿🙀🙁🙂🙃🙄\u201d\r\n   LABEL carattere\r\n]\r\n]\r\nHIDETURTLE<\/pre>\n
\"\"<\/p>\n
TO BEAR\r\n   PENUP\r\n   CIRCLE 100\r\n   LEFT 45 FORWARD 70\r\n   CIRCLE 50\r\n   BACK 70 RIGHT 90 FORWARD 70\r\n   CIRCLE 50\r\n   BACK 70 RIGHT 45 BACK 20\r\n   REPEAT 2 [\r\n      FILLCOLOR \u201cwhite\u201d\r\n      CIRCLE 25\r\n      FILLCOLOR \u201cblack\u201d\r\n      CIRCLE 10\r\n      FORWARD 40\r\n   ]\r\n   BACK 60 RIGHT 90 FORWARD 25\r\n   CIRCLE 30\r\n   BACK 25 LEFT 180\r\nEND\r\n\r\nFOR k IN [\u201cgold\u201d, \u201corange\u201d, \u201ctomato\u201d, \u201cpurple\u201d, \u201cBLUE\u201d] [\r\n   FILLCOLOR k\r\n   BEAR\r\n   FORWARD 120 LEFT 72\r\n]\r\n\r\nHIDETURTLE\r\n\r\n...<\/pre>\n
…<\/p>\n
TO TRIANGLE size color\r\n   REPEAT 3 [ FORWARD size LEFT 120 ]\r\n   FILLCOLOR color FILL\r\nEND\r\n\r\nTO BOX size f\r\n   REPEAT 2 [ FORWARD size*10 RIGHT 90 FORWARD size*f RIGHT 90 ]\r\nEND\r\n\r\nTO PENCIL size color\r\n   BOX size 1\r\n   FILLCOLOR color FILL\r\n   BOX size 2\/3\r\n   BOX size 1\/3\r\n   CLOSE\r\n   RIGHT 150\r\n   TRIANGLE size \u201cchocolate\u201d\r\n   FORWARD size*0.75\r\n   TRIANGLE size\/4 color\r\n   BACK size*0.75 LEFT 150\r\nEND\r\nPICTURE [\r\n   REPEAT 5 [ \r\n      HOME HEADING ANY\r\n      PENCIL 25 \u201cred\u201d\r\n   ]\r\n]\r\nHIDETURTLE<\/pre>\n
…<\/p>\n","protected":false},"excerpt":{"rendered":"
Vedi: https:\/\/conference.libreoffice.org\/2012\/program\/wednesday-secondary-track\/librelogo-2013-turtle-vector-graphics-for-everybody.html | http:\/\/www.numbertext.org\/logo\/librelogo.pdf Berlino 17-10-2012 – LibreLogo – Turtle Vector Graphics for Everybody REPEAT 250 [ CIRCLE 10+REPCOUNT\/10 FORWARD 5+REPCOUNT\/10 LEFT 10 ] REPEAT 36 [ FORWARD 15 LEFT 90 FORWARD 15 RIGHT 90 FORWARD 15 RIGHT 90 FORWARD 15 LEFT 100 ] FILL REPEAT 88 [ FORWARD 300 LEFT 89 ] FILL REPEAT… Leggi tutto »Turtle Vector Graphics for Everybody<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"inline_featured_image":false,"neve_meta_sidebar":"","neve_meta_container":"","neve_meta_enable_content_width":"off","neve_meta_content_width":0,"neve_meta_title_alignment":"","neve_meta_author_avatar":"","neve_post_elements_order":"","neve_meta_disable_header":"","neve_meta_disable_footer":"","neve_meta_disable_title":"","footnotes":""},"categories":[6],"tags":[],"class_list":["post-16716","post","type-post","status-publish","format-standard","hentry","category-applicazioni"],"_links":{"self":[{"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/posts\/16716","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/comments?post=16716"}],"version-history":[{"count":57,"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/posts\/16716\/revisions"}],"predecessor-version":[{"id":18501,"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/posts\/16716\/revisions\/18501"}],"wp:attachment":[{"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/media?parent=16716"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/categories?post=16716"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.valcon.it\/librelogo\/wp-json\/wp\/v2\/tags?post=16716"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}