lisp用于从中提取区域

emadageeb · 发表于 2022-7-5 15:33:14

登录/注册后可看大图

我正在从事城市规划工作，我有一个大项目，有大量的地块，我需要一个lisp对封闭地块进行编号，它不能用直线绘制，并将相同编号的区域提取到autocad中的一个选项卡中，所以有人可以用lisp帮我，这样我只能单击区域

LibertyOne · 发表于 2022-7-5 15:38:37

这应该是一个有趣的社区项目。我在考虑绘图的闭合多段线。不是线条。可以更容易地获得闭合多段线的面积。

emadageeb · 发表于 2022-7-5 15:40:14

好的，我可以先用同样的lisp将线转换为pltyline，然后提取面积吗

LibertyOne · 发表于 2022-7-5 15:45:05

你们有什么Acad版本？如果具有2008或更高版本，则可以为每个打印创建边界多段线。在命令行中键入“_BPOLY”，然后单击按钮，在要边界的区域中选择一个点。今天我编写了一些代码，看看如何创建一个程序来收集信息，并能够列出图的大小。它有点面向未来，这意味着您可以将其用于其他项目，只要图形始终将绘图作为多段线。

emadageeb · 发表于 2022-7-5 15:46:09

我正在将autocad 2008和thanhs用于_bploy命令
此外，如果我有多段线，我仍然要求对绘图进行编号，并通过单击拾取点获得表中的面积

LibertyOne · 发表于 2022-7-5 15:50:09

大约十年前，我在AutoLisp中编写了一个房间明细表。如果这对你有帮助的话，这个周末让我看看。

emadageeb · 发表于 2022-7-5 15:54:39

谢谢你的关心（LibertyOne）&我在等你：）

Lee Mac · 发表于 2022-7-5 15:57:05

我写这篇文章很有趣，也许它会帮助你：

copy

See later post for latest code

stevesfr · 发表于 2022-7-5 15:58:48

李，这个不行。从表格开始，首先标记区域，然后标记此区域
命令：at
表的拾取点：
拾取区域：
**错误：自动化错误。不适用**
使用Acad2008 vanila
实体为LWpoly，textsize set ok
史蒂夫

Lee Mac · 发表于 2022-7-5 16:03:19

嗨，史蒂夫，

感谢您的反馈-我认为这是一个版本问题，因为（如gif所示），我对代码没有问题（至少在闭合的多段线和圆上）。

你能告诉我代码崩溃的那一行吗？

（打开VLIDE，Ctrl+O（打开文件），打开上述程序，调试->出错时中断（勾选），Ctrl+Alt+E（加载代码），在ACAD中运行程序->崩溃时：调试->上次中断源（Ctrl+F9），记下高亮显示的代码段的行号。重置错误（Ctrl+R）。

谢谢

李

[编程交流] lisp用于从中提取区域

发表回复

精选推荐