如何用CAD画3D弹簧?

　　最新版本的ACAD可以直接绘制弹簧了，不需要调入程序，低版本的可以通过命令实现，首先下载螺旋线的程序，在下面。如果无法解压，可以打开luowen.lsp文件，将里边的命令都粘贴到记事本中，保存为luowen.lsp即可。

　　命令如下：

　　(defun c:luowen (/)
　　(setq b1 (getpoint"dingjidian:"))
　　(setq r (getreal"shurubanjing:"))
　　(setq disp (getreal"shurujieju:"))
　　(setq n (getint"xihuaanshu:"))
　　(setq delta (/(* 2.0 pi) n))
　　(setq j (/ disp n))
　　(setq bb (caddr b1))
　　(setq ang 0)
　　(setq jj 0)
　　(command "ucs""o" b1)
　　(command"3dpoly" (list r 0 0))
　　(repeat n
　　(setq jj (+ jj 1))
　　(setq ang (+ delta ang))
　　(setq pt2 (list (* r (cos ang)) (* r (sin ang)) (+ 0 (* j jj))))
　　(command pt2)
　　)
　　(command"")
　　)

　　运行AUTO CAD2000，新建一个文件，点击“工具”菜单“AutoLISP”下“加载”项，弹出“加载/卸载应用程序”对话框。在该对话框中找到已下载并解压的luowen.lsp程序，选中它，并依次点击“加载”和“关闭”按钮。
　　在CAD的命令行中输入“luowen”并回车，以执行该命令。
　　具体提示如下：
　　dingjidian：你单击一点（让你指定弹簧的基点）
　　shurubanjing: 你输入20 （让你输入弹簧的中径，中径等 于弹簧的最外圈直径减去弹簧簧丝直径）
　　shurujieju:你输入10 （让你输入弹簧的节距）
　　xihuaanshu:你输入36 （让你输入弹簧的细化段数）
　　单击“标准工具栏”上“西南等轴测”按钮，改变视点，结果 如图所示。

　　此主题相关图片如下：

　　输入“ucs”回车执行ucs命令，然后输入“s”回车（保存）和“ucs1”回车（坐标名称）保存当前坐标。
　　再次输入“luowen”，并依次输入“0，0，-5”（基点）、“20”（半径）、“5”（节距）和“36”（细化段数）绘制下支撑处螺旋段，结果如图。

　　此主题相关图片如下：

　　输入“ucs”回车，输入“x”回车，再次回车，当前坐标绕x轴旋转90度。
　　单击绘图栏的“圆”按钮，画圆，输入圆心“20，0”回车，输入半径“2.5”回车，再次回车，重新执行“圆”命令，输入“@0,5”回车指定圆心，输入“2.5”回车指定半径。

　　选择“绘图”“实体”“拉伸”菜单发出extrude命令。
　　提示选择对象时选择下方的小圆后回车。输入“p”后回车，提示选择路径时选择支撑段螺旋线作为路径。
　　选择“修改”“阵列”菜单发出ARRAY命令。输入“L”表示选择前面最后生成的一个对象（前面拉伸成的支撑段）。回车，结束选择。再次回车接受缺省阵列类型，创建矩形阵列。输入“2”回车创建两行。再次回车，接受缺省的一列。输入“-5”，表示沿Y轴负方向创建阵列。
　　如上，选择“拉伸”命令，提示选择对象时如图所示圈选如倒数第二张图所示的区域。回车，结束选择。输入“p”回车，选择上方的螺旋线作为路径。结果最后一张图
　　选择“修改”菜单中的“阵列”命令，输入“L”，回车结束选择，再次回车接受矩形阵列，输入“8”回车，表示该阵列为8行，再次回车接受缺省的列数。输入“10”表示沿Y轴正向间隔10，创建阵列。选择“视图”菜单中“缩放”“全部”命令，结果如图所示。
　　选择“工具”“命名UCS”菜单打开“UCS”对话框。在坐标列表区中选中“ucs1”，然后单击“置为当前”按钮，点“确定”。输入“luowen”回车，依次输入“0，0，80”基点、“20”半径、“5”节距、“36”细化段数。选择“工具”“新建UCS”“X”，然后输入“90”，将当前坐标绕x轴旋转90度。单击“圆”命令，以（20，0）为圆心，“2.5”为半径画圆，执行前面的“拉伸”命令，输入“L”回车以刚画的圆为对象，再次回车，结束选择，输入“P”回车，选择刚才画的螺旋线。结果如图。

　　此主题相关图片如下：

　　选择“修改”菜单“阵列”命令。输入“L”表示以最后拉伸成的实体为对象，回车结束选择。再次回车接受矩形阵列，输入“2”回车，再次回车接受1列，输入“5”沿Y轴正方向距离5创建。结果如图。

　　此主题相关图片如下：

　　选择“视图”的“缩放”命令中的“窗口”命令，局部放大物体的上部分。选择“绘图”“实体”“剖切”菜单，发出SLICE命令。输入“L”表示剖切最后产生的对象，回车结束选择，输入“xy”以xy平面为剖切对象。再次回车表示以当前xy平面（z=0）作为裁剪平面。输入“0，0，-7”设置裁剪方向，表示保留裁剪平面的后半部分。再次回车，再次执行SLICE 命令。输入“L”，回车结束选择，输入“YZ”回车。再次回车，输入“5，0，0”回车。
　　裁剪下半部分。将弹簧的下部分局部放大。再次选择“剖切”命令。选择最下端的下支撑段作为对象，回车结束选择。
　　输入“xy”回车，再次回车，输入“0，0，6”回车。再次回车即再次执行SLICE命令。选择下支撑段作为剖切对象，回车结束选择。输入“yz”回车，再次回车，输入“7，0，0”回车。
　　选择“工具”“命名”菜单打开“UCS”对话框，选中“上一个”，单击“置为当前”，点“确定”。
　　选择“剖切”，命令，选择最上方的两圈作为对象，选择“xy”平面，输入0，0，5回车，输入0，0，0回车。再次执行“剖切”命令，选取最下方的两圈作为对象回车，输入“xy”回车，输入“0，0，-85”回车，“0，0，0”回车。渲染后的图形如图所示。

　　通过学习弹簧的绘制，是不是学到了一些新技巧？比如“L”的运用？蓝友们如果有更好的方法不如相互交流一下。支持你就顶一下。

　　http://hi.baidu.com/emean 我的个人空间

可以画螺旋线，然后沿着螺旋线做实心的PIPE
或者在螺旋线一端做垂直的圆，然后单轨放样咯。。。

你说的没错啊,是截面+路径拉伸 我说你不如用ProE

本文如未解决您的问题请添加抖音号：51dongshi（抖音搜索懂视），直接咨询即可。