CAD阵列式选择对象

问题遇到的现象和发生背景

在使用CAD软件绘图中,常常需要将呈现阵列排布的图形选择出来,如标题编号亦或等距排列的不同块,但由于间隔中间有过多图形导致不能简单通过框选来选择,只能通过点击逐一选取。在需要选择部分较少时可以人工操作,但需要选择部分有几十上百个时,人工选择就比较缓慢且容易出现错误,是否可以阵列式点选,在相同间距下选择对象,以提高选择的正确率及快速性。

操作环境、软件版本等信息

windows1064位AUTOCAD2023

希望得到的解决方法

希望有操作办法,或者插件,亦或脚本代码。
第一次询问,解答如要回报可先与我联系,双方同意后再答也可。

在 AutoCAD 中,可以使用 "多选" 工具来选择阵列排布的图形。该工具可以通过框选或点选来选择多个对象。可以在"编辑"菜单下找到"多选"工具。
另外, 可以使用 AutoLISP 或 VBA 脚本来实现自动选择阵列中的对象,这将大大减少人工操作的错误和提高效率。请注意,使用这类脚本需要一定的编程知识。
还可以使用第三方插件来达到阵列式选择对象的目的。以下是一个简单的 AutoLISP 脚本示例,可以用来选择阵列中的所有线段。

(defun c:selectarray ()
   (setq ss (ssget "x" '((0 . "LINE"))))
   (setq n (sslength ss))
   (setq i 0)
   (while (< i n)
      (setq ent (ssname ss i))
      (setq i (1+ i))
      (setq pt1 (getpoint "Pick starting point of line: "))
      (setq pt2 (getpoint pt1 "Pick ending point of line: "))
      (setq dis (distance pt1 pt2))
      (setq ang (angle pt1 pt2))
      (prompt "Distance is: " dis "Angle is: " ang)
      (setq entlist (entsel "Select lines to array: "))
      (setq ent (car entlist))
      (setq pt (cdr entlist))
      (setq base (trans pt 0 dis ang))
      (setq ss (ssadd base ss))
   )
   (setq ss (ssadd ent ss))
   (command "array" ss "" "" "" "" "")
)

这个脚本使用 AutoCAD 命令 ssget 和 sslength 来选择阵列中的线段。然后使用 AutoCAD 命令 entsel 来选择整个阵列中的线段, 使用 AutoCAD 命令 array 来实现阵列排列。
在运行这个脚本之前, 请确保AutoCAD已经加载了AutoLISP.
请注意, 这只是一个简单的示例,可能需要根据你的需求来修改。