[求助]：[求助]：关于晓东CAD家园《AutoLISP / Visaul Lisp 自定义函数参考》

hustboy · 发表于 2006-11-11 16:17:20

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

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

×

晓东CAD家园里面由Eachy Wkai 狂刀 AUTool 武陵山人 Robbie 它山之石 lemonx等高人编的《AutoLISP / Visaul Lisp 自定义函数参考》看了后觉得非常好，但是怎么用呢，怎么调用里面的函数呢？

KLDC · 发表于 2006-11-11 16:41:17

只要学会LISP函数的使用方法就可以调用.找本教材学上半天肯定就会了.

hustboy · 发表于 2006-11-11 16:56:47

可是里面的函数不是cad里的啊，是由Eachy Wkai 狂刀 AUTool 武陵山人 Robbie 它山之石 lemonx等高人编的函数相当于XDRx_API如下图：

qjcpj · 发表于 2006-11-11 19:40:19

请问哪儿有该函数下载？

hustboy · 发表于 2006-11-12 09:14:21

我也想知道哪里有下的，贴几个：
在两点间构造 n 等分点

(xdl-pts-divbyint p1 p2 n)
参数

p1

线段第一点

p2

线段第二点

n

等分数，整数

返回值

两点间点表

示例

命令: (setq p1 (getpoint))

(764.059 503.333 0.0)

命令: (setq p2 (getpoint))

(1740.08 757.462 0.0)

命令: (xdl-pts-divbyint p1 p2 10)

((764.059 503.333 0.0) (861.661 528.746 0.0) (959.263 554.159 0.0) (1056.87 579.572 0.0) (1154.47 604.985 0.0) (1252.07 630.397 0.0) (1349.67 655.81 0.0) (1447.28 681.223 0.0) (1544.88 706.636 0.0) (1642.48 732.049 0.0) (1740.08 757.462 0.0))

点集中最远点的集合

(xdl-pts-getfarthest pts)
参数

pts

点表

返回值

如果有多个等距的，返回两两点的集合，否则返回两点集合

点集中最近点的集合

(xdl-pts-getnearest pts)
参数

pts

点表

返回值

如果有多个等距的，返回两两点的集合，否则返回两点集合

将表元素 n 等分成若干子表

(xdl-lst-split  lst  n)
参数

lst

表

n

子表长度

返回值

表或 nil

示例

a-->(1 2 3 4 5 6 7 8)
(xdl-list-split  a 2)  返回  ((1 2) (3 4) (5 6) (7 8))
(xdl-list-split  a 3)  返回  ((1 2 3) (4 5 6) (7 8)) '(0 1)
　

by aeo

hustboy · 发表于 2006-11-12 09:31:36

有没有人知道在哪里下，只有chm的说明没用啊

雨箭风刀 · 发表于 2006-11-13 01:02:23

在vlisp程序库板块

hustboy · 发表于 2006-11-13 08:04:19

没有啊，我找过，哪位老大能给个链接啊

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

[求助] [求助]：[求助]：关于晓东CAD家园《AutoLISP / Visaul Lisp 自定义函数参考》

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

相关帖子