如何在MATLAB或者CAD画出两条相互平行的螺旋线，线距2mm，圈高8mm

参考代码如下，具体参数你根据需要再调整

clc
clear all
close all
t = 0 : 01 : 10  pi;
x = exp(-t / 20)  cos(t);
y1 = exp(-t / 20)  sin(t);
y2 = exp(-t / 20)  sin(t);
% 绘制三维螺旋线
z1 = t;
z2 = t+2;
figure
plot3(x, y1, z1);
hold on
plot3(x, y2, z2, 'r-');
grid on
xlabel('x');
ylabel('y');
zlabel('z');

效果图

你好！
用ACAD2004画三维d簧可按如下 *** 作：画两个首尾相接的半圆弧->以过其中一个交点的切线为旋转轴，两圆弧分别向上和向下旋转（命令ROTATE3D）一定的角度（如20度）->在圆弧的另一个端点画一小圆（d簧的截面圆）垂直于圆弧->命令EXTRUDE，选小圆，路径选圆弧->命令SOLIDEDIT，F，E，选实体小圆端面，拉伸路径选另一条的圆弧->把上述的d簧实体单元拷贝多个，并以端面圆心对齐连接，完成。
更多CAD问答视频，请在本站查找
希望对你有所帮助，望采纳。

请参照以下步骤在CAD软件中画螺丝螺纹。

1、首先在电脑上用CAD软件打开画了一部分的图纸，可以看到下图中的图纸就差螺纹了。

2、然后分别画一条45°的斜线和一条120°的斜线，如下图所示。

3、以中心线为起点，向上画一条长26944的线段，这里画的是美制12#螺纹，26944是该螺纹的大径，可以要根据所画的实际螺纹尺寸来画。

4、然后以26944线段的中点为起点，向右画一条直线。

5、然后按照下图中的形状来修剪删除多余的线段。

6、然后再画一条60°角的斜线，如下图所示。

7、然后延长右边的短线，使其与60°斜向相交。

8、然后在CAD中执行修剪 *** 作，达到下图中的效果。

9、然后将短线进行镜像 *** 作，两条短线成V形。

10、将两条短线组成的V线段继续向右镜像，直至和下图一样。

11、再执行一次修剪命令删除不需要的线，螺纹就画好了一半。

12、然后再以中心线为轴进行镜像处理，如下图所示。

13、最后用直线将V形相错连接即可。完成以上设置后，即可在cad软件中画螺丝螺纹。

d簧的画法已经是很麻烦了，你要的是螺旋d簧的画法，如果是04以前的版本就用我下面的方法先把画d簧学会（这是我在我空间给你复制过来的），然后在学螺旋d簧的画法，具体怎么画晚上我可以告诉你，因为我白天时间不多如果是07以后版本，用螺旋工具直接可以画出来，非常简单。
CAD做d簧方法：在俯视图上先画一个圆，直径40MM。然后在圆的中心画上十字架（就是一树一横两条线）然后用主视图，把刚才画的圆复制一个，放到下面，距离10MM。然后在用西南轴侧视图，把圆的四个限象点链接在一起（就是上面两条交叉线，于下面两条交叉线的两端）。然后点：格式--点样式，选择第四个交叉点。然后点：绘图--点--定数等分，选择你画的四条链接线的其中一条，输入4敲回车，这时候那条线上会出现三个交叉点。如此吧其他两条线也弄成这样（注意：其中一条不要，三条就行了）。然后点击你的：对象捕捉（右键）--设置，把限象点打开。输入命令：UCS敲回车，输入3P敲回车。然后点三条线两边的任意一条（注意，这一条要两边的，不是中间那一条）的一端，然后在点向中间那条线的中间的交叉点，然后在点击最后一条的另一端。在选择画弧工具，从你刚才点过的地方画条弧。这就是一个d簧圈的一半。然后把他镜像成一个d簧圈，复制多个圈链接在一起，这就是d簧了。

。直接画是很难的你可以先用“电子表格”按阿基米德螺线公式计算出一列成对的X、Y的值。并做成“X，Y”的形式，然后复制这一列值，在CAD里画样条时粘贴上去就成了，“电子表格”中取样越细，画的图越精确，，“电子表格”中取样细不会增加人的工作量的。 2。还可以用CAXA画，那更方便。阿基米德螺旋线用autolisp编程可以实现(command "pline" )(setq n 0)(repeat 1000(command (polar (list 0 0) (/ n 573) n))(setq n (1+ n)))(command)d簧和螺纹（三维）1、打开CAD后，找工具／AUTOLISP／VISUAL LISP编辑器，打开．点新建文件2、然后输入(defun c:luoxuan(/)(setq b1 (getpoint "请指定螺旋线基点: "))(setq r (getreal "请输入螺纹平均半径: "))(setq disp (getreal "请输入螺纹节距: "))(setq n (getint "请输入每圈细化段数: "))(setq delta (/ ( 20 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))

---