jazzond 发表于 2007-3-26 19:57

如何用cad画三维的弹簧?

初学cad三维,请问
如何用cad画三维的弹簧?

stonewuhunan88 发表于 2007-3-27 10:50

新手,请多关照,多讨论

新手,请多关照,多讨论

liuyilmy 发表于 2007-3-27 13:24

用CAD2007吧,弹簧好弄些.

用2004只能旋转而成

wskih 发表于 2007-3-28 10:04

:lol 给你一个画三维弹簧的东东。把他另存为spl.LSP,CAD起动后加载后就能画出三维弹簧。
(defun C:SPL (/ SD ED THS TAS NVS STEP X Y Z R A H)
(setq SD (/ (getreal "弹簧起始直径: ") 2))
(setq ED (/ (getreal "弹簧终点直径: ") 2))
(setq THS    (getreal "弹簧总高(每圈高度 X 圈数): "))
(setq TAS    (getreal "总角度数(360 X 圈数): "))
(setq NVS    (getint"节点数([总角度数/间隔角度]+1): "))
(setq STEP (- NVS 1))
(setq X (/ (- ED SD) STEP))
(setq Y (/ THS STEP))
(setq Z (/ TAS STEP))
(setq R SD)
(setq A 0)
(setq H 0)
(setvar "CMDECHO"0)
(setvar "BLIPMODE" 0)
(command "3DPOLY" (strcat (rtos R) "<" (rtos A) "," (rtos H)))
(repeat STEP
    (setq A (+ A Z))
    (setq H (+ H Y))
    (setq R (+ R X))
    (command (strcat (rtos R) "<" (rtos A) "," (rtos H)))
)
(command "")
(setvar "CMDECHO"1)
(setvar "BLIPMODE" 1)
(princ)
)


jazzond 发表于 2007-3-28 21:31

回复 #4 wskih 的帖子

{节点数([总角度数/间隔角度]+1): "))}
这句是什么意思?

easycom123 发表于 2007-3-29 23:34

请问三楼,用CAD2006么样画3维弹簧,能说出具体的画法吗?请讲讲心得,谢谢!

liuyilmy 发表于 2007-3-30 09:08

原帖由 easycom123 于 2007-3-29 23:34 发表
请问三楼,用CAD2006么样画3维弹簧,能说出具体的画法吗?请讲讲心得,谢谢!

论坛内有几个弹簧画法,你可以搜一下,
http://www.askcad.com/bbs/thread-5803-1-3.html

duhejun168 发表于 2007-3-30 09:34

这类型的帖子论坛很多
有时间就多找下

天之宇海之翔 发表于 2007-11-19 22:10

好帖子,看着简单,画起来不知从哪入手了

qwsdcv520 发表于 2008-6-5 22:04

还是想要不用装软件加载直接二维画的那种

hebei 发表于 2008-7-4 17:49

回复 #4 wskih 的帖子

为什么复制了你的编程粘贴后是这个样子,选程序时绝对没多选:(defun C:SPL (/ SD ED THS TAS NVS STEP X Y Z R A H)"o-q,Y+~9N
(setq SD (/ (getreal "弹簧起始直径: ") 2))CAD论坛,CAD设计,PROE,autocad,CAD下载,CAD教程,cad快捷键,机械论坛,机械设计论坛,机械制造论坛,视频教程,机械CAD论坛,工程机械论坛,UG,solidworks,字体,打印,模型空间,安装,下载,练习,考试,安装,培训,工程师,机械,制图,工程,建筑,服装,工程师,招聘,cad设计论坛,认证,证书,工程师级*H$|#s"J"`2n"x-h7a!]
(setq ED (/ (getreal "弹簧终点直径: ") 2))
5R3d5z!G!_(askcad.com)是国内最专业,发展最快的AutoCAD设计讨论基地,论坛云集高手,提供CAD的教程,练习,考试,软件下载,教程下载,基础培训等一体化解决方案.并推出Pro/Engineer,Unigraphics,SolidWorks相关讨论专区.我们的口号:CAD设计论坛,为工程师增加动力.请记住我们的网址:askcad.com (setq THS (getreal "弹簧总高(每圈高度 X 圈数): "))
8t4O9m$B,^+_5{7k7K:nCAD论坛,CAD设计,PROE,autocad,CAD下载,CAD教程,cad快捷键,机械论坛,机械设计论坛,机械制造论坛,视频教程,机械CAD论坛,工程机械论坛,UG,solidworks,字体,打印,模型空间,安装,下载,练习,考试,安装,培训,工程师,机械,制图,工程,建筑,服装,工程师,招聘,cad设计论坛,认证,证书,工程师级 (setq TAS (getreal "总角度数(360 X 圈数): "))CAD设计论坛$Q/m*W6X3y
(setq NVS (getint "节点数([总角度数/间隔角度]+1): "))(askcad.com),

liuguofeng5156 发表于 2008-7-5 14:29

CAD2008不是直接有个螺旋线工具吗,点它,然后照路征扫描行不~

oyblin 发表于 2008-7-5 15:53

先在“绘图”“建模”选择“螺旋”,画好之后,在选择“绘图”“圆”,画好圆之后,选择”建模“”扫掠“,
按照命令提示,选择圆,单击所画的路径”扫掠“就搞定了。

卢光亮 发表于 2010-3-1 23:50

回复 #13 oyblin 的帖子

非常谢谢,我可以画很种类的弹簧了,非常谢谢

ipqgymmmm 发表于 2010-3-2 11:48

我用的2004版的,绘图里没有建模这个选项诶,2010版不好用,也不知道在哪里去找绘图这个选项。
页: [1]
查看完整版本: 如何用cad画三维的弹簧?