如何使在cad中使三维零件绕指定轴旋转，并且不止一个零件，忘高手指点？

忆风幽梦 · 发表于 2013-8-11 20:46:44

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

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

x

请高手帮忙Autocadlisp修改下面程序，使旋转零件增加，不止一个，最少两个或更多，每个都可以绕不同的轴，同时一起运动或可调开始运动延缓时间，使物体做仿真运动，并可以调运动角度，非常谢谢，感激不尽！我修改很多次都是失败，是在没办法，麻烦高手们指教菜鸟小弟。
;;========================
;;旋转程序
;;========================
(defun c:zzz ()
  (command "zoom""e")
  (setq s (ssget "X"(list(cons 0 "insert")(cons 2 "zzz"))))
  (setq s (ssname s 0) s (entget s) sj 0)
  (while t
(setq s (subst (cons 50 sj) (assoc 50 s) s))
(entmod s)
(command "delay" "0")
(setq sj (- sj -0.1 ))
);while
  )

;;==

忆风幽梦 · 发表于 2013-8-11 21:31:25

高手指教，非常谢谢

忆风幽梦 · 发表于 2013-8-12 19:10:19

望大家多多指点，非常谢谢

忆风幽梦 · 发表于 2013-8-18 12:33:38

希望高人多多指点

		自动登录	找回密码
密码			注册

通知

[求助] 如何使在cad中使三维零件绕指定轴旋转，并且不止一个零件，忘高手指点？

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

浏览过的版块