CAD怎么画已知长度圆弧
来源:百度知道 编辑:UC知道 时间:2024/05/26 09:45:17
请问CAD怎么画一条规定长度的圆弧,已知圆弧的半径,急啊!!!!如果不能麻烦告诉我公式
要画已知长度的圆弧,还要知道圆弧半径。
知道了半径,就可以求得【弧角度】,公式:长度÷半径=弧角度。
绘制准确的弧角度有些困难,这个可以使用autolisp来解决,代码如下:
(defun C:tes ( / ang1 l1 l2 pt1 r1)
(if (and
(setq R1 (getdist "\n请输入圆弧半径"))
(> R1 0)
(setq L1 (* 2 pi R1))
(setq pt1 (getpoint "\n请输入圆弧圆心坐标"))
(setq L2 (getdist (strcat "\n请输入小于:" (rtos L1) "圆弧长度")))
(< L2 L1)
(> L2 0)
(setq ang1 (/ L2 R1))
)
(progn;;1
(entmake (list '(0 . "ARC") (cons 10 pt1) (cons 40