基于AutoLISP的AutoCAD参数化绘图

1) 分析结构特征 ,确定绘图参数 。通常绘制一个零件的 图样 ,需要很多尺寸 ,但是不可能把所有的尺寸都作为参数 。 这时就需要我们分析这个零件 ,确定既能体现零件的结构特 征 ,又能推导出其它尺寸的基本尺寸作为绘图参数 ,参数越少 越好 。
2) 根据绘图参数 ,设计交流界面 (对话框) 。对于参数化 绘图程序来说 ,对话框主要考虑绘图参数的输入和相关控件 的布局 ,为了增加程序的可读性 ,对话框中还要配有图像按 钮 ,用幻灯片来显示各绘图参数的含义 。
Key words :Auto L ISP ;AutoCAD ;paramet ric drawing ;redevelop ment s
1 引言
AutoCAD 是美国 AutoDesk 公司推出的一种通用的计算 机辅助设计和图形处理软件 ,具有易于掌握 、使用方便 、绘图 精确和体系结构开放等优点 。因此 ,自 1982 年问世以来深受 广大设计人员的青睐 ,是 CAD 族群中使用最普遍的软件之 一 。如今 ,AutoCAD 已广泛应用于机械 、建筑 、电子 、航天 、造 船 、冶金 、纺织 、轻工等领域 ,可见 AutoCAD 是一个通用的 CAD 软件 。但要使一个通用的 CAD 系统适合自己的专业工 作需要 ,达到使用方便的要求 ,就必须进行二次开发 。在 Au2 toCAD 为用户提供的 Auto L ISP 、A RX、VBA 等开发工具中 , Auto L ISP 是一种简便易学的解释性语言 ,具有很强的数据 表格处理功能 ,是开发 AutoCAD 的一种重要手段[1] 。
2 Auto L ISP 语言的特点简介
Auto L ISP 语言是嵌套于 AutoCAD 内部 ,将 L ISP (List Processing Language) 语言和 AutoCAD 有机结合的产物 ,它 是 AutoCAD 开放式体系结构的具体表现 。使用 Auto L ISP 可直接调用几乎全部 AutoCAD 命令 ,Auto L ISP 语言既具有 一般高级语言的基本结构和功能 ,又具有一般高级语言所没 有的强大的图形处理功能 ,是当今世界上 CAD 软件广泛采用 的语言之一[2 ] 。
(setq x (dimx_tile image_name) ) ( setq y ( dimy_tile im2 age_name) )
( start_ image image _ name) ( slide _ image 0 0 x y file _ name) (end_image) )
(def un getdata () ; ; ;参数获取子程序 ( setq a (atof (get_tile“key_a”) ) ) ( setq b (atof (get_tile “key_b”) ) ) ( setq c (atof (get_tile“key_c”) ) ) ( setq h (atof (get_tile“key_h”) ) ) ( setq r (atof (get_tile “key_r”) ) ) ) (def un dxdypt (point dx dy / pt) (polar (polar point 0 dx) (/ pi 2) dy) ) ; ; ;坐标变换子程序 (def un draw () ; ; ;图形绘制子程序 ( setq o s ( getvar“OSMOD E”) ) ( setvar“OSMOD E”0) ( setq basept (getpoin“t \ n 基点 :”) )
·70 ·
现代机几种方式 : 1) 命令行方式 ,用 Load 函数装载 :co mmand : (load“驱动 器 :\ \ 路径\ \ 文件名”) [3] 2) 对话框方式 ,选择下拉菜单“工具”→“Auto L ISP”→ “加载”选项 ,会出现“加载/ 卸载应用程序”对话框 ,选择所需 加载的 L ISP 文件 ,点击加载即可[3] 。 3) 自动加载 ,在 AutoCAD 工 作 目 录 下 有 一 个 ACAD. L SP 文件 ,它是 AutoCAD 启动时自动装载的 Auto L ISP 程 序 。用户想要在 AutoCAD 启动时自动装入自己定义的程 序 ,在 ACAD. L SP 文件中加入 (load“驱动器 :\ \ 路径\ \ 文件 名”) 即可[3 ] 。 在 AutoCAD 环境中 ,相关程序被装载后就可以运行了 。 运行时 ,在 command :提示符下键入 def un 定义的程序名 ,就 会出现相应的对话框 ,输入相关的参数后确定 ,根据提示 ,选 取绘图基点 ,就可以绘出所需的图形 。
计算机应用
文章编号 :1002 - 6886 (2006) 04 - 0069 - 03
基于 Auto L ISP 的 AutoCAD 参数化绘图
周陶勇 ,李珊 ,王磊 ,邓绪勇
( 昆明理工大学 机电工程学院 , 云南 昆明 650093)
·69 ·
摘要 :通过对 Auto L ISP 语言的分析与研究 ,探讨了基于 Auto L ISP 的 AutoCAD 参数化绘图程序设计的基本步骤 。本文以 钣金折弯件的参数化绘图为例 ,应用 L ISP 语言编写工程图的参数化绘制程序 ,应用 DCL 语言创建人机交流的对话框 ,并且 详细阐述了其实现过程 。实践表明 ,Auto L ISP 语言功能强大 ,易学易用 ,是 AutoCAD 二次开发的重要工具 。 关键词 :Auto L ISP AutoCAD 参数化绘图 二次开发 中图分类号 : T H126. 2 文献标识码 :A
3) 按照图形需要 ,编写绘图程序 。用 DCL 语言定义好的 对话框只是一个界面描述 ,不能独立地运行 ,只有以 PDB 函 数为基础的 L ISP 程序来驱动 ,才能实现指定的功能 ,获取用 户输入的绘图参数[2] 。根据获取的绘图参数 ,按照图形需要 , 进行相关的坐标变换 ,编写相应的图形绘制程序 。
Auto L ISP 语言的一个最大特点是语法较为简单易懂 , 比用其它语言 (如 A RX、VBA 等) 开发 AutoCAD 的应用程序 更易于掌握 ,所以被广泛地应用于 AutoCAD 的二次开发上 。 此外 ,Auto L ISP 语言还能够利用 PDB 函数驱动 DCL (Dialog
Cont rol Language) 文件创建自己的对话框[2] 。 Auto L ISP 语言最典型的应用之一就是实现参数化绘图
ue =“40”;} :edit_bo x{key =“key_c”;label =“钣金件长度 C = ”;val2
ue =“50”;} :edit_ box{ key =“key_ h”; label =“钣金件厚度 H = ”;
value =“5”;} :edit_bo x{key =“key_r”;label =“折弯内圆角 R = ”; val2
4 参数化绘图程序设计的应用实例
下面以钣金折弯件的参数化绘图为例 ,用 DCL 语言创建 人机交流的对话框 ,用 L ISP 语言编写工程图的参数化绘制 程序 ,并详细阐述其实现过程 。
1) 根据对钣金折弯件的结构特征的分析 ,确定钣金件弯 边 (A) 、钣金件弯边 (B) 、钣金件长度 ( C) 、钣金件厚度 ( H) 、折 弯内圆角 ( R) 等为绘图参数 。
2) 根据钣金折弯件的绘图参数 ,用 DCL 语言编写钣金折 弯件绘图程序的对话框文件 (e :\ x\ bj. dcl) 。考虑到程序的可 读性 ,增加一个图像按钮 ,用幻灯片文件 (e :\ x\ bj. sld) 来显示 各绘图参数的含义 。
bj :dialog{label =“钣金折弯件”; :row{ :image{key =“key_image”; widt h = 18 ;aspect _ ratio = 0.
1 ;color = - 2 ;} :boxed_column{label =“钣金折弯件参数 :”; :edit_bo x{key =“key_a”;label =“钣金件弯边 A = ”;val2
ue =“30”;} :edit_bo x{key =“key_b”;label =“钣金件弯边 B = ”;val2
ue =“5”;}}} o k_cancel ;} 3) 根据绘图参数 ,按照图形需要 ,用 L ISP 语言编写钣金
折弯件的参数化绘图程序 (e :\ x\ bj. lsp) 。 (def un C :BJ () ; ; ;钣金折弯件绘图主程序 ( setq index_ value (load _ dialog“e : \ x \ bj. dcl”) ) ( setq
what_next 2) (while ( > = what_next 2) (if (not ( new _ dialog“bj”index_ value) ) (exit ) ) ( show
“key_image”“e :\ x\ bj. sld”) (actio n_tile“accept ”“( getdata) ( done_ dialog 1) ”) (ac2
4) 装载相关程序 ,绘制所需图形 。在编辑器下编辑好的 L ISP 程序 ,必须经过加载方能使用 。
作者简介 :周陶勇 (1973 —) ,男 ,安徽枞阳人 ,工程师 ,硕士研究生 ,主要研究方向 :数字化设计与制造 。 收稿日期 :2005 - 12 - 12
© 1994-2009 China Academic Journal Electronic Publishing House. All rights reserved.
程序设计[2] ,本文以钣金折弯件的参数化绘图为例 ,说明 Au2 to L ISP 在 AutoCAD 二次开发中的应用 。
3 参数化绘图程序设计的基本步骤
所谓参数化绘图 ,是指用户根据参数对话框的提示 ,输入 相关的参数 ,就能生成所需的图样 。为此就要进行相应的程 序设计 ,对于一般的参数化绘图的程序设计 ,可以遵循以下步 骤: