AutoLISP

From 1996 to 1998 I had a number of articles published in CAD User magazine describing various AutoLISP routines. CAD User magazine has since ceased trading so I have made all the published material available here.

PLUS! a new routine and article that CAD User never got around to publishing.
Although some of the LISP routines are now obsolete due to in-built commands in the latest releases of AutoCAD, coupled with the descriptive articles, they still provide an insight into practical programming.

All ZIP files contain unprotected AutoLISP files. Each file is documented in comment lines within the LSP file. You can also view the original magazine article giving a detailed line-by-line description of each program by clicking on the linked article name in the right-hand column.

Beware - these LISP routines were written for R12 & R13. Some may not work in later releases of AutoCAD.

As an extra bonus, click here to download all the programs and articles in one easy ZIP file(80Kb).

To access ZIP files you need either PKZIP or WINZIP.
File sizes are given - ZIP and (LISP).


ATC.ZIP 1.0Kb
(2.4Kb)
27 Dec 96 Takes any number of arcs and converts them to circles.
Going Full Circle
CAD User, April 1996
PWID.ZIP 1.5Kb
(5.6Kb)
9 Jan 00 Collectively changes the width of a selection set of polylines. I have modified it from the original published version so it will work with R14's Light Weight Polylines. The older one described in the article is here.
Fast Polyline Widths
CAD User, June 1996
ARRAY.ZIP 1.4Kb
(4.3Kb)
27 Dec 96 A replacement for AutoCAD's ARRAY command which has two new array options.
An Array of Options
CAD User Feb 1997
BALLOON.ZIP 2.0Kb
(6.2Kb)
27 Dec 96 Draws a leader with an item number balloon. The number is incremented by default.
Balloons
CAD User, July 1996
MEND.ZIP 1.8Kb
(6.2Kb)
27 Dec 96 Converts two colinear lines into one line.
Mending Your Lines
CAD User, August 1996
LASTN.ZIP 1.7Kb
(3.9Kb)
27 Dec 96 Selects the last n objects created in a drawing. Useful for manipulating entities created with a copy multiple or array command.
More at Last
CAD User, September 1996
OFC.ZIP 1.6Kb
(4.4Kb)
9 Jan 97 Similar to the AutoCAD OFFSET command except that the new entity is created on the current layer.
Current Offsets
CAD User, October 1996
PJOIN.ZIP 1.1Kb
(3.2Kb)
8 July 97 Takes any number of LINES, ARCS and/or POLYLINES and joins them into a single POLYLINE if the objects are contiguous.
Fun With Polylines
CAD User December 1996

DATM.ZIP 2.1Kb
(5.9Kb)
14 Dec 96 Inserts a block with attributes that display the current date and time. Useful for indicating plot date/time.
Time to Plot
CAD User, November 1996
N.ZIP 2.2Kb
(5.1Kb)
2 May 97 Script file for automatically changing from one drawing to the next as listed in a file and carrying out tasks. Useful for automatically plotting a large number of drawings.
Next, Please
CAD User, April 1997
LC.ZIP 1.4Kb
(3.9Kb)
8 July 97 Prompts the user to Freeze, Lock (or Unlock) or turn Off a layer by picking an object on that layer. It will go `into' Blocks & Xrefs.
Layer Control
CAD User, May 1997
STRADD.ZIP 1.4Kb
(4.0Kb)
2 May 97 Adds (or subtracts) a user-input value to numerical text in a drawing.
Adding Up
CAD User, June 1997
TS.ZIP 1.0Kb
(2.0Kb)
27 July 97 Quick and easy method of checking and changing the current text style.
Changing Styles
CAD User, July 1997
ANG.ZIP 1.2Kb
(4.2Kb)
22 Aug 97 Prompts for two lines and displays the angles between them.
A New Angle
CAD User, August 1997
DDT.ZIP 1.1Kb
(3.3Kb)
25 Sept 97 A combining of Ddedit and Ddatte to edit all text and block attributes with the one command.
Text is Text
CAD User, September 1997
VIEW.ZIP 1.1Kb
(4.6Kb)
25 Sept 97 An improved version of AutoCAD's view command which warns the user if they are about to overwrite an existing view.
A Better View
CAD User, October 1997
TXTOUT.ZIP 1.4Kb
(3.7Kb)
27 Oct 97 Writes text in an AutoCAD drawing to a user specified text file.
Exporting Text
CAD User, November 1997
VBORD.ZIP 2.2Kb
(5.9Kb)
9 April 98 Draws a border to the same dimensions as the current viewport. Useful for outlining the Paperspace viewport in Modelspace.
Over the Border
CAD User, June 1998

TABLE.ZIP 1.7Kb
(5.5Kb)
8 June 00 A very quick and easy way of creating tables.
Fast Tables
Unpublished

© 2001 ZOTO Technologies