Tin:findtinpointat

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(Tin:findtinpointat tinEname point )


機能
入力点の位置で tinEname TinSurface エンティティ上の TinPoint (point + triangle) を返す。


引数
  • tinEname : (ename または vla-object) 問い合わせる TinSurface エンティティ
  • point : 検索する2Dまたは3D点リスト。 Z高度は無視される。


戻り値
検索された点を含むTinポイントと三角形の点リスト



サンプル

(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
(tin:addpoints tin '((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) ))

; 3D点と2D点で同じ値が返ってくるのが分かる例
(tin:findtinpointat tin '(10 10 2))
((10.0 10.0 2.0) ((25.0 25.0 6.0) (10.0 10.0 2.0) (80.0 20.0 7.0)))

(tin:findtinpointat tin '(10 10))
((10.0 10.0 2.0) ((25.0 25.0 6.0) (10.0 10.0 2.0) (80.0 20.0 7.0)))
 

関連事項