AutoLISP

AutoLISP is a dialect of the LISP programming language built specifically for use with the full version of AutoCAD and its derivatives, which include AutoCAD Map 3D, AutoCAD Architecture and AutoCAD Mechanical.^[1] Neither the application programming interface nor the interpreter to execute AutoLISP code are included in the AutoCAD LT product line.^[2]

Features

AutoLISP is a small, dynamically scoped, dynamically typed LISP dialect with garbage collection, immutable list structure and settable symbols, lacking in such regular LISP features as macro system, records definition facilities, arrays, functions with variable number of arguments or let bindings. Aside from the core language, most of the primitive functions are for geometry, accessing AutoCAD's internal DWG database, or manipulation of graphical entities in AutoCAD. The properties of these graphical entities are revealed to AutoLISP as association lists in which values are paired with AutoCAD "group codes" that indicate properties such as definitional points, radii, colors, layers, linetypes, etc. AutoCAD loads AutoLISP code from .LSP files.^[3]

AutoLISP code can interact with the user through AutoCAD's graphical editor by use of primitive functions that allow the user to pick points, choose objects on screen, input numbers and other data. AutoLisp also has a built-in GUI mini-language, the Dialog Control Language, for creating modal dialog boxes with automated layout, within AutoCAD.^[3]

History

AutoLISP was derived from an early version of XLISP, which was created by David Betz.^[4] The language was introduced in AutoCAD Version 2.18 in January 1986, and continued to be enhanced in successive releases up to Release 13 in February 1995. After that, its development was neglected by Autodesk in favor of more fashionable development environments like VBA, .NET and ObjectARX. However, it has remained AutoCAD's primary user customization language.

Vital-LISP, a considerably enhanced version of AutoLISP including an IDE, debugger and compiler, and ActiveX support, was developed and sold by third party developer Basis Software. Vital LISP was a superset of the existing AutoLISP language that added VBA-like access to the AutoCAD object model, reactors (event handling for AutoCAD objects), general ActiveX support, and some other general Lisp functions. Autodesk purchased this, renamed it Visual LISP, and briefly sold it as an add-on to AutoCAD Release 14 released in May 1997. It was incorporated into AutoCAD 2000 released in March 1999, as a replacement for AutoLISP. Since then Autodesk has chosen to halt major enhancements to Visual LISP in favor of focusing more effort on VBA and .NET and C++. As of January 31, 2014, Autodesk no longer supports versions of VBA older than 7.1. This is part of a long-term process of switching over from VBA to .NET for customization. ^{[5] [6]}

AutoLISP has such a strong following that other CAD application vendors add it to their own products. Bricscad, IntelliCAD and others have AutoLISP functionality, so that AutoLISP users can consider using them as an alternative to AutoCAD. Most development involving AutoLISP since AutoCAD 2000 is actually performed within Visual LISP since the original AutoLISP engine was replaced with the Visual LISP engine. There are thousands of utilities and applications that have been developed using AutoLISP or Visual LISP (distributed as LSP, FAS and VLX files).^{[7] [8]}

Examples

A simple Hello world program in AutoLISP would be:

1 (defun hello ( )
2     (princ "\nHello World!")
3     (princ)
4 )

Note the final line inside the function definition: when evaluated with no arguments, the princ function returns a null symbol, which will not be displayed by the AutoCAD command line. As the AutoCAD command line functions as a REPL, this would normally print "Hello World!" to the command line, followed immediately by the return value of the call to princ. Therefore, without the final call to the princ function, the result of this would be:

Hello World!"\nHello World!"

The prin1 function may also be used to achieve the same result.

A more complex example might be:

 1 (defun c:pointlabel ( / pnt )
 2     (if (setq pnt (getpoint "\nSpecify point: "))
 3         (progn
 4             (entmake
 5                 (list
 6                    '(0 . "POINT")
 7                     (cons 10 (trans pnt 1 0))
 8                 )
 9             )
10             (entmake
11                 (list
12                    '(0 . "TEXT")
13                     (cons 10 (trans (cons (+ (car pnt) 0.6) (cdr pnt)) 1 0))
14                     (cons 40 (getvar 'textsize))
15                     (cons  1 (strcat "X:" (rtos (car pnt)) " Y:" (rtos (cadr pnt))))
16                 )
17             )
18         )
19     )
20     (princ)
21 )

The above code defines a new function which generates an AutoCAD point object at a given point, with a single-line text object displaying the X and Y coordinates beside it. The name of the function includes a special prefix 'c:', which causes AutoCAD to recognize the function as a regular command. The user, upon typing 'pointlabel' at the AutoCAD command line, would be prompted to pick a point, either by typing the X and Y coordinates, or clicking a location in the drawing. The function would then place a marker at that point, and create a single-line text object next to it, containing the X and Y coordinates of the point expressed relative to the active User Coordinate System (UCS). The function requires no parameters, and contains one Local variable ('pnt').

The above example could also be written using built-in AutoCAD commands to achieve the same result, however this approach is susceptible to changes to the command prompts between AutoCAD releases.

References

External links

• AutoLISP FAQ