AutoCAD.Lisp等距3D螺旋线

AutoCAD.Lisp等距3D螺旋线（任意曲线表面）可应用于等距盘管轨迹线的绘制，使用简单方便

操作指南

绘制等距螺旋轨迹线命令：hl
必须选择一条直线和一条多段线或样条曲线。
直线作为中心线，多段线或样条曲线作为轮廓线。
如果是圆弧必须先转换成多段线且不能闭合。

本次更新 ( 2016-5-14 ver 1.0 )

增加起始点的切换
增加起始角度的输入
增加删除生成曲线的按钮
将长度显示在界面上
将终点的角度显示在界面上
删除了加载时的命令使用说明文字

AUTO CAD 中如何画螺旋线？

1、打开CAD后,找工具/AUTOLISP/VISUALLISP编辑器,打开.点新建文件

2、然后输入( (/)(setqb1(getpoint"请指定螺旋线基点:"))(setqr(getreal"请输入螺纹平均半径:"))(setqdisp(getreal"请输入螺纹节距:"))(setqn(getint"请输入每圈细化段数:"))(setqdelta(/(*2.0pi)n))(setqj(/dispn)(setqbb(caddrb1))(setqang0)(setqjj0)(Command"UCS""o"b1)(Command"3dpoly"(listr00))(repeatn(setqjj(+jj1)(setqang(+deltaang))(setqpt2(list(*r(cosang))(*r(sinang))(+0(*jjj))))(Commandpt2))(Command""))存盘为luoxuan.lsp,关闭编辑器

3、要用时,点工具/AUTOLISP/加载,找到luoxuan.lsp文件将其加载,关闭对话框.在命令行输入luoxuan回车,就开始了螺旋线的绘制(摘自:boardID=8&RootID=31787&ID=31960)