Tingr:setsurfacerule

BricsCADのLISP - Tin+Civil関数 - AutoLISP Home - AutoLISP 目次 - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター

構文: (Tingr:setsurfacerule grading surface gradingEntity cutSlope fillSlope)

機能: TinSurface エンティティ，refEntity を輪郭，cutSlope 角度，fillSlope 角度を使用してグレーディング TinGrading エンティティを定義する。

引数

grading ： TinGrading の ename または vla-オブジェクト。
surface：グレーディングを定義するターゲット表面エンティティ (他の TinSurface エンティティ)のename または vla-オブジェクト。
gradingEntity：グレーディングを定義する参照エンティティ（任意の曲線エンティティ）の ename または vla-オブジェクト。
cutSlope：カットスロープの角度
fillSlope ： Fillスロープの角度

戻り値: T or nil

メモ
- グレーディングエンティティを作成した後、完全にパラメータ化する前に（tingr:setsloperule と tingr:setsurfacerule を参照）、BricsCADコマンドラインに無害な警告メッセージが表示されることがある。

サンプル

(vl-load-tin)
(setq grading (tingr:createTinGrading '(0 0 0) '(100 100 100) 100))
(tin:addpoints grading '((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 surface (tin:createTin '(0 0 0) '(100 100 100) 100))
(tin:addPoints surface '((20 20 12) (60 20 12) (60 50 12) (20 50 12)))
(setq refEntity (entlast))
(Tingr:setsurfacerule grading surface refEntity 0.25 0.35)
T