1个小问题

longzhu1007

小弟在使用AutoCAD的过程中经常会遇到两条直线倒R=10的圆角的时候，用cad的话老是要:f r 10
能不能用autolisp写个小插件，例如：ff，直接就选2条直线，选完自动倒R=10的角？？小弟不会
autolisp，请各位大哥大姐不吝赐教!

jaminth

2. (defun c:ff( / ffqv)
3. (setvar "cmdecho" 0)
4. (setq ffqv (getvar "FILLETRAD"))
5. (setvar "FILLETRAD" 10)
6. (command "fillet" pause pause)
7. (setvar "FILLETRAD" ffqv)
8. )

(defun c:ff( / ffqv) (setvar "cmdecho" 0) (setq ffqv (getvar "FILLETRAD")) (setvar "FILLETRAD" 10) (command "fillet" pause pause) (setvar "FILLETRAD" ffqv) )

QUAN2518

在加入 修剪就完美了

呵呵

想请教下楼上的

pause 是什么意思怎么使用 使用时要注意写什么

我想他的意思是将控制权由LSP交还给操作人员 但是我的教材没有说到他的使用

xgr

pause是暂停，等待用户输入或选择。

QUAN2518

pause 使用中 cmdecho 要设置为1把

我用了下 在CMDECHO 为0是 执行命令后 空格不出现提示也不跳行但可以继续执行后续的操作。

搞了半天才明白 要在命令行显示才出提示。