自编的齿轮展成运动程序每次运行结果都不一样？？

呢喃旅行

2. ( defun c:tt(/ ss t1 p1 p2)
   
3. (setvar "cmdecho" 0)
   
4. (setq ss (ssget))
   
5. (setq t1 1)
   
6. (while (< t1 70)
   
7. (setq p1 (list (* 77 (cos(/ (* t1 pi) 180))) (* 77 (sin(/ (* t1 pi) 180)))))
   
8. (setq p2 (list 77 (/ (* pi 77 t1) 180)))
   
9. (command "copy" ss "" p2 p1 "")
   
10. (command "rotate" (entlast) "" p1 t1)
    
11.   (setq t1 (+ t1 1))
    
12.   (princ)
    
13. )
    
14.   (princ)
    
15. )  

( defun c:tt(/ ss t1 p1 p2)<br /> (setvar "cmdecho" 0)<br /> (setq ss (ssget))<br /> (setq t1 1)<br /> (while (< t1 70)<br /> (setq p1 (list (* 77 (cos(/ (* t1 pi) 180))) (* 77 (sin(/ (* t1 pi) 180)))))<br /> (setq p2 (list 77 (/ (* pi 77 t1) 180)))<br /> (command "copy" ss "" p2 p1 "")<br /> (command "rotate" (entlast) "" p1 t1) <br />   (setq t1 (+ t1 1))<br />   (princ)<br /> )<br />   (princ)<br /> )  

该贴已经同步到 呢喃旅行的微博

Andyhon

关了捕捉再试试呗

xxxl1233064

应该就是对象捕捉问题，OSnap优先级高于程序中描述

呢喃旅行

果然如楼上两位大神所说，问题已解决，谢谢各位大神

qyming

有贴必顶，好贴必顶