2018用AutoCAD生成圆管弯头展开图

6008716

　　摘 要：介绍了根据圆管弯头的展开原理，借助于AutoCAD内嵌的AutoLISP语言程序的支持，用AutoCAD自动生成展开图形。
http://
　　关键词：AutoCAD AutoLISP 弯头 展开图
　　
　　随着国内冶金、矿山、造船等制造业的迅速发展，尤其是我国加入WTO，随着科技水平的迅速提高、现代化加工方法及数控设备的不断更新，要求产品的质量和精度也原来越高。对钣金加工来说，依靠手工放样在制造精度和生产效率方面以不能满足现代化生产的需要。对于一般的数控下料设备，其系统只能编辑一些简单的图形，对于编辑像圆管弯头展开图这样复杂的图形还比较困难。在实践中，可以通过AutoCAD内嵌的AutoLISP语言，根据展开图的数学函数，编制相应的程序，可以在AutoCAD中自动生成放样展开图形，然后再转化成数控下料机的可执行语言，即方便简单又快速准确。下面就是编制的原理及源程序。
　　一、展开原理图
　　二、图形分析
　　图1所示为夹角130°弯头，弯头在平面上投影夹角为25°，设弯头下段直径为ΦD=1000，ho=270，设X轴为弯头的展开方向，起点为0弧度（俯视图），终点为2π弧度，对应展开的高度方向为Y轴，则起点坐标为（0.0，270.0），当展开的增量a=0.01时，如图1所示Y轴对应的增量Y2=h0+(b2*tan25°)，其中tan25°=0.466308，当a=2π时，图形完全展开。
　　三、编写程序
　　在文本编辑环境下，用AutoCAD内嵌的AutoLISP语言编写一个相应的程序，实现展开曲线的生成，如程序名为wt.lip:
　　(defun c:wt (/ r y x1 x2 y1 y2 p1 p2)
　　 (setq r 500.0)
　　 (setq y 270.0)
　　 (setq x 0.0)
　　 (while (参考文献：
　　[1]胡仁喜.AUTOLISP 机械设计高级应用实例[M].机械工业出版社.
　　[2]赵景亮.AUTOCAD 2004与AUTOLISP二次开发技术[M].清华大学出版社.
　　[3]陈路.新编钣金技术与展开计算[M].北京科海电子出版社.