autolisp 如何删除重叠图形

1、首先打开CAD，命令栏输入vlide，打开lisp编辑器，如图所示。

3、再编辑器中输入一下代码：(defun c:delrepeat() (setq name (s衡痕贤伎sget)) (command "幻腾寂埒-overkill" name "" "d") (princ) )点击保存，再点击加载，如图所示。

5、在命令栏输入delrepeat，回车，然后选择所有图元，回车，就已经完成了删除重复兔脒巛钒图元的操作。我们再选择图形界面的所有图形，提示只有三个对象，说明重复图元已经删除了，如图所示。