Tinc:createwallbyentity

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(tinc:createWallByPoints ename type ent side height)


機能
TinSurface の名前に対して、エンティティと高さと辺を使用するタイプの壁拘束を作成する。


引数
  • ename : TinSurface エンティティの ename または VLAオブジェクト。
  • type : 作成される壁の制約のタイプ (0 = bcTinWallNomal, 1 = bcTinWallProjected)
  • ent : 壁の輪郭を定義するエンティティ
  • side : 壁の方向タイプ(0 = bcTinWallLeft, 1= bcTinWallRight)
  • height : 壁の高さ


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


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


サンプル
(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
; 適当に壁の元になる図形を書いてから
(setq constraint (tinc:createwallbyentity tin bcTinWallNomal     (entlast) bcTinWallLeft  5.0))
(setq constraint (tinc:createwallbyentity tin bcTinWallProjected (entlast) bcTinWallRight 10.0))


関連事項