polyli的数据提取LISP

NVP · 发表于 2022-7-5 17:37:00

大家好。我很高兴终于加入这个论坛，我注意到这里有一些真正的CAD向导。

我有一个有点复杂的问题，我现在不能完全解决自己。我需要使用LISP程序在AutoCAD中自动/快捷地执行数据提取向导。最好我想这样做的方式，可以在LT以及使用。具体来说（对于过滤器），我需要Dataextraction函数来计算指定层上的多段线数量，同时从块中提取对象，从我可以在运行程序之前或操作期间进行的选择中进行。然后，我需要将多段线的计数输出到CAD内部的表中，与数据提取的方法相同。理想情况下，我希望程序通过引用特定矩形多段线/块内的区域来自动选择区域，该区域将通过模板在我的所有CAD文件中保持不变。

我对LISP程序做了一些修补，有一个程序可以选择多段线范围内的所有内容，但这还不够。任何帮助都将不胜感激。

Dadgad · 发表于 2022-7-5 18:07:24

欢迎来到CADTutor。

你的个人资料上说你正在使用LT。对吗？
我这样问是因为，据我所知，它与Lisp不兼容。

如果您的配置文件不准确，请更正它，因为没有人可能会帮助您创建您无法使用的lisp。
有充分的理由。

NVP · 发表于 2022-7-5 18:31:34

谢谢你的提示。我通常使用LT，但我也可以使用CAD的完整版本。

BIGAL · 发表于 2022-7-5 18:41:52

好的，在lisp中使用ssget可以添加pline和layer过滤器，sslength是多少。再次添加到表中没有问题。再次在预定义区域内没有问题。

copy

; an example
(setq win (list 0,0 100,100)) ; window size also see help for CP WP
(setq wbox (list 0,0 100,0 100,100 0,100))
(setq ss (ssget "W" '(0 0) '(100 100) (list (cons 8 "layername")(cons 0 "LWPOLYLINE"))))
(alert (strcat "There is " (rtos (sslength ss) 2 0) "Plines"))

[编程交流] polyli的数据提取LISP

发表回复

精选推荐