GZ:3pointAngle

提供:GizmoLabs - だいたい CAD LISP なサイト
2019年11月25日 (月) 09:55時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{GZLIB}} ; 構文 : (GZ:3pointAngle p1 p2 p3) ; 機能 : 3点の座標角から小さい方の角度を返す。 ; 引数 :* p1, p3 : p2を中心とした座標点…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(GZ:3pointAngle p1 p2 p3)


機能
3点の座標角から小さい方の角度を返す。


引数
  • p1, p3 : p2を中心とした座標点
  • p2 : 角度の頂点座標


戻り値
∠p1p2p3 のラジアン値


サンプル
(setq ang1 (rad->deg (GZ:3pointAngle (getpoint) (getpoint) (getpoint))))
(princ (strcat "指示した点の角度は " (rtos ang1) " 度です。"))

関連事項