求助,getangle的应用

jlucad

如何输入一个角度并返回它
getangle如何应用??
请结合我的程序指点下好吗??谢谢

urljit

没有那么多的时间看你的代码，为何不加上注释呢？


getangle的作用是取得两点连线与x轴的夹角。

jlucad

那如何输入一个角度呢??

xyp1964

getangle：输入角度制数值，返回弧度制数值。

2. (defun c:rj ()
3.    (while (not (setq p1 (getpoint "\n 请输入锐角顶点 : "))))
4.    (while (not (setq A (getangle p1 "\n 请输入锐角角度 : "))))
5.    (setq  p2   (polar p1 0 1500)
6.   p3   (polar p1 A 1500)
7.   p4   (polar p1 (/ A 2) (/ 100 (sin (/ A 2))))
8.   p41 (polar p4 0 1200)
9.   p11 (polar p41 (* 0.5 pi) 50)
10.   p12 (polar p11 pi 100)
11.   p42 (polar p4 (/ A 3) 1200)
12.   p21 (polar p42 (+ (/ A 3) (* 0.5 pi)) 50)
13.   p22 (polar p21 (+ (/ A 3) pi) 100)
14.   p43 (polar p4 (* 2 (/ A 3)) 1200)
15.   p31 (polar p42 (+ (* 2 (/ A 3)) (* 1.5 pi)) 50)
16.   p32 (polar p31 (+ (* 2 (/ A 3)) pi) 100)
17.   p44 (polar p4 A 1200)
18.   p51 (polar p44 (+ A (* 1.5 pi)) 50)
19.   p52 (polar p51 (+ A pi) 100)
20.    )
21.    (command "_pline" p2 p1 p3 "")
22.    (command "_pline" p12 p11 p41 p4 p44 p51 p52 "")
23.    (command "_pline" p22 p21 p42 p4 p43 p31 p32 "")
24.    (princ)
25. )

(defun c:rj ()    (while (not (setq p1 (getpoint "\n 请输入锐角顶点 : "))))    (while (not (setq A (getangle p1 "\n 请输入锐角角度 : "))))    (setq  p2   (polar p1 0 1500)   p3   (polar p1 A 1500)   p4   (polar p1 (/ A 2) (/ 100 (sin (/ A 2))))   p41 (polar p4 0 1200)   p11 (polar p41 (* 0.5 pi) 50)   p12 (polar p11 pi 100)   p42 (polar p4 (/ A 3) 1200)   p21 (polar p42 (+ (/ A 3) (* 0.5 pi)) 50)   p22 (polar p21 (+ (/ A 3) pi) 100)   p43 (polar p4 (* 2 (/ A 3)) 1200)   p31 (polar p42 (+ (* 2 (/ A 3)) (* 1.5 pi)) 50)   p32 (polar p31 (+ (* 2 (/ A 3)) pi) 100)   p44 (polar p4 A 1200)   p51 (polar p44 (+ A (* 1.5 pi)) 50)   p52 (polar p51 (+ A pi) 100)    )    (command "_pline" p2 p1 p3 "")    (command "_pline" p12 p11 p41 p4 p44 p51 p52 "")    (command "_pline" p22 p21 p42 p4 p43 p31 p32 "")    (princ) )

maomao2004

使用(getangle)函数后，只需在提示下输入实数就可以了，他会自动转换成弧度制

jlucad

我明白了，多谢
有本书说的不明白,它没有明确说明还要指定一个基点的 现在有了基点就好了
呵呵,谢谢了

meflying

我不知道是你更糊涂了，还是我糊涂了，getangle需要什么基点？

AShin

是啊


我用getangle都是来定义方向的