yang686526

[讨论]如何更真实获得任意曲线拟合点(31日更新)
www.dimcax.com
[讨论]如何更真实获得任意曲线拟合点(31日更新)
以下函数可以获得获得任意曲线拟合点,但是用等步长的方法,对于比较平缓的曲线,点有点太密了,能不能加一个判断,当点的切线方向较上一个点变化一固定值时,则记录,否则不记录.不知道能不能实现,请大家帮个忙.
;获得任意曲线拟合点
( getplinepoint(ent / obj elist pt j zc)
()
( obj ( ent)
zc( obj ( obj))
j 0)
( ( zc)
( pt ( obj j)
elist ( elist ( pt))
j ( j)
)
)
( elist ( elist ( ( obj))))
)
d
没人知道吗?
d
又改了一下,改绝对步长为相对步长,同时支持多段线,就是spline还有待完善,点密度还不能根据弯曲度来设定,请各位高手提供思路.

通过工具菜单->加载应用程序 可加载该程序，然后可直接在命令行输入相关命令运行。如需要每次启动时均加载该程序，则可以将该文件放在启动组中。
文件预览:
d
可根据弧度来判断
根据用户给定的“精度”来添加弧度判断
d
根据弯曲度来...这个楼主能写出来吗?
针对spline...
如果只是等长,有时候过密...
期待楼主写出类似et中的acet-geom-object-point-list函数...extrim.lsp中有用到
d
请问怎么得到spline的弯曲度呢,组码里没有啊?