papert―logo in your browser
examples:
koch snowflake
,
hilbert curve
,
spiral
share this program:
link to it
html:
bbcode:
<span onmouseover="_tipon(this)" onmouseout="_tipoff()"><span class="google-src-text" style="direction: ltr; text-align: left">to line :count :length ifelse :count = 1 [fw :length] [ make "count :count -1 line :count :length lt 60 line :count :length rt 120 line :count :length lt 60 line :count :length ] end to koch :count :length rt 30 line :count :length rt 120 line :count :length rt 120 line :count :length end reset setxy 45 370 koch 5 5</span> alla linea: count: IfElse lunghezza: count = 1 [FW: lunghezza] [make "contano: conta la linea -1: count: lunghezza 60 lt line: count: lunghezza 120 rt line: count: lunghezza 60 lt line: count: lunghezza ] fine Koch: count: lunghezza 30 rt line: count: lunghezza 120 rt line: count: lunghezza 120 rt line: count: lunghezza di reset SetXY end 45 370 Koch 5 5</span>
Your browser doesn't support canvas tags. Please upgrade to a recent version of Firefox or Opera.
<
>
