使用Visual LISP创建简单的LISP应用程序

(setq hgt 15) ;给变量“hgt”赋值

(Command "_.TEXT" "_S" "STANDARD" ipt hgt 0 "Hello, Visual LISP!")

;调用“Commnad”函数与AutoCAD进行通信

(2) 单击“Standard（标准）”工具栏中的 按钮，以“Hello.lsp”为名保存该文件。

Step 3 运行LISP程序

(1) 确认编辑窗口处于前台状态，选择菜单【Tools（工具）】→【Load Text in Editor（加载编辑器中的文字）】，则该程序被加载并运行。系统将返回AutoCAD窗口，并提示用户选择一点，并以指定点为基点来绘制文字。结果如图36-4所示。

(2) 如果用户退出Visual LISP环境并返回AutoCAD系统窗口，则需要对该程序进行加载后，才能运行。选择菜单【Tools（工具）】→【Load Appcation…（加载应用程序）】，弹出“Load/Unload Applications（加载/卸载应用程序）”对话框，如图36-5所示。查找并选择上一步中所创建的“Hello.lsp”文件，并单击Load按钮进行加载。加载后的文件名称将显示在“Loaded Applications（已加载的应用程序）”列表中，并在对话框的左下部显示加载信息。

(3) 完成加载后，单击Load按钮关闭对话框，系统将运行“Hello.lsp”程序。

实例说明