跪求一LISP程序

yoyoho · 发表于 2010-9-28 09:02:00

gufeng

你好:

2008版本适用吗?

执行你的程序没反应喔!

hl2006 · 发表于 2010-9-28 18:14:00

没试过2008的，我用了2000和2004的。还有一个小地方，就是画的圆也是封闭的但不能填充

hl2006 · 发表于 2010-9-28 19:18:00

如果这个程序在修改一点地方就完全完美了，线上拉出去了一根，而拉出去的线上又拉出去了一根级，而点任何一根线，这些连在一起的线上的所接的图元都会填充出来。gufeng哥，最近是不是旅游去了啊。麻烦你上线帮小弟在修改一下，小弟感激不尽

hl2006 · 发表于 2010-9-29 18:29:00

HHHHHHHHHHHHHHHH

gufeng · 发表于 2010-9-30 12:29:00

程序整合全部,下载文件Test.rar,解压得到文件 Test.VLX ,加载运行命令,Test.

1、添加对圆的填充

2、添加无限层搜索线与圆，如果搜索到圆则不会往下搜索，只有线才会。

即选择的线与2 3 4 线相交，2 与 6 7线相交，3 与8 9线相交，6与 10 11线相交一直往下，自己定义搜索深度

hl2006 · 发表于 2010-10-1 09:07:00

谢谢gufeng

hl2006 · 发表于 2010-10-1 09:08:00

能不能给个原代码哦

hl2006 · 发表于 2010-10-1 09:17:00

这个能填充圆了，但是其它的图形又不行了，因为我们的图纸有圆也有其它的东西

hl2006 · 发表于 2010-10-5 21:22:00

还能改改吗

gufeng · 发表于 2010-10-6 11:01:00

其它图形是指什么图形？程序对于LWPOLYLINE线、POLYLINE线和圆都可以的，线必需是闭合或者首尾节点重合。

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