贴了很久没人回我，火大了~~~~~~~~~~~~

luoyaya

谁告诉我LWPOLYLINE里的210和当前UCS的关系
210和当前UCS怎么换算，OCS和210什么关系？还有就是42里的凸度又怎么算呢？（就是我要怎么知道这条弧的角度，怎么算出线上的点
----------------------------------------------

xgtech

我现在正查阅有关资料，对于你所说的凸度应该是多义线中子图元的凸度，它实际上为子图元的曲率半径的倒数，比如直线的曲率半径为无穷大，那么它的的倒数为0，也就是说这个子图元为直线；如果子图元的凸度不为0，那么这个子图元为弧线。如果子图元为直线，那么通过函数entnext确定的两个子图元的顶点即为该直线的两个端点；如果子图元为弧线，通过函数osnap，distance，angle等可以确定这条弧线所在圆心坐标及半径，从而确定这条弧线的起始角和终止角。

lhb.nj

子图元的凸度是圆弧转角的1/4的正切值！

龙龙仔

;;; 凸度的计算程序
;;; 42弧段弓弦比(凸度)=弓高/(弦长/2)
;;; Vx1 = Start vertex of p'arc [LIST]
;;; Vx2 = End vertex of p'arc [LIST]
;;; Blg = Bulge [REAL]
;;; Return [Typ]:
;;; > '(CenterPoint Radius IncludedAngle) [LIST]
;;; Notes: IncludedAngle in radians
;;; Usage: (calcbulge '(120.366 171.508) '(205.929 134.457) -0.642584)
(defun CALCBULGE (VX1 VX2 BLG / ARCRAD CENDIR HLFANG)
  (setq        HLFANG (* 2 (atan BLG))
        CENDIR ((if (< BLG 0)
                  -
                  +
                )
                 (- (angle VX1 VX2) HLFANG)
                 (/ pi 2)
               )
        ARCRAD (abs (/ (/ (distance VX1 VX2) 2.0) (sin HLFANG)))
  )
  (list (polar VX1 CENDIR ARCRAD) ARCRAD (* (abs HLFANG) 2.0))
)