Acet-and-match

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


機能
指定されたエンティティリスト (elist) の各要素が、matchlist に含まれる全ての条件を満たすかどうかをテストするっぽい。


引数
  • 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-and-match elist filter)
      (ssadd ename result-ss)
  )
  (setq i (1+ i))
)


関連事項