AutoLISP basics for automation in AutoCAD - Step-by-Step Guide

Introduction

AutoLISP helps you automate repetitive tasks in AutoCAD. It saves time by running commands automatically instead of doing them by hand.

When you need to draw the same shapes repeatedly with small changes

When you want to rename many layers quickly without clicking each one

When you want to create custom commands to speed up your work

When you want to extract data from drawings automatically

When you want to batch process multiple drawings with the same steps

Steps

Step 1: Open the Visual LISP Editor

- Manage tab > Applications panel > Visual LISP Editor

The Visual LISP Editor window opens where you can write code

💡 Use this editor to write and test your AutoLISP code

Step 2: Create a new LISP file

- Visual LISP Editor > File menu > New File

A blank code window appears for you to type your script

💡 Save your file with a .lsp extension

Step 3: Write a simple command function

- Code window

You have a function that AutoCAD can run as a command

💡 Example: (defun c:hello () (princ "Hello, AutoCAD!"))

Step 4: Load the LISP file into AutoCAD

- Visual LISP Editor > Load button or AutoCAD command line > APPLOAD

Your LISP code is ready to run in AutoCAD

💡 Use APPLOAD to load saved .lsp files anytime

Step 5: Run your custom command

- AutoCAD command line

AutoCAD executes your AutoLISP function and shows the output

💡 Type the function name without parentheses, e.g., hello

Before vs After

Before

You manually type commands like LINE and CIRCLE repeatedly

After

You run a single AutoLISP command that draws shapes automatically

Settings Reference

Visual LISP Editor

📍 Manage tab > Applications panel

Write, edit, and test AutoLISP scripts

Default: Closed

APPLOAD command

📍 AutoCAD command line

Load AutoLISP scripts into AutoCAD session

Default: No files loaded

Common Mistakes

Not saving the LISP file before loading

AutoCAD cannot load unsaved or unnamed scripts

Always save your .lsp file before loading it with APPLOAD

Typing the function name with parentheses in command line

AutoCAD expects just the command name without parentheses

Type only the function name, e.g., hello, not (hello)

Summary

AutoLISP automates repetitive tasks in AutoCAD by running custom commands

Write and save scripts in the Visual LISP Editor, then load them with APPLOAD

Run your commands by typing their names in the AutoCAD command line without parentheses

Practice

1. What is the main purpose of using AutoLISP in AutoCAD?
(defun) is often used to define what?

easy

A. To export drawings to other formats

B. To manually draw shapes faster

C. To automate repetitive tasks by defining functions

D. To change the color of objects automatically

Solution

1. Step 1: Understand AutoLISP purpose

   AutoLISP is designed to automate tasks in AutoCAD to save time and reduce errors.

2. Step 2: Recognize (defun) usage

   (defun) defines a function that can be run as a command to automate tasks.

3. Final Answer:

   To automate repetitive tasks by defining functions -> Option C

4. Quick Check:

   Automation = Functions with (defun) [OK]

Hint: AutoLISP automates tasks using functions with defun [OK]

Common Mistakes:

• Thinking AutoLISP changes colors automatically
• Confusing manual drawing speed with automation
• Assuming AutoLISP exports files

2. Which of the following is the correct syntax to define a function named drawSquare in AutoLISP?

easy

A. defun drawSquare () (command "RECTANGLE")

B. (defun drawSquare [] (command "RECTANGLE"))

C. (defun drawSquare () command "RECTANGLE")

D. (defun drawSquare () (command "RECTANGLE"))

Solution

1. Step 1: Recall correct function syntax

   AutoLISP functions start with (defun functionName () ...) using parentheses for parameters.

2. Step 2: Check command usage inside function

   The (command "RECTANGLE") is correctly inside the function body.

3. Final Answer:

   (defun drawSquare () (command "RECTANGLE")) -> Option D

4. Quick Check:

   Correct parentheses and command call = (defun drawSquare () (command "RECTANGLE")) [OK]

Hint: Use parentheses () for parameters in defun [OK]

Common Mistakes:

• Using square brackets [] instead of parentheses
• Missing parentheses around defun
• Omitting parentheses around command

3. What will be the output when running this AutoLISP code?

(defun c:test ()
  (command "LINE" '(0 0) '(10 0) "")
  (princ "Line drawn")
)

medium

A. Draws a line from (0,0) to (10,0) and prints 'Line drawn'

B. Nothing happens because function is not called

C. Draws a circle instead of a line

D. Syntax error due to incorrect quotes

Solution

1. Step 1: Analyze the function definition

   The code uses (defun c:test () ...) to define a command named TEST, but does not call or execute it.

2. Step 2: Understand command and output

   Running this code only defines the function. No line is drawn, and no message is printed because the body is not executed. To run it, type TEST or (c:test).

3. Final Answer:

   Nothing happens because function is not called -> Option B

4. Quick Check:

   defun defines, does not run [OK]

Hint: defun defines functions/commands; they must be called to execute [OK]

Common Mistakes:

• Thinking function runs automatically without calling
• Confusing quotes causing syntax errors
• Assuming wrong command draws circle

4. Identify the error in this AutoLISP function:

(defun c:drawLine ()
  (command "LINE" (0 0) (10 10) "")
  (princ "Done")
)

medium

A. Points should be quoted lists, not bare numbers

B. Missing closing parenthesis for defun

C. Command name should be lowercase

D. princ cannot print strings

Solution

1. Step 1: Check point format in command

   AutoLISP requires points as quoted lists like '(0 0), not bare numbers (0 0).

2. Step 2: Verify parentheses and commands

   Parentheses are balanced, command name case is not an error, and princ prints strings correctly.

3. Final Answer:

   Points should be quoted lists, not bare numbers -> Option A

4. Quick Check:

   Points need quotes for lists [OK]

Hint: Use single quotes for coordinate lists '(x y) [OK]

Common Mistakes:

• Using unquoted coordinates causing errors
• Assuming case sensitivity for commands
• Thinking princ can't print strings

5. You want to create an AutoLISP function that draws a rectangle with width 20 and height 10 starting at point (5,5). Which code correctly automates this task?

hard

A. (defun c:drawRect ()
(command "RECTANGLE" '(5 5) '(25 15))
(princ "Rectangle drawn")
)

B. (defun c:drawRect ()
(command "RECTANGLE" (5 5) (20 10))
(princ "Rectangle drawn")
)

C. (defun c:drawRect ()
(command "RECTANGLE" '(5 5) '(20 10))
(princ "Rectangle drawn")
)

D. (defun c:drawRect ()
(command "RECTANGLE" '(0 0) '(20 10))
(princ "Rectangle drawn")
)

Solution

1. Step 1: Calculate rectangle corner points

   Starting at (5,5), width 20 means x=25, height 10 means y=15, so opposite corner is (25 15).

2. Step 2: Check correct point format and command

   Points must be quoted lists '(x y). (defun c:drawRect () (command "RECTANGLE" '(5 5) '(25 15)) (princ "Rectangle drawn") ) uses correct points and syntax.

3. Final Answer:

   (defun c:drawRect () (command "RECTANGLE" '(5 5) '(25 15)) (princ "Rectangle drawn") ) -> Option A

4. Quick Check:

   Correct points and quotes = (defun c:drawRect () (command "RECTANGLE" '(5 5) '(25 15)) (princ "Rectangle drawn") ) [OK]

Hint: Calculate corner points, use quoted lists '(x y) [OK]

Common Mistakes:

• Using unquoted points causing errors
• Using width/height as points instead of coordinates
• Starting rectangle at wrong point