cad lisp 螺栓_如何用cad画螺丝

首先,切换到西南等轴视图,以0,0,0点为中心点,画个正6边形,然后,执行拉升

命令: _extrude

当前线框密度:  ISOLINES=随便

选择对象: 找到 1 个(选画的6边形)

选择对象:确认

指定拉伸高度或 [路径(P)]: 20 (一般为6边行内接圆半径1/2,自己随便)

指定拉伸的倾斜角度 <0>:

下一步

以0,0,0为圆心画半径为20的圆,执行拉升高度160,命令如下

命令: _circle 指定圆的圆心或 [三点(3P)/两点(2P)/相切、相切、半径(T)]: 0,0,0

指定圆的半径或 [直径(D)]: 20

命令: _extrude

当前线框密度:  ISOLINES=4

选择对象: 找到 1 个

选择对象:

指定拉伸高度或 [路径(P)]: 160

指定拉伸的倾斜角度 <0>:

然后并集两个图形

命令: _union

选择对象: 找到 1 个

选择对象: 找到 1 个，总计 2 个

便于观察过程,我使用2个视窗,一个主视,一个西南

现在在主视窗口进行

画辅助线,命令如下

命令: _line 指定第一点: 0,40

指定下一点或 [放弃(U)]: 0,200

再画2条辅助线

命令: _line 指定第一点: 0,40

指定下一点或 [放弃(U)]: -20,40

复制位移

命令: cp COPY 找到 1 个

指定基点或位移: 指定位移的第二点或 : 6.5(沿中间的辅助线向上向下都可以拉)

再画正多边形,3边,以两条短的辅助线的端点为3边行的一边

命令: _polygon 输入边的数目 <3>:

指定正多边形的中心点或 [边(E)]: e 指定边的第一个端点: -20,33

指定边的第二个端点: -20,40

然后旋转刚才所画的图形,不过,这不是旋转为实体的那种,看清楚

命令: _rotate

UCS 当前的正角方向:  ANGDIR=逆时针  ANGBASE=0

选择对象: 找到 1 个

选择对象: 找到 1 个，总计 2 个

选择对象: 找到 1 个，总计 3 个

选择对象: 找到 1 个，总计 4 个

选择对象:

指定基点:(以长辅助线底端为基点)

指定旋转角度或 [参照(R)]: 3 (度数影响螺纹的斜度)

现在选中画好的正3边形做旋转为实体,以长辅助线为旋转对象,如下:

命令: _revolve

当前线框密度:  ISOLINES=4

选择对象: 找到 1 个

选择对象:

指定旋转轴的起点或

定义轴依照 [对象(O)/X 轴(X)/Y 轴(Y)]: o

选择对象:

指定旋转角度 <360>:

现在对旋转好的图形进行三维阵列,在下拉菜单>修改>三维操作 中,如下:

命令: _3darray

选择对象: 找到 1 个，总计 1 个

选择对象:

输入阵列类型 [矩形(R)/环形(P)] :r

输入行数 (—) <1>: 18 (说明:由于要和原来的图配合,我们只要以Y轴方向阵列即可)

输入列数 (|||) <1>:

输入层数 (…) <1>:

指定行间距 (—): 7 (这是每个螺纹和其空隙的距离)

阵列完毕,删除辅助线,然后选中所有图形,进行并集,着色后即可.[/SIZE]

如果想做的非常好,就要使用LISP程序了