怎么避免LISP命令覆盖用户在【acad.pgp】自定义命令!

santalin

就是说如果使用了acad.pgp里面定义的命令作为defun c:的函数名
自动保留acad.pgp的命令，让LISP程序对应defun c:命令自动更名为XX1
高手解答！

caoyin

例如a在PGP中缺省定义为ARC命令。
(defun C:A () nil) 定义命令A。
这时候C:A覆盖了PGP的ARC。
(vl-acad-undefun 'C:A);;取消定义A
(defun C:A1 ()(C:A));;重新定义命令A1执行(C:A).

vormittag

不如手动改acad.pgp。
另外，为了避免二者重复，可以在lisp里定义较长的命令名，反正在acad.pgp里也能设置lisp名令的别名。这样就能打造适合自己的环境了。

nedy001

版主你好，我想问个问题是，两个VLX 命令重复了，怎么样去修改其中一个命令，让这两个命令多能执行。谢谢！