{"id":7849,"date":"2020-06-06T13:52:00","date_gmt":"2020-06-06T20:52:00","guid":{"rendered":"https:\/\/blog.austinity.com\/?p=7849"},"modified":"2020-06-06T14:13:43","modified_gmt":"2020-06-06T21:13:43","slug":"logo-turtle-fun","status":"publish","type":"post","link":"https:\/\/blog.austinity.com\/?p=7849","title":{"rendered":"LOGO turtle fun"},"content":{"rendered":"\n

home
clearscreen
cleartext<\/p>

make “cnt 0
make “size 10
make “wafer 200
make “whalf :wafer\/2
; ——————-
TO SQUARE :length
REPEAT 4 [FW :length RT 90]
FW :length
END
; ——————–<\/p>

; draw the origin and wafer
home
circle 5
circle :whalf<\/p>

; move turtle to top left to start drawing grid
pu
fw :whalf
lt 90
fw :whalf
rt 90
pd<\/p>

;orient turtle looking EAST
RT 90<\/p>

; draw the grid
; two rows of squares at a time
; go out to the EAST, down back to the west
; drop down two rows and reorient the turtle to the EAST
;; do it again.. (outer loop)
REPEAT 10 [REPEAT 2 [ REPEAT 20 [ SQUARE :size make “cnt :cnt+1 ] RT 90 FW :size2 RT 90 ] RT 90 FW :size<\/em>2 LT 90 ]<\/p>

;REPEAT 4 [REPEAT 2 [REPEAT 20 [SQUARE :size make “cnt :cnt+1] RT 90 FW :size*4 RT 90]RT 90 FW :size LT 90]<\/p>

; SQRT exists as undoc fct\u2026
make “y SQRT :cnt
print [“number “of “squares ]
print :cnt<\/p><\/blockquote>\n\n\n\n

<\/p>\n\n\n\n

\"\"<\/figure>\n\n\n\n



Run at logo.twentygototen.org<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"

home clearscreen cleartext make “cnt 0 make “size 10 make “wafer 200 make “whalf :wafer\/2 ; ——————- TO SQUARE :length REPEAT 4 [FW :length RT 90] FW :length END ; ——————– ; draw the origin and wafer home circle 5 circle :whalf ; move turtle to top left to start drawing grid pu fw :whalf … Continue reading LOGO turtle fun<\/span> →<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[],"class_list":["post-7849","post","type-post","status-publish","format-standard","hentry","category-uncategorized"],"_links":{"self":[{"href":"https:\/\/blog.austinity.com\/index.php?rest_route=\/wp\/v2\/posts\/7849","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/blog.austinity.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.austinity.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.austinity.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.austinity.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=7849"}],"version-history":[{"count":2,"href":"https:\/\/blog.austinity.com\/index.php?rest_route=\/wp\/v2\/posts\/7849\/revisions"}],"predecessor-version":[{"id":7852,"href":"https:\/\/blog.austinity.com\/index.php?rest_route=\/wp\/v2\/posts\/7849\/revisions\/7852"}],"wp:attachment":[{"href":"https:\/\/blog.austinity.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=7849"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.austinity.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=7849"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.austinity.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=7849"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}