AutoLISP 开发指南

教程：入门（AutoLISP）

2023-1-5 08:47| 发布者: admin| 查看: 979| 评论: 0|来自: AutoCAD

摘要: 使用 AutoLISP 编程语言创建自定义例程是自动化 AutoCAD 并将其扩展到您想要的工作方式的绝佳方法。

使用 AutoLISP 编程语言创建自定义例程是自动化 AutoCAD 并将其扩展到您想要的工作方式的绝佳方法。

AutoLISP基于LISP（LISt Processing）编程语言。列表是用括号括起来的结构。列表中的元素可以是以下一项或多项：

通常，列表中的第一个元素是函数的名称，以下元素称为参数，它们提供函数将处理的值。

下面显示了用于 AutoLISP 表达式的语法：

(function_name [argument1 argumentX …])

AutoCAD 帮助系统包含可在 AutoLISP 程序中使用的可用功能的列表。每个函数主题都包含有关

大多数函数主题还包括示例代码，以帮助您开始使用该函数。

乍一看，AutoLISP 表达式在程序中使用的语法可能令人生畏，但只要稍加练习和时间，您就会习惯它。除了以 a（左括号）开头的 AutoLISP 表达式之外，表达式也可以以字符开头。（感叹号）字符只能在 AutoCAD 命令提示符下使用，并用于返回 AutoLISP 变量的当前值。(!!

以下是 AutoLISP 表达式的一些示例：

随着 AutoLISP 程序复杂性的增加，您创建的表达式也会增加。AutoLISP 表达式可以嵌套在彼此内部。嵌套表达式时，始终从最内层的表达式到最外层的表达式计算它们。AutoLISP 表达式的求值过程类似于数学中的运算顺序。

以下是 AutoLISP 中嵌套数学表达式的示例：

(+ 0.01 (* 2 0.875))

在此示例中，首先计算最里面的表达式（* 2 0.875）。这两个数字相乘，*（乘积或乘法）函数返回值 1.75。然后，AutoLISP 将外部表达式的计算结果为（+0.01 1.75）。将两个数字相加后，AutoLISP 返回最终值 1.76。

以下是嵌套表达式的其他示例：

(setq nDist (getreal "\nEnter a distance: "))

该函数提示用户输入实际数值。然后将提供的值传递给函数并分配给用户定义的变量。getrealsetqnDist

(alert (strcat "Welcome " "to " "AutoLISP!"))

该函数将所有字符串组合成一个字符串值。然后将函数返回的值传递给函数并显示在消息框中。strcatstrcatalert

在命令提示符下，输入！dRadius。

AutoLISP 返回存储在用户定义变量中的值。如果变量尚未定义或没有值，则返回值 ofis。dRadiusnil
在命令提示符下，输入（setq dRadius 1.25）。

AutoLISP 创建一个名为的用户定义变量，并为其赋值 1.25。该函数返回值 1.25，这是分配给变量的值。dRadiussetq
在命令提示符下，输入！dRadius。

AutoLISP 返回存储在用户定义变量中的值，该值为 1.25。
在命令提示下，输入（命令“._circle”“0，0”dRadius）。

AutoLISP 启动 AutoCAD CIRCLE 命令，并向该命令传递两个值。值“0，0”用于定义圆中心点的位置，并用于指定圆的半径。由于值为 1.25，因此圆的半径设置为 1.25。dRadiusdRadius
在命令提示符下，输入 （setq pt （getpoint “\n指定圆的中心点： ”））。

AutoLISP 会提示您输入坐标值。可以使用键盘输入坐标值，也可以在绘图区域中单击。提供的坐标值将分配给变量。pt
在命令提示符下，输入（命令“._circle”pt dRadius）。

AutoLISP 启动 AutoCAD CIRCLE 命令，该命令使用分配给这两个变量的值。ptdRadius