Spirale

To wszystko to procedura spirala.
Niektóre wywołania są kosmiczne....:-)

Przytaczam treść procedury:

oto spirala :ile :kąt :krok
ukp "niebieski3
przypisz "bok 5
powtórz :ile[np :bok pw :kąt
przypisz "bok :bok+:krok]
już

Taką procedurę potrafię napisać dokładnie od dzisiaj.
Miło mi.
Wywoływałam spirale, w których parametr kąt wynosił 121, 171, 91, 61.
To 1, to bardzo niewielkie odchylenie, tworzy te piękne kształty.
No może nie tam, gdzie jest 171. W pozostałych przypadkach tak.
Nie usuwałam pracowitych żółwików.
A podobno to pająki plotą sieć....