「Tinc:createbreaklinebypoints」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{BCAD_LISP_CIVIL}} ; 構文 : (Tinc:createbreaklinebypoints ''tinEname'' ''type'' ''points'' ''elevType'' ) ; 機能 : tinEname TinSurfaceエンティティに対…」)
 
編集の要約なし
 
(同じ利用者による、間の1版が非表示)
2行目: 2行目:


; 構文
; 構文
: (Tinc:createbreaklinebypoints ''tinEname''  ''type''  ''points''  ''elevType'' )
: (Tinc:CreateBreaklineByPoints ''tinEname''  ''type''  ''points''  ''elevType'' )




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))

関連事項