AutoCAD程序化绘制螺纹

cad螺纹的画法：螺纹是指在圆柱或圆锥表面上，沿着螺旋线所形成的具有相同剖面的连续突出，一般称为“牙”。

一、螺纹的形成螺纹是根据螺旋线原理加工而成的。

如下图。

外螺纹：在圆柱或圆锥外表面上形成的螺纹。

内螺纹：在圆柱或圆锥内孔表面上所形成的螺纹二、螺纹的要素1、牙型在通过螺纹轴线的剖切面上，螺纹的轮廓外形。

螺纹的牙型不同，其用途也不同。

a) 普通螺纹（牙型为60o的三角形），用于连接螺纹；b) 管螺纹（牙型为55o），常用于连接管道；c) 梯形螺纹（牙形为等腰梯形），用于传递动力；d) 锯齿形螺纹（牙形为不等腰梯形），用于单方向传递动力。

2、直径螺纹直径有大径（外螺纹用d表示，内螺纹用D表示）、中径和小径之分。

外螺纹的大径和内螺纹的小径均称为顶径；外螺纹的小径和内螺纹的大径均称为底径。

螺纹的公称直径为大径（管螺纹用尺寸代号表示）。

3、线数（n）单线螺纹沿一条螺旋线所形成的螺纹；多线螺纹沿二条或两条以上在轴向等距分布的螺旋线所形成的螺纹。

4、螺距（P）和导程（Ph）如上图。

螺距：相邻两牙在中径线上对应两点间的轴向间隔。

导程：是指在同一条螺旋线上的相邻两牙在中径线上对应两点间的轴向间隔。

螺距、导程、线数的关系是：导程Ph＝线数n×螺距P单线螺纹：导程Ph＝螺距P5、旋向：左旋和右旋三、螺纹的种类螺纹按用途可分为：紧固螺纹、传动螺纹、管螺纹、专用螺纹四类。

螺纹按基本要素可分为：1、标准螺纹凡牙型、直径、螺距符合国家标准的螺纹。

2、特殊螺纹凡牙型符合国家标准，直径和螺距不符合国家标准的螺纹。

3、非标准螺纹凡牙型不符合国家标准的螺纹。

四、螺纹的规定画法螺纹的真实投影是繁琐的，为简化作图，国家标准《机械制图》规定了螺纹的规定画法。

1、外螺纹的画法螺纹的牙顶（大径）及终止线画粗实线；螺纹的牙底（小径）画细实线。

在垂直螺纹轴线的投影面的视图中，表示螺纹牙底的细实线圆画约3/4圈。

2、内螺纹的画法剖视时，牙底（大径）画细实线；牙顶（小径)及终止线画粗实线。

CAD画三维螺丝、螺帽的教材
第一步：加载THREAD.LSP 工具-----AUTOLISP -----加载. 把这个你做好LISP程序加载到CAD 中. 然后就可以输入命令使用了. 命令有三个 ISO228 (英制罗纹) METRIC( 外螺纹) MYTHREAD( 管螺纹)
第二步：
选俯视图L：画一条高25中心线。

命令：Metric公称外径：12（画12mm螺纹）螺距：1.75（基本螺牙）起始点：（中心线底端）螺纹总长（Y方向）：25会生成这样的图：
第三步：转西南等轴侧视图移动原点在圆心上定义新的UCS以圆心点为圆心画直径10.25圆，然后拉伸20
第四步：再移动原点：在拉伸轴的另一面圆心上定义新的UCS以原点画正六边形外切于直径19的圆，然后拉伸9
第五步：着上色基本好了，下面来做倒角延长中心线到六角支持楼主面回到主视图用三维动态观察转动到一定位置作六角中心到任一角的连接线垂直画一小三角
第六步：把多余的线擦掉，“小三角”转换为面域，沿中心线旋转
第七步：差集后一个三维螺栓就好了（螺纹前端也可同样倒个角）。

基于AutoCAD的螺纹加工三维仿真作者：李跃武机械传动中，螺纹的应用十分广泛，尤其是在数控设备上更是大量使用滚珠丝杠。

对这些螺纹零件，采用CAD/CAM技术进行设计与制造是离不开仿真技术的，本文主要介绍的是基于AutoCAD平台，利用VLISP编程，根据螺纹加工原理、三维实体造型和对象布尔运算等实现螺纹加工三维动态仿真技术。

一、基圆柱体造型根据国标（GB196—81）规定，三角螺纹的基本尺寸有外径D、中径D2、内径D1、螺距P、基本三角形高度H和牙形角60°。

按有关规定，滚珠丝杠公称直径为D，长度为L，滚珠直径为db。

将基圆柱体的直径取为D，长度取设计值L，则程序代码如下：(setq d (getreal"\n请输入螺纹外径:")l (getreal"\n请输入螺纹长度:"))(command "cylinder" (list 0 0 -1) "d" d (* -1 l ) )；画圆柱体二、切削刀具造型螺纹加工常用车削、铣削等加工方法，下面仅以车削三角螺纹和铣削滚珠丝杠为例来说明。

