Question

求CAD高手写一个lisp命令

在使用区域覆盖命令时，希望能实现选择多段线能一次生成多个区域，而不是一个多段线一个多段线的选，这样很费时间。希望高手帮忙解决

Answer 1

没有看明白意思，，，上图

追问

如图所示有5个矩形，先需要对这5个矩形区域生成区域覆盖。

输入_wipeout命令后直接选择多段线，同时选中这5个矩形，但是却只生成一个矩形的区域覆盖，如下图：

所以希望能有个lisp命令，在选择同时选中这5个矩形的时候，能分别生成5个矩形的区域覆盖，也就是说能直接实现下图：

追答

(defun c:hk nil
(setq ss (ssget))
(setq n 0)
(repeat (sslength ss)
(setq ent (ssname ss n))
(command "_wipeout" "" ent "")
(setq n (1+ n))
)
)