在几个屏幕上重复lisp例程
我需要在用户定义的文件夹中包含的几个文件上运行LISP例程。现在,我在打开DXF后运行LISP,然后执行一些基本函数,然后将文件保存为DWG,最后anc关闭文件。以下是程序:有什么想法吗?如果可能的话,我宁愿不使用脚本。
谢谢
上下快速移动
除非VBA能帮你摆脱困境,否则我认为脚本可能是你唯一的选择。
我认为可以创建一个LISP例程来为您编写脚本,如果您希望这样继续的话。
李 那么,是你根本不想使用脚本,还是你不想亲自使用脚本?不管怎样,你为什么不想用一个呢? 让我退一步。我不认为一个脚本可以处理多个文件。我尝试了rscript,但无法使其工作。在使用脚本之后,我开始感到沮丧,并想回到lisping(尽管事实上我也不是很擅长)。我试图编写一个程序,在从目录中选择的几个文件上运行相同的例程。如果要编写脚本,那么我想我完全错过了编写脚本的机会。
脚本是否需要在AutoCad之外运行? 就LISPing而言,它不能很容易地在图形之外运行,除非您打开所有要更改的文档,并使用Visual LISP循环浏览这些文档,并对每个文档执行操作。但这不允许任何“命令调用”。
而使用脚本,可以打开和关闭图形,并依次在每个图形上运行命令。
脚本可以在AutoCAD中运行-我相信在工具中的运行脚本下。 请参阅此处了解更多信息
http://www.cadtutor.net/forum/showthread.php?t=34969 很抱歉管理员发布了另一个网站,但这是你的答案
http://forums.augi.com/showthread.php?t=77021 写剧本并不难,尤其是为了满足你的需求。
只需启动autocad,然后“脚本”并运行保存的脚本
剧本应该是这样的
打开c:\mydwgs\dwg1(加载“mylisp”)关闭“Y”
打开c:\mydwgs\dwg2(加载“mylisp”)关闭“Y”
打开c:\mydwgs\dwg3(加载“mylisp”)关闭“Y”
等
注意,lisp不需要关闭由脚本完成的文件,也不需要使lisp成为defun。记住保存为的文件。可控硅
一旦你完成了脚本,就可以很容易地使用编辑和替换来创建一个新的脚本。
一些提示如果你需要很多dwg(我已经做了100多个),你可以手动创建dwg列表,非常简单,转到开始运行命令,更改到你需要的目录,即CD\MyDWG,然后dir*。DWG>MyDWG。txt文件
这会将该目录中的所有图形转储到MyDWG中。txt,使用Word,您可以删除图形名称(在窗口中按住Alt键),然后使用replace创建脚本。您可以用新的内容替换^p行的末尾,关闭“Y”^p或将其放置在开始处,用^popenC替换^p:\ mydwgs\一旦您知道如何操作,它会非常快。
注^ p是回车,因为我键入了克拉小写p
我不得不稍微编辑一下你的脚本。。。干杯
此外,我建议使用lisp获取该目录中的图形列表。然后您可以使用lisp编写和运行脚本。。。 你好
+
页:
[1]
2