Tingr:set-cutslope

提供:GizmoLabs - だいたい CAD LISP なサイト
2023年7月21日 (金) 07:11時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{BCAD_LISP_CIVIL}} ; 構文 : (Tingr:set-cutslope ''grading'' ''cutslope'' ) ; 機能 : グレーディング TinGrading エンティティで使用される cutSlope 切断勾配値を割り当てる。 ; 引数 :* grading : TinGrading のエンティティ名(ename または vla-object)。 :* cutslope: 割り当てられるカット勾配の角度(ラジアン)。 ; 戻り値 : 設定成功なら T それ以外は NIL ; サンプル <pre…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(Tingr:set-cutslope grading cutslope )


機能
グレーディング TinGrading エンティティで使用される cutSlope 切断勾配値を割り当てる。


引数
  • grading : TinGrading のエンティティ名(ename または vla-object)。
  • cutslope: 割り当てられるカット勾配の角度(ラジアン)。


戻り値
設定成功なら T それ以外は NIL


サンプル
(vl-load-tin)
(tingr:get-cutslope (car (entsel)))
0.523598775598299
(tingr:set-cutslope (car (entsel)) (gz:deg->rad 45))
T
(tingr:get-cutslope (car (entsel)))
0.785398163397448

(tingr:get-cutslope (car (entsel))) ; グレーディングでない図形を選択した場合
nil



関連事項