papert―logo in your browser
examples:
koch snowflake
,
hilbert curve
,
spiral
share this program:
link to it
html:
bbcode:
to pasek :length :order if :order <= 1 [ forward :length stop ] pasek :length / 3 :order - 1 lt 60 pasek :length / 3 :order - 1 rt 120 pasek :length / 3 :order - 1 lt 60 pasek :length / 3 :order - 1 end to platek :length :order penup fd :length*0.66 rt 150 pendown repeat 3 [ pasek :length :order rt 120 ] end clearscreen pasek 200 3
Your browser doesn't support canvas tags. Please upgrade to a recent version of Firefox or Opera.
>