Tinvs:getdepthorelevation

提供:GizmoLabs - だいたい CAD LISP なサイト
2023年2月21日 (火) 08:31時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{BCAD_LISP_CIVIL}} ; 構文 : (Tinvs:GetDepthOrElevation ''tinEname'' ) ; 機能 : tinEname TinVolumeSurface エンティティの基準高さを返す。 ; 引数…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(Tinvs:GetDepthOrElevation tinEname )


機能
tinEname TinVolumeSurface エンティティの基準高さを返す。


引数
  • tinEname : TinVolumeSurface エンティティの ename または VLAオブジェクト。


戻り値
基準となる高さの実数、または NIL


サンプル
(vl-load-tin)
(setq tin1 (tin:createTin '(0 0 0) '(100 100 100) 1000))
(tin:addpoints tin1 '((10 80 5) (50 50 10) (10 10 2) (80 20 7) (70 60 3) (40 70 10) (25 25 6) (55 55 2) (75 45 5) ))
(setq tin2 (tin:createTin '(100 100) '(200 100 100) 1000))
(tin:addpoints tin2 '((10 80 25) (50 50 30) (10 10 22) (80 20 27) (70 60 23) (40 70 40) ))
(setq boundary '((18.1 20.9)(60.7 20.9)(60.7 54.8 1) (18.1 54.8)))
(tinvs:createby2surfacesandpoints tin1 tin2 boundary)
(Tinvs:getdepthorelevation (entlast))
0.0

関連事項