「GZ:3pointAngle」の版間の差分
(ページの作成:「{{GZLIB}} ; 構文 : (GZ:3pointAngle p1 p2 p3) ; 機能 : 3点の座標角から小さい方の角度を返す。 ; 引数 :* p1, p3 ： p2を中心とした座標点…」) |
編集の要約なし |
||
| 18行目: | 18行目: | ||
; サンプル | ; サンプル | ||
< | <syntaxhighlight lang="lisp" line> | ||
(setq ang1 (rad->deg (GZ:3pointAngle (getpoint) (getpoint) (getpoint)))) | (setq ang1 (rad->deg (GZ:3pointAngle (getpoint) (getpoint) (getpoint)))) | ||
(princ (strcat "指示した点の角度は " (rtos ang1) " 度です。")) | (princ (strcat "指示した点の角度は " (rtos ang1) " 度です。")) | ||
</ | </syntaxhighlight> | ||
----- | ----- | ||
関連事項 | 関連事項 | ||
2019年11月25日 (月) 09:55時点における版
- 構文
- (GZ:3pointAngle p1 p2 p3)
- 機能
- 3点の座標角から小さい方の角度を返す。
- 引数
-
- p1, p3 ： p2を中心とした座標点
- p2 ： 角度の頂点座標
- 戻り値
- ∠p1p2p3 のラジアン値
- サンプル
<syntaxhighlight lang="lisp" line> (setq ang1 (rad->deg (GZ:3pointAngle (getpoint) (getpoint) (getpoint)))) (princ (strcat "指示した点の角度は " (rtos ang1) " 度です。")) </syntaxhighlight>
関連事項