角度换算

啵浪鼓 · 发表于 2011-4-6 18:40:54

请问角度怎么换算来的，论坛里搜了一下，没有关于角度的
(50 . 4.71239)

如果已知上面的角度，可以这样写程序怎么不对呢?
...
(setq a1 (cdr (assoc 50 entt)))
(command "rotate" "last" "0,0" (strcat "@10<" a1)) ;这里旋转就只有4.71239度，不是真实的角度值

lenlenq · 发表于 2011-4-6 19:12:55

4.71239是弧度

lenlenq · 发表于 2011-4-6 19:15:30

写两个自定义函数
;角度转为弧度
(defun dtr (ang)
(* pi (/ ang 180.0))
)

;弧度转为角度
(defun ndtr (ang )
(/ (* ang 180) pi)
)

啵浪鼓 · 发表于 2011-4-6 19:34:30

非常感谢！
明经通道里翻译的AutoLips函数没有ang函数，呵呵！

lenlenq · 发表于 2011-4-6 19:41:59

本帖最后由 lenlenq 于 2011-4-6 19:44 编辑

啵浪鼓发表于 2011-4-6 19:34
非常感谢！
明经通道里翻译的AutoLips函数没有ang函数，呵呵！

ang函数----什么意思？
ang函数本就没有。

(dtr 90)------>1.5708
(ndtr 1.5708)------>90.000

luhy2008 · 发表于 2019-7-5 16:14:57

学习了,谢谢!

烟盒迷唇 · 发表于 2019-7-10 20:32:54

小程序大用处

账号		自动登录	找回密码
密码			注册

[讨论] 角度换算

浏览过的版块