在pline po上自动插入块
我不确定是否我能有更好的运气开始一个新的职位（有点）继续从http://www.cadtutor.net/forum/newthread.php?do=newthread&f=21。。不过，李·麦克发布了我个人最喜欢的口吃之一，如果可能的话，我会交叉手指稍微调整一下。正如代码所示。。它将块导入直线、圆弧和其他一些实体的端点；然而，lisp不能完全使用pline，而只是将块添加到pline的端点。我的问题是。。。是否可以使用此lisp将块导入选定多条线组内的点？。。或者做与lisp现在做的相反的事情。。并将块添加到pline内的点，不包括端点？感谢您的建议！
下面是李的杰作。。下面是在节点处插入块的代码。。（我在考虑所有可能的解决方案。但是如果有一种方法可以在pline中的点处插入节点。我遇到了一个删除所有节点的lisp…那么我可以使用这个？？idk。
这是李的优秀作品，我正在使用从第1页的帖子。。。
---------------------=={EndBlock}==--------------------------；；在选定对象的端点处插入块；；；；---------------------------------------------------------------------------；；作者：李·麦克唐纳，2010；；版权所有©2010 Lee McDonnell，保留所有权利；；联系人：Lee Mac@TheSwamp。组织，CADTutor。net；；；；-----------------------------------------------------------------；；（defun c:EndBlock（/*error*_StartUndo _EndUndo _Insert _AngleAtParam doc block ss）（vl load com）；；©Lee Mac 2010（setq block“endtick.dwg”）；； 是的，这是可以做到的，我的Point Manager程序已经有了这个功能（还有更多），尽管它不会以任何方式旋转块（不确定是否需要这样做？）
请参阅此处了解初学者：
http://www.cadtutor.net/forum/showthread.php?42954-点管理器 我都等不及了！根本不需要旋转。。太酷了！谢谢你，李 或者，很快就能得到你想要的：
-----------------=={Block At Vertices}==---------------；；；；在选定多段线的每个顶点插入块；；；；不包括开始/结束顶点；；；；------------------------------------------------------------；；；；作者：李·麦克唐纳，2010；；；；版权所有©2010 Lee McDonnell，保留所有权利；；；；联系人：Lee Mac@TheSwamp。组织，CADTutor。net；；；；-----------------------------------------------------------------；；（defun c：块顶点（/*error*_StartUndo _EndUndo _Insert _AngleAtParam doc block ss）（vl load com）；；©Lee Mac 2010（setq block“endtick.dwg”）；； 这是百分之百的。。非常感谢！我的脑袋可能会爆炸，但仍然迫不及待地想探索第一个代码：） 不客气，很高兴你喜欢，伙计， 你好
我发现这个lisp很有用，但在将其放入dwg后是否可以立即分解块？或者另一种解决方案？
我想要的是将块与参数放在一起，这样“endtick.dwg”就已经在中定义了块。然后lisp创建了它的另一个块，我必须分解该块以使参数工作。
Thanx提前，
尝试更改：（命令“-insert”块）
为此：（命令“-insert”（strcat“*”块））
（未经测试）
编辑：已测试但由于某种原因无法工作
所以我只在最后一行（princ）前放了一行（命令“explode”（entlast））。这很管用，但很难看哈哈 你好
谢谢你的回复。它可以工作，但不知何故并不完全
在我的例子中，它爆炸了线末端的块，但不是起点的块。。
页:
[1]