Tinc:createwallbypoints

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


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


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


戻り値
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)))
(setq constraint (tinc:createwallbypoints tin bcTinWallNomal     points  bcTinWallLeft  5.0))
(setq constraint (tinc:createwallbypoints tin bcTinWallProjected points  bcTinWallRight 10.0))


関連事項