Acet-elist-add-defaults

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


機能
レイヤー、色、線幅、線種のデフォルトエントリを持つ、与えられたelistを更新し、完成させる。


引数
  • elist … エンティティリスト


戻り値
レイヤー、色、線幅、線種のデフォルトエントリが追加されたエンティティリスト


サンプル
(setq e (entget (car (entsel))))
((-1 . <Entity name: 159be08b0>) (0 . "CIRCLE") (5 . "94") (330 . <Entity name: 1260625a0>) (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbCircle") (10 320.934020136403 175.473359071678 0.0) (40 . 21.9515218089678) (210 0.0 0.0 1.0))

(setq e (acet-elist-add-defaults e)) ; 6,62,370が足されてる
((-1 . <Entity name: 159be08b0>) (0 . "CIRCLE") (5 . "94") (330 . <Entity name: 1260625a0>) (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (6 . "ByLayer") (62 . 256) (370 . -1) (100 . "AcDbCircle") (10 320.934020136403 175.473359071678 0.0) (40 . 21.9515218089678) (210 0.0 0.0 1.0))

(entmod e)

関連事項