Acet-ss-remove-dups

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(acet-ss-remove-dups ss fuz dxfToIgnore )


機能
選択セット ss にフィルタをかけて、幾何学的に重複するエンティティを除去(分離)する。


引数
  • ss … 選択セット。
  • fuz … 幾何学的比較の許容誤差の実数。
  • dxfToIgnore … 幾何学的比較で無視する DXF グループ コードの番号リスト。 (40 41 42)
  • 次の DXF コードは常に無視される:6 8 39 62 370 390。


戻り値
変更された選択セットssと、除去されたエンティティを含む選択セットのリストを返す。 (list ss ssRemoved)。


サンプル
(setq ss (ssget)
(acet-ss-remove-dups  ss  0.0  '(40))
(<Selection set: 000000004ACA6B70> NIL) ; 重複エンティティがない場合 ssRemoved は nil

(acet-ss-remove-dups  ss  5.0  '(40))
(<Selection set: 00000000BA7D3F30> <Selection set: 00000000BA7D49D0>)


関連事項