vlax-curve-getParamAtPoint 这个函数返回值疑问

masterlong

用圆弧测试得到法线的弧度
用直线测试得到距最近端点的距离
用多段线测试得到的是分段的序列+点在此分段的百分比
这个也太变化多端了吧
还是我理解的有误？

dbqtju

确实如此。椭圆也是，范围在0~2Pi

dbqtju

好像有时候，椭圆的大于2Pi





;; Point -> Ellipse Parameter  -  Lee Mac
;; Returns the ellipse parameter for the given point
;; dxf  -  Ellipse DXF data (DXF groups 10, 11, 40, 210)
;; pnt  -  WCS Point on Ellipse
;; Uses relationship: ratio*tan(param) = tan(angle)

(defun LM:point->param ( dxf pnt / ang ocs )
    (setq ocs (cdr (assoc 210 dxf))
          ang (- (angle (trans (cdr (assoc 10 dxf)) 0 ocs) (trans pnt 0 ocs))
                 (angle '(0.0 0.0) (trans (cdr (assoc 11 dxf)) 0 ocs))
              )
    )
    (LM:ang0-2pi (atan (sin ang) (* (cdr (assoc 40 dxf)) (cos ang))))
)

;; Ang0-2pi  -  Lee Mac
;; Returns the supplied angle in the range 0-2pi rads

(defun LM:ang0-2pi ( a )
    (cond
        (   (equal (+ pi pi) a 1e-8) a)
        (   (minusp a) (LM:ang0-2pi (+ a pi pi)))
        (   (rem a (+ pi pi)))
    )
)

masterlong

一直没搞清楚这个函数干什么用的
现在明白了
它的返回值可以做为其它函数的参数
比如vlax-curve-getfirstderiv