[求助]：如何用lisp构造200个顶点的spline?

lgw · 发表于 2002-2-18 09:27:42

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

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

×

如何用lisp构造200个顶点的spline?

XDSoft · 发表于 2002-2-18 09:42:31

最初由 lgw 发布
[B]如何用lisp构造200个顶点的spline? [/B]

首先,顶点你已知,构建一个顶点表:
(setq plist '(p1 p2 p3....p200))

然后根据顶点表建立多义线:

(apply 'command (cons "pline" plist))

执行后,就得到200个顶点的POLYLINE了.

再然后,把POLYLINE变成SPLINE

使用XDRX_API的:

254. xdrx_curve->spline

功能：将曲线转换成SPLINE

调用格式：(xdrx_curve->spline <曲线实体名> [删除标记])

说明：转换ARC,CIRCLE,ELLIPSE,POLYLINE
若给删除标记，则删除原来的曲线实体

再然后就OK!!!!了.

:c :c :c

LUCAS · 发表于 2002-2-18 12:30:45

思路:先画一条SPLINE(顶点数不限),再用DIVIDE分成200多段,再利用DIVIDE的点用SPLINE重画一次就好了.

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

[求助] [求助]：如何用lisp构造200个顶点的spline?

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

相关帖子

Re: [求助]：如何用lisp构造200个顶点的spline?