Acet-geom-unit-vector

提供:GizmoLabs - だいたい CAD LISP なサイト
2025年8月11日 (月) 17:02時点におけるGizmon (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(acet-geom-unit-vector p1 p2)


機能
p1からp2までのベクトルの単位ベクトル(長さは1.0)を返す。


引数
  • p1 … 座標点リスト。
  • p2 … 座標点リスト。


戻り値
単位ベクトル座標値


サンプル
(acet-geom-unit-vector (getpoint) (getpoint))
(1.0 0.0 0.0)

(setq unt (acet-geom-unit-vector (getpoint) (getpoint))) ; p1->p2 が 60度だった時
(0.499999999999999 0.866025403784439 0.0)
(gz:rad->deg (angle '(0 0 0) unt))
60.0000000000001 ; 誤差は出ることがあるよね。

(setq unt (acet-geom-unit-vector (getpoint) (getpoint))) ; p1->p2 が 180度だった時
(-1.0 0.0 0.0)
(gz:rad->deg (angle '(0 0 0) unt))
180


関連事項