[求助]：哪里有用CAD画螺纹的画法（要的是三维的），最好把动画教学贴出来，我想学学(

zv_zero · 发表于 2005-2-25 14:02:37

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

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

×

哪里有用CAD画螺纹的画法（要的是三维的），最好把动画教学贴出来，我想学学(嘿嘿，省了买书的钱了）。在此先谢谢各位大虾了。

爱好者 · 发表于 2005-2-25 18:04:47

去编程板块下载画三维螺纹线的程序。

无名 · 发表于 2005-2-26 08:22:09

画螺纹那么重要！不要走进误区呀！
要是画凸轮还有用处！

yangweihu · 发表于 2005-2-26 08:52:05

加载下面的程序后，在将所得极线拉伸，常规操作即可。

(setq  b1  (getpoint  "请输入基点:"))
(setq  r (getreal  "半径 r=: "))
(setq  t1  (getreal  "截距 t1=: "))
(setq  n (getint  "段数 n=: "))
(setq  ta  (/ (* 2 3.159) n))
(setq  j1  (/  t1  n))
(setq  a  0)
(setq  jj 0)
(command  "use"  "o"  b1)
(command  "3dpoly"  (list r 0 0))
(repeat n
  (setq jj (+ jj 1))
  (setq a (+ ta a))
  (setq x (* r (cos a)))
  (setq y (* r (sin a)))
  (setq z (* j1 jj))
  (setq p2 (list x y z))
  (command p2)
)
(command "")

账号		自动登录	找回密码
密码			立即注册

[求助]：哪里有用CAD画螺纹的画法（要的是三维的），最好把动画教学贴出来，我想学学(

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子