用于创建新图形的Lisp

sakinen · 发表于 2022-7-6 06:13:38

我计划参与lisp例程的制作，这将提高准备图纸以在我的公司发布的速度。我们总是创建特殊的工作图形，然后将其外部参照到发布图形中。我们已经在使用一些excel和lisp来填充表单数据（我认为这个论坛上也出现了关于同一个lisp的主题）。基本上，我想要实现的是，lisp从csv文件中读取一列，该文件称为“filename”，并在列结束时使用相同的名称创建文件。同样，在创建每个文件后，我想从一个链接也在csv列中的文件导入具有特定名称（A2）的布局，A2是csv中的另一列。此外，我想包括多达3个或4个这个布局导入每个绘图。当然，如果它在csv lisp中被省略，那么它就不会成功。因此，一个文件名将是csv中的一行数据，其中包含布局名称和指向布局模板文件的文件链接。
我希望我说得有道理。如果没有，请要求澄清。
我想问你一些想法或建议，或者如果有人尝试过类似的东西，我们可以谈谈。
提前感谢并致以最良好的问候！

BIGAL · 发表于 2022-7-6 06:34:19

这只是一个如何

第一步，我将创建一个包含所有设置和至少4个布局的模板dwg，如您所述保存它，只需打开此模板，然后执行“另存为”操作，这将使dwg具有文件名。

好的，第二步，删除版面比添加版面容易，有人可能会反驳我，但这没关系。更改这些名称等，以及忽略保存为上述内容，立即执行。

步骤3进入下一张图纸。

您可以使用excel编写一个脚本来执行所有工作，需要在这里搜索重命名/删除布局lisp。

打开mytemplate（加载“renamelayouts”）floor 4 saveas FredsProject 1 close
打开mytemplate（加载“renamelayouts”）墙3另存为FredsProject 2关闭

等等

sakinen · 发表于 2022-7-6 06:55:19

这是一个很好的基点。这是一个相当聪明的想法，删除现有的而不是创建。它简化了过程。
我唯一不明白的是在excel中创建脚本。
你是说某种宏，它将与cad一起运行还是什么？
顺便说一句，非常感谢！

sakinen · 发表于 2022-7-6 07:11:52

我知道你在说什么了。
再次感谢。

daha · 发表于 2022-7-6 07:19:57

我也有同样的需求，想知道是否有人对此有Lisp程序的地方？我有一个csv文件，在两列中包含dwg名称及其相应的布局名称。我想做的是运行该程序，它将读取第一列（dwg名称）中的数据，并使用我的dwt创建x个布局（我将使用我的dwt的文件路径修改代码），以及另一列中的相应布局名称。因此，如果我在A列中有50个图形名称，它将创建50个新布局（在A列中列出的图形中），并相应地重命名它们以匹配B列中的布局名称。例如，我可以创建5个具有500个布局的基本DWG，所有这些布局都基于我的csv中的数据。唯一的要求是在运行之前存在基础图形（当然还有dwt和csv）。

谢谢

[编程交流] 用于创建新图形的Lisp

发表回复

精选推荐