如何准确求出圆弧的圆心角，请大神进来看看，谢谢

重慶崽兒 · 发表于 2015-4-12 15:05

如图所示，P1 P2 P3分别是圆弧的圆心坐标和两个端点的坐标，关键是不知道圆弧是顺时针画的还是逆时针画的，如何才能正确的求出圆弧的的圆心角呢，还请大神解答！
我的方法是：

(setq ksjd (/ (* (angle p1 p2) 180) pi))
(setq jsjd (/ (* (angle p1 p3) 180) pi))
(if (> (- jsjd ksjd) 0)
(setq yxjd (- jsjd ksjd))
(setq yxjd (+ 360 (- jsjd ksjd)))
)

但是感觉好像哪里不太对，比如右边那个圆弧，(angle p1 p3)的角度肯定是要比(angle p1 p2)要大的，那么相减后为正，那么得到的圆心角就不对了，还请大神解答谢谢！

zzyong00 · 发表于 2015-4-13 08:18

用cad画的圆弧，都是逆时针的
而在pl线里的圆弧，有顺有逆

fl202 · 发表于 2015-4-13 08:57

圆弧默认是逆时针的，研究圆弧的组码：

最新得到的属性：
((-1 . <图元名: 7ffffb82e00>) (0 . ARC) (330 . <图元名: 7ffffbad9f0>) (5 . 8D368) (100 . AcDbEntity) (67 . 0) (410 . Model) (8 . L管件) (100 . AcDbCircle) (10 3324.47 885.404 0.0) (40 . 105.631) (210 0.0 0.0 1.0) (100 . AcDbArc) (50 . 0.551273) (51 . 2.65131))
其中10是圆心，40是半径， 50是起点与圆心连线的角度，51是端点的角度。

Kye · 发表于 2015-4-13 10:38

猜想圆心角有可能是正值，也可能是负值，看看http://bbs.mjtd.com/thread-113319-1-1.html 中Z大的回复，直接避开求圆心角

ivde · 发表于 2015-4-13 11:12

增加一个中点再判断

llsheng_73 · 发表于 2015-4-14 12:18

(rem(+(* pi 2)(apply'-(mapcar'(lambda(x)(cdr(assoc x e)))'(51 50))))(* pi 2));;e为(entget 圆弧图元名)得到

重慶崽兒 · 发表于 2015-4-14 15:44

首先谢谢73大大回答，不知道会不会出现以下这种情况：

如上图，端点角度减去起点角度肯定是为正值的，如果加上360度，再除以360度得到余数的话会不会就是角α的度数啊？

llsheng_73 · 发表于 2015-4-14 19:41

你可以把结果转换为度再与特性里边的角度值比较下

xyp1964 · 发表于 2015-4-14 19:52

;; (ArcAng (setq s1 (car (entsel "\n选择圆弧: "))))
(defun ArcAng (s1 / rr)
(defun dxf (code s1) (cdr (assoc code (entget s1))))
(setq rr (- (dxf 51 s1) (dxf 50 s1)))
(if (< rr 0)
(+ rr (* pi 2))
rr
)
)

重慶崽兒 · 发表于 2015-4-15 19:21

谢谢Z版和院长的帮助十分感谢，现在明白了

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

[已解答] 如何准确求出圆弧的圆心角，请大神进来看看，谢谢

本帖子中包含更多资源

相关帖子

评分

点评

本帖子中包含更多资源

点评