1. 三角螺纹车刀简化模型零前角螺纹车刀的创建，如图1所示其代码如下：图1 车刀多边形(setq p1 (list 0 0 0));设当前坐标原点为P1(setq p2 (polar p1 0 (/ p 4)))(setq p3 (polar p2 (/ pi 3 -1) (* 5 h)))(setq p4 (polar p3 (/ pi 2 -1) 10))(setq p5 (polar p4 pi (+ (/ p 4)(* 5 h))))(setq p6 (polar p5 (/ pi 2) 10));定义车刀多边形p1 p2 p3 p4 p5 p6点的相对坐标(command "pline" p1 p2 p3 p4 p5 p6 "c" "") ；用多段线形成封闭多边形(command "extrude" "l" "" -5 "")；拉伸形成车刀模型(setq e1 (entlast))；返回图元名(command "move" e1 "" "0,0,0" (list (/ p 2 -1) (/ d1 2 -1) 2.5))；移动到起刀点2. 滚珠丝杠圆盘铣刀简化模型圆盘铣刀是根据丝杠螺纹槽的法剖面廓形而创建的成形铣刀，为简化计算可用轴向剖面廓形代替，主要代码如下：(setq db (getreal"\n请输入滚珠直径:"))；定义铣刀截面多边形各节点P11、P12、P13、P14，如图2所：图2 铣刀截面多边形(setq p11 (polar (list 0 0 0) (/ pi 2) 23.5))(setq p12 (polar p11 0 db))(setq p13 (polar p12 (/ pi 2 -1) 13.5))(setq p14 (polar p13 (* pi -1) db));定义铣刀截面多边形各节点P11、P12、P13、P14(command "pline" p12 p13 p14 p11 "a" "cl" "") ；用多段线绘制铣刀截面多边形(command "revolve" "l" "" "x" "" )；旋转生成铣刀体(setq o1 (entlast))；返回图元名(command "ucs" "y" "" "" "color" 1)；坐标系绕Y轴转90°，并指定颜色为红色(setq p20 (list 0 0 0))；设当前坐标原点为P20(setq p21 (polar p20 0 3.3))(setq p22 (polar p21 (/ pi 2 ) 5.2))(setq p23 (polar p22 (/ (* 105 pi )180) 1.3))(setq p24 (polar p20 (/ pi 2 ) 6))(setq p25 (polar p20 (/ pi 2 ) 5))；定义铣刀槽截面多边形各节点P20、P21、P22、P23、P24及基点P25，如图3所示：图3 铣刀槽多边形(command "pline" p20 p21 p22 p23 "a" p24 "l" "c" "")；用多段线生成铣刀截面多边形(command "extrude" "l" "" (* 2 db) "")；拉伸形成刀槽体(setq o2 (entlast))；返回该图元名(command "move" o2 "" p25 (list 0 -25 -1))；以基点P25移动刀槽体到指定点(command "array" o2 "" "p" p21 20 "" "" )；将刀槽体环形矩阵20个(setq ss (ssget "x" '((62 . 1))))；以红色为过滤器创建选择集ss(command "subtract" o1 "" ss "")；将铣刀体与刀槽体进行布尔差运算生成铣刀简化模型(setq o3 (entlast))；返回该图元名(command "rotate" o3 "" p21 5)；铣刀旋转5°(command "move" o3 ""(list 0 0 0) (list 0 (* -1 (+ 25 (/ (- d db) 2))) 0))；将铣刀移动到切削位置三、螺纹加工三维仿真1.车削螺纹仿真原理螺旋线的数学模型是：其中，p为螺距，θ为瞬时角，r为基圆半径。

CAD螺栓、螺纹画法实例演示
一、粗牙螺栓M16图形实例
二、画法步骤
1、画法的总思路：六角头实体，光杆部分实体，螺纹部分实体。

此处只介绍螺纹部分实体。

2、查标准计算出M16粗牙螺纹相关数据、三角形牙型数据，
以12.75直径划螺旋，命令：，比如划4圈螺纹，圈高以螺距2为基准，但是在实际确定圈高时要略大于螺距，如
2.01，为了在扫掠时能够实现，如果等于螺距牙型不能扫掠，
所以只能略大于螺距的近似画法，各种螺纹近似圈高实际尺寸可以自己总结。

3、画出原始牙型，方向如下图
扫掠牙型，选择基点选项扫掠，路径旋转螺旋线，以图中边中点为基点。

实现以下实体。

4、以上螺纹已经画出，下面修正牙型：
（1）在螺纹中心画直径13.84圆柱实体，修正原始小径为螺纹小径取并集。

（2）画内直径16，外直径超过螺纹计算大径大一些的圆筒，差集以修正螺纹大径。

至此螺纹部分完成。

把此部分存入块以备插入使用，长度方向复制后并集可以得到不同长度的螺纹长度。