Lisp Divide的帮助，然后
我用LISP分割对象，然后插入块，如图所示，但有时会在插入块时停止，我不知道为什么会有任何帮助：（定义c:DDV（）
（命令“DIVIDE”PAUSE“BLOCK”“MRMAN25”“Y”PAUSE）
（普林斯）
)
谢谢 为什么我在你Lisp程序的时候有个笑脸男人？？
这是故意的吗？ 不，我没有从我的线程中删除它，但它会返回
我很抱歉这个错误
simly让我笑了大约一分钟，
试试看
(defun c:dv (/
ss sectionno blockname
)
(setq blockname "MRMAN25")
(if (or (tblsearch "block" blockname) (findfile blockname))
(progn
(while (not ss)
(setq ss (ssget "_:S" )))
(initget 7)
(setq sectionno (getint "\nHow segments do you want? :"))
(command "DIVIDE" ss "BLOCK" blockname "Y" sectionno))
(Alert "The Block in not in the drawing please insert it")))
对不起，格式不对，我贴不好 Flower，在VLIDE中取消选中“插入标签”选项，您可能会在发布中获得更好的结果 看了一眼，我看不出来，我必须承认我是一个傻瓜。
我只在调试时使用它运行一行&查看值的输出
尽管我已经为它做了工作指导 请参见此处：
页:
[1]