Autolisp

Webtip:
http://www.lisp.nl/index.php/lisproutine/93-vakklik

Autolisp op WikiPedia: http://nl.wikipedia.org/wiki/AutoLISP

AutoLISP - Wikipedia AutoLISP is een programmeertaal, een dialect van Lisp dat hoort bij het CAD-programma AutoCAD. Hiermee is het mogelijk om extra functionaliteit toe te voegen aan het programma. Het is niet opgenomen in het pakket AutoCad LT.

Tipje: laat lisp spreken...
;;; ---d2:Speak--- = (d2:Speak (strcat "Welcome " (getvar "loginname")))
(defun d2:Speak (str)
(setq sapi (vlax-create-object "Sapi.SpVoice"))
(vlax-invoke sapi "Speak" str 0)
(vlax-release-object sapi)
) ; end defun

Tipje:
(defun d2=64Bit ()
(vl-load-com)
;; Returns T if CAD version is 64-Bit
;; Example: (d2=64bit)
(if (vl-string-search "64" (getenv "PROCESSOR_ARCHITECTURE"))
T
nil))

Opzet applicatie voor beursplattegronden.