QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
11天前
查看: 6288|回复: 12
收起左侧

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

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

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

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

x
自钻螺钉的螺纹及钉尖在CAD里的三维画法
: |8 a. \) O, E' {+ L0 t
* @2 F* l( l7 n如图,请高手指点 :handshake
* F! e# U& r8 D8 X, _( ]2 H! C9 _% M0 x- W* J, L! y- F0 a
http://file:///F:/cs/DSC03466.jpg
发表于 2007-10-1 08:55:23 | 显示全部楼层 来自: 中国浙江丽水
我这里有一个lisp,是关于画螺纹的,里面有一个记事本,描述了使用方法,也是从别人处分享过来的,你试用下,能否帮到你,我没有去测试过!我是幕墙设计,这个好少可以说用不着!
3 a% n) f9 A1 O1 D( D" {( X- @) ]7 _" v5 V$ a  @& l
[ 本帖最后由 chnlws001 于 2007-10-1 09:00 编辑 ]

CAD画螺纹插件.rar

10.59 KB, 下载次数: 84

画螺纹线的小工具

 楼主| 发表于 2007-10-1 10:23:41 | 显示全部楼层 来自: 中国广东广州
多谢楼主!6 ^. u4 k- y9 G/ o! p" C+ m
先下载看看0 `! J+ E7 {8 k9 v2 e, \
本来照了张相片上传了,但不知为何看不到
4 ]9 l. C8 U( {& b" d; R* E请高手指点!
发表于 2007-10-1 13:53:48 | 显示全部楼层 来自: 中国浙江宁波
看看你的图片地址:http://file:///F:/cs/DSC03466.jpg- G  G! y- m! k: C" \9 q

- N3 c" `6 i: P  w很显然方法错了!
2 d5 N% ~" a! m0 Z) C1 n7 {你要反省一下了!
 楼主| 发表于 2007-10-1 22:00:08 | 显示全部楼层 来自: 中国广东广州
DSC03466.jpg 4 [) G" f4 i3 e) k- T4 b- q! @: ~
; }8 @* k' K' Z, N# V1 ?
[ 本帖最后由 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楼
! K) @# x# h9 L% T. `' G平面图还没画,这是在车间拿的几颗螺钉照的,想练练三维画法,到现在还没找到螺纹的画法(尺寸不重要,每种规格不一样),您只要教我螺纹的画法就行。谢谢!!
发表于 2007-10-28 07:34:41 | 显示全部楼层 来自: 中国山东淄博
都是标准件呀,学学也不错!
发表于 2007-11-2 16:48:52 | 显示全部楼层 来自: 中国江苏徐州
在CAD不可以化螺纹,虽然向但是不是真的螺纹!
 楼主| 发表于 2007-11-2 21:02:33 | 显示全部楼层 来自: 中国广东广州
我用的是CAD06版,没有现成的工具可用,平面螺旋已想到方法,但空间螺旋定位还没想到方法。
( C" M4 ]9 _0 K平面效果如下图:
/ D5 N# w$ c! u7 n" z5 ^5 x4 Z! ^# O! |
1.JPG
; I2 U' k/ ~+ Z3 L$ f$ n, Q  J3 R; n) M) g9 l  c
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>)
0 Y+ J) s9 I2 s6 \; H
[ 本帖最后由 镜子·空瓶 于 2009-1-10 15:41 编辑 ]

评分

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

查看全部评分

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

CAD是可以画自攻螺钉的

自攻螺钉.jpg 0 L6 X% Q1 _" ?1 r; o

& c9 N# b3 ~! }. s: T; d样子象,可不一定标准哦!
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

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

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