更改实体层

RubberDinero · 发表于 2022-7-5 17:18:01

在我的工作中，我有一项非常繁琐的工作，将层从建议层更改为现有层，反之亦然
我们的图层设置非常基本
“LayerName”=现有层
“LayerName PR”=建议的图层。
我最近买了一本书来学习AutoLisp，我已经掌握了基本概念。
我知道我想得到LayerName并将该名称设置为L，然后将LA转换为L-PR。

但我想知道是否有人已经有了这样的东西，可以帮助我。

我想做一个大规模的选择，并让它自动改变实体，以各自的公关层。反之亦然，删除PR。

我不是在寻找一个层重命名lisp。我正在寻找一个实体层改变lisp。任何事情都有帮助。谢谢

Lee Mac · 发表于 2022-7-5 17:26:07

您是否希望将“LayerName”上的所有内容都更改为“LayerName PR”，包括嵌套对象？还是仅由用户选择的对象？

RubberDinero · 发表于 2022-7-5 17:33:34

通过方框选择或选取框选择的项目。我想放一堆层，选择实体并运行lisp。或者运行lisp并选择实体。

这将是不同的然后重命名一个层，因为将有一些项目在同一层上，我不想改变为公关或删除公关，他们必须保留。

谢谢

Lee Mac · 发表于 2022-7-5 17:38:42

使用一些现有代码可以快速编写以下内容：
命令为LAY2PR和PR2LAY。

RubberDinero · 发表于 2022-7-5 17:43:07

哇！这太棒了，太快了！我要学习这个代码。
我不是程序员，所以我在读“纯英语AutoLisp”非常有趣的东西！这本书甚至附带了一张软盘。

非常感谢你！

我必须像找到解决方案一样选择你的答案吗？

Grrr · 发表于 2022-7-5 17:53:14

我建议你从afralisp开始。com，并在达到一定水平后访问李的教程：http://www.lee-mac.com/tutorials.html
在阅读了你的评论后，我认为你现在不会从他的代码中“学习”太多（无意冒犯），因为通常LM的代码是用高级/高级编写的，避免了其中可能出现的任何错误。

RubberDinero · 发表于 2022-7-5 17:58:27

谢谢你对afralisp有什么建议？这几乎是亚马逊的书单。那是我买书的地方。因为它似乎是为noobs设计的，所以我觉得它非常适合我。

我已经写了一些非常基本的lsp
（默认c:wa nil
（setq s（ssget“_X”'（（8。“*水*，*水*，*水*，*水*，*水*，*水-*”））
（命令“_.chprop”s““LA”“VU-WATR-PIPE”）
（普林斯）
)
我知道这只是一个“ssx宏”转向lsp，但我有点为自己感到骄傲。