感激过去 发表于 2014-10-30 16:03:00

批量“PL多段线车位”做单独块

本帖最后由 感激过去 于 2014-10-30 16:05 编辑

请问如何批量将“PL多段线车位”做单独一个个的车位块，无论车位角度如何。。期待高手帮忙。。
目前是一个个的PL线车位，期待批量转为一个个车位快，就算在目前车位加个框也可以，只要是个块，目的是要最后的块。

lrd1861 发表于 2014-10-30 19:42:44

http://bbs.mjtd.com/thread-91905-1-1.html这个可以满足你的要求

感激过去 发表于 2014-10-30 20:04:40

测试没法完成任务，有人帮忙下不？

Gu_xl 发表于 2014-10-30 20:22:54

最基本的命令方式制块！
(defun c:tt (/ a e ss n name)
(setq a (getvar 'cmdecho))
(setvar 'cmdecho 0)
(if (setq ss (ssget '((0 . "lwpolyline"))))
    (repeat (setq n (sslength ss))
      (setq e (ssname ss (setq n (1- n))))
      (command "block"
             (setq name (rtos (getvar 'date) 2 16))
             "0,0,0"
             e
             ""
             "insert"
             name
             "0,0,0"
             1
             1
             0
      )
    )
)
(setvar 'cmdecho a)
(princ)
)

感激过去 发表于 2014-10-30 20:26:43

Gu_xl 发表于 2014-10-30 20:22 static/image/common/back.gif
最基本的命令方式制块！

感谢版主。。是能做成块，但是块的名字不一样，请问有没办法把所有块名能成一样？
角度、位置都保持不变，谢谢··

xyp1964 发表于 2014-10-30 20:48:27


freehand8008 发表于 2014-10-31 09:51:22

G版块插入点是00，院长的是角点

kfboy 发表于 2014-10-31 09:55:33

可以用实体替换功能

感激过去 发表于 2014-10-31 16:07:16

lrd1861 发表于 2014-10-30 19:42 static/image/common/back.gif
http://bbs.mjtd.com/thread-91905-1-1.html这个可以满足你的要求

测试只能查找到实体，但是做块功能没出来，你测试了吗？

lrd1861 发表于 2014-10-31 17:50:57

感激过去 发表于 2014-10-31 16:07 static/image/common/back.gif
测试只能查找到实体，但是做块功能没出来，你测试了吗？

完全可以！III
页: [1] 2
查看完整版本: 批量“PL多段线车位”做单独块