请教高手指导，下面的情况给程序该如何写
本帖最后由 gprspda 于 2011-4-26 16:06 编辑已知一个角的顶点，角度大小，和它的一条邻边，能否通过程序来把这个角做出来？如果可以的话，请高手给个程序。如果不能的话，请高手指教还需哪些条件，谢谢！
本帖最后由 dcj_gis2006 于 2011-4-27 13:45 编辑
(defun C:DrawAngle()
(setvar "cmdecho" 0)
(setq vertex (getpoint "\n 指定顶点A:"))
(setq degree (getreal "\n 输入角度值"))
(setq radian (* (/ degree 180) pi))
(setq edge (getreal "\n 临边长度:"))
(setq pb (polar vertex 0 edge))
(setq pc (polar pb (/ pi 2) (* edge (/ (sin radian) (cos radian)))))
(command "pline" vertex pb pc "C")
(prin1)
)
命令: drawangle
指定顶点A:
输入角度值25
临边长度:20
页:
[1]