Acet-or-match

提供:GizmoLabs - だいたい CAD LISP なサイト
2025年8月3日 (日) 22:43時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (acet-or-match ''elist'' ''matchlist'' ) ; 機能 : matchlist に含まれる条件のうち、少なくとも1つ に elist が一致するかどうかをテストするっぽい。 ; 引数 :* elist : テスト対象のエンティティデータリスト。 :* matchlist : 条件として使用するDXFグループコードと値のペアのリストだと思ったが違うっぽい。 ; 戻り値 : よくわからないがリスト…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(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

関連事項