---

Hall Lispler,
wie unter https://ww3.cad.de/foren/ubb/Forum330/HTML/000089.shtml beschrieben, gibt es die ArchTools ab sofort kostenfrei. Das Programm kann auch im Quellcode erworben werden, und kann sowohl in de rkostenfreien kompilierten Version als auch im Quellcode als sehr umfangreiche Lisp-Funktionsbibliothek genutzt werden, die Lisp-Programmierer dann in eigene Apps einbauen und ohne Lizenzgebühren weiter geben dürfen.

Leider habe ich mir bisher nicht die Mühe gemacht, eine Übersicht über die darin stehenden Funktionen aufzustellen. Falls hier in der Community ausreichend Interesse besteht, wird das aber noch nachgeholt.

Programmierer können das sofrt testen: einfach von https://ww3.cad.de/foren/ubb/Forum330/HTML/000089.shtml die aktuelle ArchTools Version downloaden, installieren und loslegen. Beispielsweise gibt es Funktionen wie:
(at-setvar <Varname> <Value> )
um beliebige eigene Systgemvariablen definieren und in der DWG speichern zu könne. Dazu gibt es natürlich auch die Funktion zum Auslesen:
(at-getvar <VarName> )

Das funktioniert auch mit Symbolen, Listen und DottedPairs:
(at-setvar "TEST" '(1 2 3 A B C))
(at-setvar "TEST" '(1 . 2))
Man kann deshalb auch ganze DEFUNs damit speichern:
(at-setvar "TEST" '(defun (a b) (+ a b)))

Oder die Funktionen zum Speichern und Auslesen von XDATA:
(xdata-put <EntityName> <AppName> <Value> )
und
(xdata-get <EntityName> <AppName> )
Auch damit kann man Symbole, Listen und ganze DEFUNs als Xdata an Entities hängen:

(xdata-put (car (entsel)) "TEST" '(a B C 1 2 3))
oder
(xdata-put (car (entsel)) "TEST" '(1 . 2))

Ausgelesen werden die Xdata dann wieder so:
(xdata-get (car (entsel)) "TEST")

Ähnliche Funktionen gibt es auch für Dictionaries (wird bei AT-SETVAR verwendet) und XDictionaries.

Falls also Interesse besteht, werde ich gerne eine Übersicht über wenigstens die wichtigsten Lisp-Funktionen in den ArchTools zusammenstellen. Lasst es mich einfach hier wissen.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Für BricsCAD ist in den ArchTools als Ersatz für das dort nicht vorhandene GEOMCAL das Programm CADCAL enthalten. Damit kann man sehr schnell und einfach ohne alle Programmierkenntnisse die kompliziertesten Koordinatenberechnungen durchführen, und sich bei der CAD-Arbeit jede Menge Hilfskonstruktionen sparen. Eine Übersicht über die CADCAL-Funktionalität ist hier zu finden: www.archtools.de/cadcal.html

Im Quellcode ist natürlich auch der Quellcode für CADCAL enthalten. Für Programmierer ist das ein Beispiel dafür, wie man in Lisp einen Parser programmiert. Im konkreten Fall von CADCAL übersetzt der Parser als Strings eingegebene mathematische Ausdrücke in Lisp-Funktionen, die dann ausgeführt werden. Mit (cc-str->lisp "1+2+3+4") wird der mathematische Ausdruck im String übersetzt in (§§+ (LIST 1 2 3 4)).

Das ist vielleicht besonders lohnenswert auch für alle Programmierer, die gar nicht gewerbliche Programme, sondern nur kleine Tools für die eigene Firma programmieren. Die Programmarbeit wird leichter, wenn man im Lisp komplexe Lisp-Funktionen durch einfache mathematische Ausrücke ersetzen kann wie mit (ccal "1+2+3+4"). Und wenn man mehr Performance will, dann übersetzt man in seinem eigenen Quellcode die CCAL-Funktionsaufrufe einfach in die direkten Lisp-Funktionen.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP