papert―logo in your browser
examples:
koch snowflake
,
hilbert curve
,
spiral
share this program:
link to it
html:
bbcode:
to quarter :l :r pu fw 2 * :l pd circle :r lt 135 fw 2 * :l * sqrt 2 bw 2 * :l * sqrt 2 rt 135 pu fw 2 * :l pd circle :r lt 135 fw 4 * :l * sqrt 2 bw 4 * :l * sqrt 2 lt 135 - arctan 1 / 2 pu fw (sqrt 5) * :l pd circle :r rt 45 - arctan 1 / 2 fw :l * sqrt 2 bw :l * sqrt 2 rt 135 fd 4 * :l circle :r lt 180 pu fw 2 * :l rt 90 fd 3 * :l pd lt 90 end reset circle 24 repeat 4 [quarter 48 24]
Your browser doesn't support canvas tags. Please upgrade to a recent version of Firefox or Opera.
>
