Bim:get-material

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(Bim:get-material name [ global ] )


機能
指定されたBIM材料の定義データを、ドキュメントライブラリ(デフォルト)、またはグローバルライブラリから返す。


引数
  • name : 定義データを取得する材料の名称。(大文字・小文字を区別する)
  • global : 'global'が 省略されず、NILでない場合、資料はグローバルデータベースから検索され、そうでない場合はドキュメントライブラリから検索される。


戻り値
定義データのリスト("key "と "value "を使った連想リスト形式)、または指定されたライブラリに素材が存在しない場合はNILを指定す。


メモ

  • "CH_" からはじまるパラメータは,切断面/断面面のハッチングを参照する.
  • "SH_"からはじまるパラメータは、表面・立面ハッチを参照する。
  • 定義データの項目を変更し、(bim:save-material)で新規または変更したBIMマテリアルを作成することができる。
  • 材料名の大文字と小文字は区別されます。


サンプル
(vl-load-bim)
(setq data (bim:get-material "ガラス"))
(("Name" . "Gold") ("Desc" . "") ("Comment" . "") ("Appearance" . "Gold") ("CH_Name" . "ANSI31") ("CH_Scale" . 1.0) ("CH_Angle" . 0.0) ("CH_Cross" . 0) ("CH_Anno" . 0) ("CH_Type" . 1) ("SH_Name" . "SOLID") ("SH_Scale" . 1.0) ("SH_Angle" . 0.0) ("SH_Cross" . 0) ("SH_Anno" . 0) ("SH_Type" . 1))

(setq data (subst (cons "CH_Scale" 24.5) (assoc "CH_Scale" data) data))
(("Name" . "Gold") ("Desc" . "") ("Comment" . "") ("Appearance" . "Gold") ("CH_Name" . "ANSI31") ("CH_Scale" . 24.5) ("CH_Angle" . 0.0) ("CH_Cross" . 0) ("CH_Anno" . 0) ("CH_Type" . 1) ("SH_Name" . "SOLID") ("SH_Scale" . 1.0) ("SH_Angle" . 0.0) ("SH_Cross" . 0) ("SH_Anno" . 0) ("SH_Type" . 1))

(bim:save-material "ガラス_2" data)  T

(setq data (bim:get-material "御影石" T))
(("Name" . "御影石") ("Desc" . "") ("Comment" . "") ("Appearance" . "御影石01") ("CH_Name" . "ナチュラル") ("CH_Scale" . 1.0) ("CH_Angle" . 0.0) ("CH_Cross" . 0) ("CH_Anno" . 0) ("CH_Type" . 1) ("SH_Name" . "DOTS2") ("SH_Scale" . 3.0) ("SH_Angle" . 0.0) ("SH_Cross" . 0) ("SH_Anno" . 0) ("SH_Type" . 1))

関連事項