-->
0 Members and 1 Guest are viewing this topic.
to square repeat 4 [left 90 forward 80]endrepeat 36 [left 10 square]
make "x 1 repeat 150 [forward :x left 89 make "x :x + 1]
Not really useful
"thiscode
first [thiscode]
to sierp :n :l if :n=0 [stop] repeat 3 [sierp :n-1 :l/2 fd :l rt 120]endpu bk 100 lt 90 bk 100 pdsierp 5 200