Tingr:set-cutslope

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(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



関連事項