QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 6380|回复: 12
收起左侧

[求助] 自钻螺钉的螺纹及钉尖在CAD里的三维画法

[复制链接]
发表于 2007-9-30 17:07:47 | 显示全部楼层 |阅读模式 来自: 中国广东广州

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
自钻螺钉的螺纹及钉尖在CAD里的三维画法
+ t+ ?' i% W  e8 g8 T2 t4 z
! |; c) T" B: S8 g& b如图,请高手指点 :handshake . r' r& }4 ~  }; w( j/ z
$ `& c0 c( p0 c' q5 a/ X8 T
http://file:///F:/cs/DSC03466.jpg
发表于 2007-10-1 08:55:23 | 显示全部楼层 来自: 中国浙江丽水
我这里有一个lisp,是关于画螺纹的,里面有一个记事本,描述了使用方法,也是从别人处分享过来的,你试用下,能否帮到你,我没有去测试过!我是幕墙设计,这个好少可以说用不着!
) _0 Y1 K' v( p5 d' n# t6 {
1 z! M8 D) w% ~6 H1 _[ 本帖最后由 chnlws001 于 2007-10-1 09:00 编辑 ]

CAD画螺纹插件.rar

10.59 KB, 下载次数: 84

画螺纹线的小工具

 楼主| 发表于 2007-10-1 10:23:41 | 显示全部楼层 来自: 中国广东广州
多谢楼主!
6 B" K% D6 W- i先下载看看. d( _# ^. f  _$ z* ]' x! [( v
本来照了张相片上传了,但不知为何看不到( L5 @! ?+ R" H7 ]0 O: T
请高手指点!
发表于 2007-10-1 13:53:48 | 显示全部楼层 来自: 中国浙江宁波
看看你的图片地址:http://file:///F:/cs/DSC03466.jpg
( u" O) z5 n& G3 ^  b. R/ `2 L" o% K. I" S) a8 l* e
很显然方法错了!- i# M! r) V9 _
你要反省一下了!
 楼主| 发表于 2007-10-1 22:00:08 | 显示全部楼层 来自: 中国广东广州
DSC03466.jpg
( r$ D/ n$ V+ l: m: R  [
& s$ ]6 R+ W, s$ o$ L1 \: z5 u[ 本帖最后由 csace 于 2007-10-1 22:05 编辑 ]
 楼主| 发表于 2007-10-1 22:04:47 | 显示全部楼层 来自: 中国广东广州
上面图片是刚传上去的,请高人指点三维图的画法!!!
发表于 2007-10-28 00:44:13 | 显示全部楼层 来自: 中国山东青岛
有平面图吗?
 楼主| 发表于 2007-10-28 00:59:49 | 显示全部楼层 来自: 中国广东广州
回 7楼
- i% {: |1 o; G& l9 g, M平面图还没画,这是在车间拿的几颗螺钉照的,想练练三维画法,到现在还没找到螺纹的画法(尺寸不重要,每种规格不一样),您只要教我螺纹的画法就行。谢谢!!
发表于 2007-10-28 07:34:41 | 显示全部楼层 来自: 中国山东淄博
都是标准件呀,学学也不错!
发表于 2007-11-2 16:48:52 | 显示全部楼层 来自: 中国江苏徐州
在CAD不可以化螺纹,虽然向但是不是真的螺纹!
 楼主| 发表于 2007-11-2 21:02:33 | 显示全部楼层 来自: 中国广东广州
我用的是CAD06版,没有现成的工具可用,平面螺旋已想到方法,但空间螺旋定位还没想到方法。0 s" f" O4 N$ D) f4 Y
平面效果如下图:
$ `* @5 j/ {0 D  V" [' @  V6 D8 G1 c8 p: @5 T
1.JPG
- D" [1 @  {5 x) M) a; A7 G
3 l8 Y6 D/ R9 O 2.JPG
发表于 2009-1-10 15:28:54 | 显示全部楼层 来自: 中国广东佛山
<B><FONT color=teal>倒!回复完才发现这是2007年的贴子,给唐版提起来了。。。)5*(</FONT> </B><BR><BR><B>lisp源文件,复制到文本文件,改为<FONT color=red>LSP</FONT>后缀名,在CAD中加载,就可以生成螺丝啦(载入后,快捷键<FONT color=red>XLT</FONT>)。。。</B><BR><BR><B>以前用04的时候一直都用这个,,后来用09就不用了,,,,</B><BR><BR>
;========================================================<BR>;<BR>;&nbsp; &nbsp;本程序适用于锥形,倒锥形,柱形,螺旋线的生成<BR>;&nbsp; &nbsp;2000.6.1&nbsp; &nbsp;&nbsp; &nbsp; LJC<BR>;&nbsp; &nbsp;2000.5.30 2000.6.1&nbsp; &nbsp;2004.2<BR>;<BR>;========================================================<BR>(defun C:xlt(/)<BR>&nbsp; &nbsp;(setq b1(getpoint "\n下端圆心:&nbsp; &nbsp;"))<BR>&nbsp; &nbsp;(setq ang0(getreal "总转角:"))<BR>&nbsp; &nbsp;(setq a(getreal "下端圆半径R=:"))<BR>&nbsp; &nbsp;(setq b(getreal "上端圆半径r=:"))<BR>&nbsp; &nbsp;(setq h(getreal"上、下端高差H=:"))<BR>&nbsp; &nbsp;(setq n(fix h))<BR>&nbsp; &nbsp;(setq delt (/ (*(/ ang0 180) pi) n ))<BR>&nbsp; &nbsp;(setq j( / h n))<BR>&nbsp; &nbsp;(setq ang 0)<BR>&nbsp; &nbsp;(setq jj 0)<BR>&nbsp; &nbsp;(command "ucsicon" "or" )<BR>&nbsp; &nbsp;(command "ucs" "o" b1)<BR>&nbsp; &nbsp;(command "3dpoly" (list a 0 0))<BR>&nbsp; &nbsp;(repeat n<BR>&nbsp; &nbsp;&nbsp; &nbsp; (setq jj(+ jj 1))<BR>&nbsp; &nbsp;&nbsp; &nbsp; (setq j1(+ 0 (* j jj)))<BR>&nbsp; &nbsp;&nbsp; &nbsp; (setq ang (+ delt ang))<BR>&nbsp; &nbsp;&nbsp; &nbsp; (setq r(- a (/ (* j1 (- a b))h)))<BR>&nbsp; &nbsp;&nbsp; &nbsp; (setq pt2(list (* r (cos ang))(* r (sin ang))(+ 0 (* j jj))))<BR>&nbsp; &nbsp;&nbsp; &nbsp; (command pt2)<BR>&nbsp; &nbsp;<BR>&nbsp; &nbsp;)<BR>&nbsp; &nbsp;(command "")<BR>&nbsp;&nbsp;<BR>)

- I; \3 T/ J& n! d! T; K0 P[ 本帖最后由 镜子·空瓶 于 2009-1-10 15:41 编辑 ]

评分

参与人数 1三维币 +5 收起 理由
woaishuijia + 5 应助

查看全部评分

发表于 2009-1-16 16:22:45 | 显示全部楼层 来自: 中国浙江宁波

CAD是可以画自攻螺钉的

自攻螺钉.jpg 4 M4 a" ~! {6 Y+ {% y& Q

" n/ O, d# M% i# S样子象,可不一定标准哦!
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表