关于曲线上等距或等分插入点（每点直线距离相等）

onemax · 发表于 2015-4-12 17:41:10

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

用me或div命令在曲线上得到的点是按曲线距离相等插入的，能否用lisp在曲线上获得一组等分或等距的点表，而这些点间的直线距离相等而非曲线距离相等？

csharp · 发表于 2015-4-13 08:03:11

由起点按指定距离做Circle，求圆与曲线的交点，取前方的交点，依次循环直至前方无交点，交点表即为所求

Free-Lancer · 发表于 2015-4-13 10:05:03

游客，如果您要查看本帖隐藏内容请回复

(defun c:tt (/ ss d e pts)
(if (and (setq ss (ssget "+.:S" '((0 . "*Line,arc,circle,ellipse"))))
(setq d (getdist "\nLength: "))
)
(progn
(setq e (ssname ss 0))
(setq pts (div e d))
(mapcar '(lambda (x y)
(entmake (list '(0 . "LINE")
(cons 10 x)
(cons 11 y)
)
)
)
pts
(cdr pts)
)
)
)
(princ)
)

viphappy · 发表于 2015-4-13 14:32:51

回复看看，正需要

XDSoft · 发表于 2015-4-13 18:20:28

新的API即将发布，提供了个函数： xdrx_curve_getPointsAtDist 可以方便的求等分点。

Free-Lancer · 发表于 2015-4-14 09:00:55

XDSoft 发表于 2015-4-13 18:20
新的API即将发布，提供了个函数： xdrx_curve_getPointsAtDist 可以方便的求等分点。

猜想：

(xdrx_curve_getpointatdist curve int) 等分点
(xdrx_curve_getpointatdist curve real) 定居点
(xdrx_curve_getpointatdist curve int pt) 由参照点起始等分
(xdrx_curve_getpointatdist curve real pt) 由参照点起始等距点
(xdrx_curve_getpointatdist curve read1 real2 ...) 距离点
(xdrx_curve_getpointatdist curve pt real1 real2 ...) 由参照点起始指定距离点

支持闭合、非闭合

liuyj · 发表于 2015-4-14 10:16:28

哪天发啊？都三个多月了

swzlcircle · 发表于 2015-4-14 21:30:17

怎么看，这么耗分？

819534890 · 发表于 2015-4-14 21:39:28

回复学习学习

qyming1996 · 发表于 2015-4-17 16:44:07

???????????????????????????????????????

kwok · 发表于 2015-4-17 20:21:49

支持，所以要回复.

onemax · 发表于 2015-5-15 12:10:12

Free-Lancer 发表于 2015-4-13 10:05
**** 本内容被作者隐藏 ****

今天有空测试了一下，程序对圆弧最有效，而多段线、样条曲线、椭圆弧、圆、椭圆等均无法沿曲线完整地生成等距直线，如附图所示，另外除直线、椭圆弧及样条曲线是从起点处开始生成直线外，圆弧无论原起始点在哪都是从逆时针方向的起点开始生成直线

hzj268 · 发表于 2015-6-19 11:01:06

{:soso_e100:}路过看看。。。。。。。。。。。。。。

lwg125 · 发表于 2016-1-11 15:50:42

一直在寻找解决这个问题的方法！

yoyoho · 发表于 2016-1-12 11:18:41

回复看看，学习!!!!

账号		自动登录	找回密码
密码			立即注册

[求助] 关于曲线上等距或等分插入点（每点直线距离相等）

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

点评

点评