「Tin:swapedge」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
21行目: 21行目:
===メモ===
===メモ===
[[tin:getclosestpoint]] 関数も参照
[[tin:getclosestpoint]] 関数も参照


; サンプル
; サンプル

2022年10月22日 (土) 12:47時点における版

構文
(Tin:swapedge tinEname point )


機能
tinEname TinSurfaceエンティティを指定されたデルタ数だけ上昇させる(Z方向に移動させる)。


引数
  • tinEname : TinSurface エンティティの ename または vla-object
  • point : TinSurface を上昇させる量の実数。負数や 0 も可。


戻り値
成功なら T、失敗なら nil


メモ

tin:getclosestpoint 関数も参照


サンプル
(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
(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) ))
(tin:raiseSurface tin 11.29) ; TinSurface全体を11.29 上昇させる。
(tin:raiseSurface tin -11.29) ; TinSurface全体を -11.29 上昇させる。

関連事項