本帖最后由 作者 于 2006-8-3 9:52:21 编辑
对于在AutoCAD中经常会用到绘螺纹,弹簧等.而在autoCAD中没有给出专用的命令,因此共享一下此命令的源程序,供广大autoCAD用户使用.
使用方法:选择"工具"-->autoLISP-->加载应用程序,会打开"加载应用程序"对话框,选择在此下载后保存的helix.lsp文件,单击"加载"按钮,将方针加载到应用程序中,然后单击"关闭"按钮,关闭对话框.执行helix命令,
系统提示: 指定螺旋线基点: ( 输入螺旋线中心坐标)
请输入螺纹平均半径: ( 输入螺旋线平均半径)
请输入螺纹节距 输入螺旋线节距,一般设为2)
请输入每圈细化段数 输入螺旋线每圈细化段数,一般设为72)
注意:在绘制时,有时会受到图形中其他图元的影响而使绘制的螺旋线发生变形,这时应当暂时关闭"对象捕捉"功能或者冻结其他图层,然后再进行绘制.绘制后要注意坐标系的变化,要是绘制前坐标原点不在这个基点处,绘制后坐标原点移到了螺旋线的基点处.
绘制完之后,系统会提示: "错误: 函数被取消. " 这时不会影响到绘制.此时,螺旋线最后一点还与CAD十字架相联,按Esc或空格键即可.
例如绘制基点为坐标原点,平均半径为25,高为16的螺纹,操作如下:
(1)执行helix命令,指定基点(0,0,0),平均半径25,节距2,每圈细化段数为72,绘制了一段螺旋线.
(2)选择"绘图"-->"三维操作"-->"三维阵列",选择矩形阵列,设置行数为1,列数为1,层数为8,指定层间距为2.得到了8层螺旋图形.
(3)用"并集"命令将上一步8层螺纹相并.然后删除开始绘制的螺旋线.就得到了所大小的弹簧.
点击下载: | 
[复制链接]
发表于 2006-8-1 16:53:00
置顶卡
变色卡
显身卡
楼主