图块遮罩插件
**** Hidden Message *****很好的程序,非常感谢,下来试试再给意见
跟晓东先前写的有什么不一样的地方? liuyj 发表于 2013-9-8 22:28
跟晓东先前写的有什么不一样的地方?
newer版主的代码是用了刚发布的0908的API的,xdrx_insert_appendWipeout 函数,这个函数自动调整加到BLOCK里面的WIPEOUT的显示顺序到块内实体的最下面。并且用的是块的最外轮廓线做边界,不是块的包围盒,更精确。
看看 希望不是旧版wipeout
不知道这个经典格式和 Xdrx_pickset->ents 哪个快一点点?需要 dxf 的就 setsstodb ,好像不是所有函数都支持 (xdrx_getentdxf 2) 这样,有些必须给实体名
(defun c:XDTB_BlockMask (/ ss)
(XD::Begin)
(princ "\n选取要制作遮罩的图块...")
(if (setq ss (ssget '((0 . "insert"))))
(progn
(foreach x (xdrx_pickset->ents ss)
(xdrx_insert_appendwipeout x)
)
(xdrx_draworder->top ss)
(princ (strcat "\n成功制作了" (itoa (sslength ss)) "个图块遮罩!"))
)
)
(XD::End)
(princ)
)
这个功能等了很久了{:soso_e100:} Free-Lancer 发表于 2013-9-9 05:22
不知道这个经典格式和 Xdrx_pickset->ents 哪个快一点点?需要 dxf 的就 setsstodb ,好像不是所有函数都支 ...
如果硬比较的话,应该是经典结构快点吧,在xdrx_pickset->ents中,就直接处理了。
学习了~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~··· 是不是伪码
myfrankie 发表于 2013-9-9 09:01
是不是伪码
什么是伪码? 这是插件,能给你看代码是偏得。
看看代碼..................... 回复看看--
学习一下先 学习一下,版主的水平太高了