蜀国的大熊猫 发表于 2021-11-13 01:26:26

start4444 发表于 2021-11-12 14:40
试过了，步骤是这样了，但是结果也是不清楚那个坐标对应是那个块啊，你要这个文件有啥用。。。
他提取的 ...

大哥 ， 我这个写的差不多了。 还剩最后一步卡着了。
我获取了样例块之后 也根据这个样例块 把想同的选中了，如下
(setq blocks_selected (ssget (list '(0 . "INSERT") (cons 2 block_name))))

接下我循环遍历这个blocks_selected的时候 始终获取不到坐标，帮忙看下吧。

repeat 我也试了。
foreach 我也试了。

但就是一直报错。

      (foreach block blocks_selected

      (setq block_x (rtos (nth 0 block) 2 3))
      (setq block_y (rtos (nth 1 block) 2 3))
      (setq zuobiao (strcat "[" block_x "," block_y "]"))
      (write-line zuobiao locationFile)
      )

guosheyang 发表于 2021-11-13 17:27:35

foreach针对表的而这里block是选择集中的要素要用（ssname blocks_selectedi）

wzg356 发表于 2021-11-13 18:38:18

搜我的快速选择，适用各种对象，过滤条件按群吗

start4444 发表于 2021-11-14 20:44:49

蜀国的大熊猫 发表于 2021-11-13 01:26
大哥 ， 我这个写的差不多了。 还剩最后一步卡着了。
我获取了样例块之后 也根据这个样例块 把想同的选 ...

选集就用repeat吧
(setq i 0)
(repeat (sslength blocks_selected)
        (setq en (ssname blocks_selected i)
                  i (1+ i)
                  block_x (rtos (car (cdr(assoc 10 (entget en))))2 3)
                  block_y (rtos (cadr (cdr(assoc 10 (entget en))))2 3)
              zuobiao (strcat "[" block_x "," block_y "]")       
        )
(write-line zuobiao locationFile)
)

蜀国的大熊猫 发表于 2021-11-22 18:16:40

start4444 发表于 2021-11-14 20:44
选集就用repeat吧
(setq i 0)
(repeat (sslength blocks_selected)


感谢，已经解决

蜀国的大熊猫 发表于 2021-11-22 18:17:02

wzg356 发表于 2021-11-13 18:38
搜我的快速选择，适用各种对象，过滤条件按群吗

感谢，已经解决

蜀国的大熊猫 发表于 2021-11-22 18:17:26

guosheyang 发表于 2021-11-13 17:27
foreach针对表的而这里block是选择集中的要素要用（ssname blocks_selectedi）

是的，已经解决，感谢
页: 1 [2]
查看完整版本: 请教一下，选择了一个样板块，之后怎么框选和这个样板块一样的其他块