Acet-or-match

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(acet-or-match elist matchlist )


機能
matchlist に含まれる条件のうち、少なくとも1つ に elist が一致するかどうかをテストするっぽい。


引数
  • elist : テスト対象のエンティティデータリスト。
  • matchlist : 条件として使用するDXFグループコードと値のペアのリストだと思ったが違うっぽい。


戻り値
よくわからないがリストが返る。


サンプル
; オブジェクトタイプが円か 色が BYLAYER のもの
(setq filter '((0 . "CIRCLE") (62 . 256)))
(setq ss (ssget "X"))
(setq i 0 result-ss (ssadd))
(repeat (sslength ss)
  (setq ename (ssname ss i))
  (setq elist (entget ename))
  (if (acet-or-match elist filter)
      (ssadd ename result-ss)
  )
  (setq i (1+ i))
)
result-ss

関連事項