comcu 发表于 2022-7-6 15:37:48

你好
 
是的,我使用过lisp方法,以前从未使用过lisp,但它对于创建新命令非常方便。我只是将我编写的宏转移到lisp中
 
干杯
 
col。

comcu 发表于 2022-7-6 15:40:11


(defun c:4 ()
(command "multiple" "dimlinear" pause pause pause)
(princ)
)

 
尝试了上述操作,以允许我使用键“4”到dimlinear的多个命令,但不起作用,我尝试放弃“多个”并将
 

""

 
但最后它返回命令4未找到?我知道它试图重复命令4,但autocad不明白这一点?
 
干杯
 
col。

Lee Mac 发表于 2022-7-6 15:45:59

为什么不使用while语句来重复该命令?
 

(defun c:4(/ iPt)
(while (setq iPt (getpoint "\nSelect First Point: "))
   (command "multiple" "dimlinear" iPt pause pause))
(princ)
)

comcu 发表于 2022-7-6 15:49:42

李,
 
为什么不呢!
 
这真的很好用,桑斯克可以在其他方面对其进行修改
 
干杯
 
Col。

Lee Mac 发表于 2022-7-6 15:55:16

 
没问题,还有什么事,上校,尽管问
页: 1 [2]
查看完整版本: 从数字运行宏