使用圆弧高度调整Pline的 bulge

st788796

pline 中 段的 Bulge = tan(a/4) ，正/负号表示逆/顺时针方向，如下图 bulge = tan(a/4) = h /L/2;= 2h/L

2. 
   
3. (setq p1 (vlax-curve-getpointatparam pline index))
   
4. (setq p2 (vlax-curve-getpointatparam pline (1+ index)))
   
5. (setq p (vlax-curve-getpointatparam pline (+ index 0.5)))
   
6. (setq pp (mapcar '* '(0.5 0.5 0.5) (mapcar '+ p1 p2)))
   
7. (setq L (distance p1 p2))
   
8. (setq bulge (/ (* 2 h) L));_h 正负控制方向
   
9. (vlax-setbulge pline index bulge)
   

<br /> (setq p1 (vlax-curve-getpointatparam pline index))<br /> (setq p2 (vlax-curve-getpointatparam pline (1+ index)))<br /> (setq p (vlax-curve-getpointatparam pline (+ index 0.5)))<br /> (setq pp (mapcar '* '(0.5 0.5 0.5) (mapcar '+ p1 p2)))<br /> (setq L (distance p1 p2))<br /> (setq bulge (/ (* 2 h) L));_h 正负控制方向<br /> (vlax-setbulge pline index bulge)<br />

marting

考虑优弧，劣弧了吗

st788796

marting 发表于 2021-1-27 16:49
考虑优弧，劣弧了吗

一样的

newer

快速圆弧

60 个回复 - 1892 次查看

**** 本内容被作者隐藏 ****

2017-9-7 14:54 - newer - 每日插件

这里有应用，用弦长，拱高 生成圆弧

kmliro_2017

谢谢分享！！！！

searienon

N版出售，必定不凡