Tin:setstyle

提供:GizmoLabs - だいたい CAD LISP なサイト
2022年10月15日 (土) 04:32時点におけるGizmon (トーク | 投稿記録)による版
構文
(Tin:setstyle tinEname elevation)


機能
この関数は、tinEname TinSurfaceエンティティののすべての定義点を elevation の Z 値に設定する。


引数
  • tinEname : TinSurface エンティティの ename または vla-object
  • elevation : 全体に対する固定の Z 高度値の実数。


戻り値
セットできたら T 出来なかったら nil


  • メモ :

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) ))
(tin:setsurfaceelevation tin -20.0) ; TinSurface のすべてのポイントをZ値-20.0に設定
T

関連事項