请教一下，选择了一个样板块，之后怎么框选和这个样板块一样的其他块

蜀国的大熊猫

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

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

wzg356

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

start4444

蜀国的大熊猫 发表于 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)
)  

蜀国的大熊猫

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

感谢，已经解决

蜀国的大熊猫

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

感谢，已经解决

蜀国的大熊猫

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

是的，已经解决，感谢