Espiral poligonal equiangular. Un ejercicio de programación con WinLogo (LOGO)

; ------------------------------------------------------------
; Espiral poligonal equiangular con un cierto número de tramos
;    © Joan Aranes Clua, 1997
                CC BY 4.0
; ------------------------------------------------------------
procediment espiral :longitud.costat :nombre.costats 
id
repeteix :nombre.costats [av :longitud.costat 
                          gira.dreta 360/:nombre.costats 
                          posa.a "costat :longitud.costat+5
                         ] 
fi
; ------------------------------------------------------------
; Exemple:
% espiral 40 5