CAD画麻花钻头教程.docx

CAD画麻花钻头教程.docx

《CAD画麻花钻头教程.docx》由会员分享，可在线阅读，更多相关《CAD画麻花钻头教程.docx（15页珍藏版）》请在冰豆网上搜索。

CAD画麻花钻头教程

CAD画麻花钻头的教程

作者:

gia  发布日期:

2006-7-31  查看数:

284  出自:

作者：

佚名 资料库来源：

cad世界网

这是CAD2007以下版的教程

好不容易才完成了，有的地方怕讲得不清楚所以做了些动画，大家如有什么问题提出来再做解答。

1、以10mm钻头为例。

俯视图开始：

画条140中心线，Z轴矢量UCS、z向上，中心画R5圆拉伸140。

如图

图1

2、画螺旋线：

画螺旋线的程序很多，我用的是以下程序：

;========================================================

;

;

本程序适用于锥形，倒锥形，柱形，螺旋线的生成

;2000.6.1   LJC

;2000.5.30 2000.6.12004.2

;

;========================================================

（defunC:

xlt（/）

（setqb1（getpoint"\n下端圆心:

"））

（setqang0（getreal"总转角：

"））

（setqa（getreal"下端圆半径R=：

"））

（setqb（getreal"上端圆半径r=：

"））

（setqh（getreal"上、下端高差H=:

"））

（setqn（fixh））

（setqdelt（/（*（/ang0180）pi）n））

（setqj（/hn））

（setqang0）

（setqjj0）

（command"ucsicon""or"）

（command"ucs""o"b1）

（command"3dpoly"（lista00））

（repeatn

  （setqjj（+jj1））

  （setqj1（+0（*jjj）））

  （setqang（+deltang））

  （setqr（-a（/（*j1（-ab））h）））

  （setqpt2（list（*r（cosang））（*r（sinang））（+0（*jjj））））

  （commandpt2）

）

（command""）

）

关闭对象捕捉

输入：

xlt

下端中心线  0,0

总转角     525

下端圆半径  4.2

上端圆半径  4.2

上下端高差  85

如图：

图2

3、最近点对象捕捉，沿螺旋线Z轴矢量UCS。

以0,0为圆心作R3.5圆。

如图：

图3

4、路径拉伸，端面再拉伸20，阵列。

如图：

图4

5、差集。

这样钻头的基本坯子出来了。

如图：

图5

6、在大约86处剖切、保留两侧，下面部分向右40复制一个。

如图:

图6

7、左边图以中心线作一个内径9.5外径12高90的实体套筒，差集。

如图：

图7

8、右边图向下1复制一个、差集。

如图：

图8

9、右边图向左遇到40，与左边图重合，全部并集。

如图：

图9

10、切换在主视图里旋转45°

图10

11、回到俯视图，画一个60°的梯形——面域、旋转成实体——中心剖切留右边——向左移动1——中心剖切留右边。

图11

12、切换到左视图，距离中心线底端2.5为中心旋转-5。

如图：

图12

13、绕Y轴的旋转角度90°——阵列。

如图：

图13

14、差集。

如图：

图14

15、钻头建模就完成了

图15

图16

（注：

可编辑下载，若有不当之处，请指正，谢谢!

）