[求助]请教一个LISP函数问题

simon_hbedi · 发表于 2002-8-7 22:16:00

这是我在看书是遇到的一个问题
有关osnap
(setq pt1 (osnap pt2 "midp"))
哪位能告诉我，这个语句中的pt1,pt2是代表什么？
这个语句是什么意思？

ll_j · 发表于 2002-8-8 10:09:00

【R14Help】将某种对象捕捉模式作用于指定点而获得一个三维点，并返回该三维点
(osnap pt mode)
mode 参数是一个字符串，其中包含了一个或多个有效的对象捕捉模式标志符（如 mid、cen等），各标志符之间用逗号隔开。
(setq pt1 (getpoint))
(setq pt2 (osnap pt1 "cen"))
(setq pt3 (osnap pt1 "end,int"))
由 osnap 函数返回的点取决于当前三维视图和系统变量 APERTURE 的设置。

我的理解：
pt1——鼠标定点
pt2、pt3——打开相应捕捉模式后鼠标中心放置在pt1时捕捉到的点

Hart · 发表于 2002-8-8 10:51:00

pt1 pt2都是点，这个函数是返回最接近pt2点的对象的中心点给pt1。
简单的说是捕捉图元的中心点，并把中心点的坐标赋给变量PT1。

zshqd · 发表于 2002-8-8 14:50:00

可理解为：捕捉过pt2点的线的中点，并把捕捉到的点的坐标附值给pt1

simon_hbedi · 发表于 2002-8-8 21:51:00

楼上的几位兄弟谢了，不过我还是有一点不清楚，过pt2要是很多线，那怎么知道是哪一条？
如果我要捕捉两条线的交点，AUTOLISP的代码该怎么写？

mccad · 发表于 2002-8-8 21:58:00

求两直线交点的方法是这样的：
先得到两条线的端点，通过inters函数来求交点

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

[求助]请教一个LISP函数问题

我的理解

Re

可理解为：

如果我要捕捉两条线的交点，AUTOLISP的代码该怎么写？

所以说这种方法不太好