广场 › [外挂工具] › 怎么炸开多重定义块儿！不要炸断尺寸线

qinghuo 发表于 2009-9-27 10:41:34

怎么炸开多重定义块儿！不要炸断尺寸线

怎么炸开多重定义块儿！不要炸断尺寸线

zml84 发表于 2009-9-27 15:32:12

本帖最后由 zml84 于 2009-9-27 15:56 编辑

矛与盾的关系
有人用多重镶套块达到加密的目的，也有人去炸

;;;功能：炸开当前图档中全部匿名块（包含镶套）
;;;日期：zml84 于 2009-09-27
(setvar "EXPLMODE" 1)
(setvar "qaflags" 1)
(while (setq SS      (ssget "X"
                     '((0 . "INSERT")
                         (100 . "AcDbBlockReference")
                         (2 . "`*U*")
                        )
                )
       )
    (princ "\n发现匿名块: ")
    (princ (sslength SS))
    (command "_.EXPLODE" SS "")
)

查看完整版本: 怎么炸开多重定义块儿！不要炸断尺寸线