[問題]請問求出曲線的角度

(setq sta1 (getreal "\n輸入起始樁號<0K+???>:"))
(if (null sta1) (setq sta1 30.))

(setq Prm (vlax-curve-getParamAtDist enx sta1))
(setq Pt (vlax-curve-getPointAtParam enx Prm))
(setq Dri (vlax-curve-getFirstDeriv enx Prm))
(setq Ang (+ (* pi 0.5) (angle '(0 0 0) Dri)))

上列四個式子分別代表什麼意思啊

(setq Prm (vlax-curve-getParamAtDist enx sta1))：返回距曲線開始點為指定距離(sta1)的曲線參數。
(setq Pt (vlax-curve-getPointAtParam enx Prm))：返回曲線上具有指定參數值(Para)的點。
(setq Dri (vlax-curve-getFirstDeriv enx Prm))：返回曲線在指定位置的一階導數(在 WCS 中)。
(setq Ang (+ (* pi 0.5) (angle '(0 0 0) Dri)))：利用一階導數求角度。

這個是佈平曲線佈樁號的部份代碼吧！