「Tinc:createbreaklinebypoints」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
編集の要約なし
 
45行目: 45行目:


[[Category:AutoLISP]]
[[Category:AutoLISP]]
[[Category:BricsCADのLISP]]

2023年1月28日 (土) 08:49時点における最新版

構文
(Tinc:CreateBreaklineByPoints tinEname type points elevType )


機能
tinEname TinSurfaceエンティティに対して、points と elevType を使用した type のブレークライン制約を作成する。


引数
  • tinEname : TinSurface エンティティのename または VLAオブジェクト。
  • type : 作成されるブレークライン制約のタイプ (0 = bcTinBreaklineNomal, 1 = bcTinNonDestructive)
  • points : ブレイクラインの輪郭を定義する点のリスト。
  • elevType : ブレークライン制約のための標高タイプの整数。(1=bcTinElevationMin , 2=bcTinElevationMax, 3=bcTinElevationMid )


戻り値
ID識別子(integer)。失敗した場合は NIL。


  • メモ
    • モードについては、型定数を参照。


サンプル
(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
(setq points '((30 30)(50 30)(50 50)(30 50)))
(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) ))

(setq constraint (tinc:createBreaklineByPoints tin bcTinBreaklineNomal points bcTinElevationMid))
(setq constraint (tinc:createBreaklineByPoints tin bcTinNonDestructive points  bcTinElevationMid))

(setq constraint (tinc:createBreaklineByPoints tin bcTinBreaklineNomal points bcTinElevationMin))
(setq constraint (tinc:createBreaklineByPoints tin bcTinNonDestructive points  bcTinElevationMin))

関連事項