CAD设计论坛

 找回密码
 立即注册
论坛新手常用操作帮助系统等待验证的用户请看获取社区币方法的说明新注册会员必读(必修)
查看: 4099|回复: 14

如何用cad画三维的弹簧?

[复制链接]
发表于 2007-3-26 19:57 | 显示全部楼层 |阅读模式
初学cad三维,请问
如何用cad画三维的弹簧?
发表于 2007-3-27 10:50 | 显示全部楼层

新手,请多关照,多讨论

新手,请多关照,多讨论
发表于 2007-3-27 13:24 | 显示全部楼层
用CAD2007吧,弹簧好弄些.

用2004只能旋转而成

本帖子中包含更多资源

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

x
发表于 2007-3-28 10:04 | 显示全部楼层
给你一个画三维弹簧的东东。把他另存为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)
)

 楼主| 发表于 2007-3-28 21:31 | 显示全部楼层

回复 #4 wskih 的帖子

{节点数([总角度数/间隔角度]+1): "))}
这句是什么意思?
发表于 2007-3-29 23:34 | 显示全部楼层
请问三楼,用CAD2006么样画3维弹簧,能说出具体的画法吗?请讲讲心得,谢谢!
发表于 2007-3-30 09:08 | 显示全部楼层
原帖由 easycom123 于 2007-3-29 23:34 发表
请问三楼,用CAD2006么样画3维弹簧,能说出具体的画法吗?请讲讲心得,谢谢!


论坛内有几个弹簧画法,你可以搜一下,
http://www.askcad.com/bbs/thread-5803-1-3.html
发表于 2007-3-30 09:34 | 显示全部楼层
这类型的帖子论坛很多
有时间就多找下
发表于 2007-11-19 22:10 | 显示全部楼层
好帖子,看着简单,画起来不知从哪入手了
发表于 2008-6-5 22:04 | 显示全部楼层
还是想要不用装软件加载直接二维画的那种
发表于 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),
发表于 2008-7-5 14:29 | 显示全部楼层
CAD2008不是直接有个螺旋线工具吗,点它,然后照路征扫描行不~
发表于 2008-7-5 15:53 | 显示全部楼层
先在“绘图”“建模”选择“螺旋”,画好之后,在选择“绘图”“圆”,画好圆之后,选择”建模“”扫掠“,
按照命令提示,选择圆,单击所画的路径”扫掠“就搞定了。
发表于 2010-3-1 23:50 | 显示全部楼层

回复 #13 oyblin 的帖子

非常谢谢,我可以画很种类的弹簧了,非常谢谢
发表于 2010-3-2 11:48 | 显示全部楼层
我用的2004版的,绘图里没有建模这个选项诶,2010版不好用,也不知道在哪里去找绘图这个选项。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关于|免责|隐私|版权|广告|联系|手机版|CAD设计论坛

GMT+8, 2024-11-24 06:32

CAD设计论坛,为工程师增加动力。

© 2005-2024 askcad.com. All rights reserved.

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