Przykłady LISP

Na naszym forum CAD pojawiło się zapytanie o funkcję opisującą współrzędną wskazanego punktu.

Opracowałem taką funkcję i chciałbym się nią podzielić:

Skrypt LISP posłuży do rysowaniu spirali Archimedesa

Po wczytaniu skryptu do programu CAD należy wpisać polecenie Spirala

ZWCAD narysuje spiralę składającą się z punktów.

W przykładzie posłużymy się parametrami ustawionymi na stałe, oczywiście można je modyfikować i dodać możliwość określania parametrów przez Użytkownika.