轻易操作成千上万CAD图形.doc

轻易操作成千上万CAD图形 您想学习如何快速操作数以千计的AutoCAD图纸吗?用一个AutoCAD脚本，一个Windows批处理文件，或者AutoLISP语言？哪个有经验的AutoCAD用户愿意对着手动打开成千上万的CAD图形然后重复同样的操作呢？ 简介 数年前我被要求编制一个程序，这个程序将自动化改变大量的图纸。这家公司需要在AutoCAD中打开DXF文件，炸开所有模块和多义线，并保存成DWG格式，以便他们能在别的CAD系统中打开，而他们有3000个这样的图纸。我开发了一个程序以便他们可以回家度周末，星期一的时候所有的工作都完成了。 我还编制了类似的程序来帮助其他人。如尽可能多的转换和清理CAD图形以便节约公司的磁盘空间；从某个特殊属性从图形中提取出来，并将其放置一个文本文件中；更改图形中的标题块以反映公司名称和所有权的变化；创建一个包含所有符号库图纸中定义的块的单独的文件。我将介绍其中三个： 你可以用好几种不同的途径来完成这些任务。结束时，我们将简要地回顾ScriptPro迁移工具。该系统需要以下三个要素： 1 、一个脚本文件 2、 一个批处理文件 3 、一个lisp程序 以下两点需要注意： 1 、在对图形运用之前先对实验图形进行操作。 2 、在确定程序在新图形上生效之前记得保留你的原始数据。 这是一个实验，我将一步步地教你完成这个实验。我将文件放在C:datafilesCP34-1L 目录下。 脚本文件 脚本是常常被忽视的定制工具，他们一般以后缀为.scr的文本文件保存，里面包含一列原本可以在cad命令窗口输入的命令。是什么让它们如此至关重要呢？一个脚本可以通过使用开关/ B和指定脚本的名称在CAD启动时运行。您可以指定一个图形在AUTOCAD启动时自动打开，然后运行脚本文件，这是这个系统的基础。 下面一行显示的语法可使用在命令提示符下，桌面图标的目标属性，或者在Windows开始按钮的运行窗口中。 C:”Program Files”Autocad 2005”acad.exe c:dwghouse.dwg /b c:scriptsstartup.scr 这行文字将启动AutoCAD（acad.exe），打开一个指定的绘图（house.dwg），并自动执行一个命名脚本（c:scriptsstartup.scr）。 批处理文件 和脚本文件一样，一个批处理文件也是一个文本文件，但是后缀是.bat。它包含操作系统级的命令。可能一些人可能会联想到DOS，但是批处理文件解释器任然内置于Windows XP系统中。您可以通过它从开始菜单中点击运行，在运行窗口中键入CMD来打开它。这将打开一个OS（操作系统）的窗口如图所示。您可以在此输入DOS命令。或者，您可以将它们放在一个批处理文件里。 我之所以使用一个批处理文件来编辑多个图纸是因为批处理文件的 “for” 命令可以让我指定目录和带通配符的文件名，自动打开每个在该目录中的绘图文件，甚至有可能打开所有目录和任何子目录中的图纸。 Lisp语言文件 如同脚本文件和批处理文件一样，一个lisp文件也是文本文件，但后缀是.lsp。然而，它是一个实实在在的编程语言，它和AutoCAD的联系使它几乎可以在图形中执行任何绘图操作。每一个有经验的autocad用户都应该学习一种叫做AutoLISP的编程语言。在我这个更新图形的系统中， AutoLISP是主要角色。如果您还不了解它，由于学习AutoLISP已经超出了这次研讨会的范围，我会向您提供这个系统中必要的lisp代码。不过，我还是非常鼓励你们开发这个非常有用的工具。 由于AutoLISP函数都包含在括号内，并输入在AutoCAD命令行中，lisp的代码实际上可以直接放在一个脚本文件中，或保存为自己的文件。在这里，我把AutoLISP代码包含在一个单独的文件中。 把批处理文件，脚本，lisp代码和图纸放在一起。 *在每一个例子，你必须键入的内容都用文本框框起来了* 实例1，减少文件大小 第一个例子是把一个或几个目录下的图形文件减到最小，使用WBLOCK命令（如果你愿意，你还可以使用purge命令）。对于存档的图形文件来说，这个非常又用，你可以消除未使用的层名，块的定义，尺寸样式等。 下列步骤，您就可以使用脚本来自动启动AutoCAD中，负载第一绘图放在一个子目录中，获得的名称，绘画，使用WBLOCK保存具有相同名称在不同的分目录下，退出了绘画，并继续到下一个图纸在目录中做同样的事情。 步骤1摄氏度脚本文件 使用记事（而不是文字处理器）来创建下面的脚本文件并将其保存为？ ？ wbout.scr ？ ？在一个文件夹命名？ ？ ： 数据文件 CP34 - 1升。 ？ ？ （我希望能创建此文件夹中的每台计算机上了。如果没有，请创建它，你必须创建它。 ）你应该有5行文字，没有任何多余的空格或任何额外的线路，特别是在两端线或文件结尾。您必须，但是，按ENTER键结束时的最后一行，但只有一次。 使用两个反斜线和包括引号。 留下空间之间变焦和全部。 唐？ ？吨离开任何空格两端线。 唐？ ？吨放置任何空白行的档案 按下ENTER后，只有一次输入？ ？元？ ？ （负荷？ ？ ： 数据文件 CP34 - 1升 wbout.lsp “ ） 放大 WBOUT 戒烟 这是什么都意味着什么呢？ (负荷的“ C ： 数据文件 CP34 - 1升 wbout ” ）此使用AutoLISP语言负荷函数加载？ ？ wbout.lsp ？ ？文件。 放大这种变化中的某些文件，以避免自动退出而不保存在使用WBLOCK命令的AutoLISP程序。 WBOUT此命令WBOUT问题所造成的wbout.lsp 。 退出这一退出AutoCAD的不保存的档案。 的问题的回答， “退出而不保存？ ” 。 第2步-批处理文件 使用记事本创建下面的批处理文件并将其保存为？ ？ wbout.bat ？ ？在文件夹C ： 数据文件 CP34 - 1升。每个条目类型的单一行。您将有两行文字当您完成。 类型的？ ？的？ ？声明在同一行。 这是什么都意味着什么呢？ 的第一行创建一个新文件夹（目录，分目录）的名字吗？ ？世行？ ？在现有的文件夹，因此新版本的图形文件也可以放在那里，直到他们的完整性得到确认。 替代参数 女代表的名称，每一个指定的文件的文件夹命名？ ？ ： 数据文件 CP34 - 1升 DWG格式。 ？ ？每个。 dwg文件在该位置将被处理按字母顺序排列，因为它被设置为可替换参数 楼 女然后将使用第二部分线作为一个变量，改变相互传递给下一代绘图名称。裁武/等待选择启动一个Windows应用程序和返回控制的批处理文件完成时。 Acad.exe是Windows应用程序，正在开始。 自动将开始和开放的每一个绘图。由于/ b开关，脚本文件名为？ ？ wbout.scr ？ ？每次运行AutoCAD的启动。当所有副档名为。 DWG格式延长已处理（发等于变量 f ）项，该程序将停止。 注：路径给找到？ ？ acad.exe ？ ？文件是没有必要，除非有一个以上的acad.exe文件的电脑上。这可能发生如果您有多个版本的AutoCAD ，或者如果您有一个或多个垂直应用软件在计算机上，如对计算机的这个实验室。人们普遍能够更好地提供准确的道路。引号内的批处理文件要求，以补偿空间的名 字，文件或文件夹。把引号第二发生 女让你来处理图形文件的空间，他们的名字以及。广场的报价完全显示。 步骤3摄氏度Lisp语言计划 使用记事本创建以下lisp文件并将其保存为？ ？ wbout.lsp ？ ？在文件夹C ： 数据文件 CP34 - 1升。此文件必须输入准确显示。这将让目前的图纸名称，签发WBLOCK命令，保存现有的图纸后，清洗一切可能（即？问什么?*?没有） ，使用相同的名称，但在一个文件夹命名？ ？世行？ ？在当前指定的目录。在这种情况下， ？ ？ ： 数据文件 CP34 - 1升 DWG格式。 ？ ？ 医学 ： 数据文件 CP34 - 1升 DWG格式工务局 为 女（三： 数据文件 CP34 - 1升 DWG格式 *. dwg档）做启动/等待 ： ？ ？程序文件？ ？ ？ ？ AutoCAD的2005年？ ？ acad.exe ？ ？ 女？ ？ / b ： 数据文件 CP34 - 1升 wbout.scr 空一格后前端的斜线。 类型都报价和两个括号中 线二，三，四名。 确保所有的话都输入正确。 这是什么都意味着什么呢？ ( defun ： wbout （ /肾病扩声pawbdn ）确定了新的命令WBOUT （设置的DN （ getvar “ dwgname ” ） ）获得当前绘图 （设置原（ getvar “ dwgprefix ” ） ）获得当前的路径绘图 （设置pawbdn （ strcat巴勒斯坦权力机构的“世行 ”的DN ） ）创造了新的路径附加“世行” （命令“ wblock ” pawbdn “ * ” ）保存整个绘图与相同的名称在新的文件夹 )密切第一圆括号 大家可能会怀疑我为什么用Lisp语言程序在这里不是一个脚本来执行WBLOCK命令。即使您可以将行函数式代码到一个脚本，就像您可以输入 这样的代码在命令行，我喜欢写新lisp职能作为单独的文件，使用VLIDE计划。在这种情况下，有必要以保存新的绘图文件创建的WBLOCK命令到特定 位置，特定的文件名。用Lisp语言程序我能够获得现在的位置和目前的文件名，修改它们通过追加新的文件夹名称，并将其存储为自变量，它可以合并为一个单 一的路径和文件名。 步骤4 ？架C -运行该程序。 应该有一组画中的？ ？ ： 数据文件 CP34 - 1升 DWG格式？ ？文件夹了。如果不是这样，只要复制几个从样本目录AutoCAD中。一旦有图纸文件夹中的文件，您就可以开始这一进程运行的批处理文件。批处理文件是 被这件事非常感动，因为它选择每个绘图文件，并启动AutoCAD中使用适当的脚本。 您可以运行该程序的运行窗口，在命令提示符处，从资源管理器中，从我的电脑，或从一个桌面快捷方式。目前，使用我的电脑图标找到我们的资料夹C ： 驱动器，这将可能看起来如下所示。认为此对话框中可以改变的，所以它看起来可能会有些不同。 （ defun ： wbout （ /肾病扩声pawbdn ） （设置的DN （ getvar “ dwgname ” ） ） （设置原（ getvar “ dwgprefix ” ） ） （设置pawbdn （ strcat巴勒斯坦权力机构的“世行 ”的DN ） ） （命令“ wblock ” pawbdn “ * ” ） ） 双击？ ？ wbout.bat ？ ？图标或选择它并右键单击。您应该看到AutoCAD的开幕式和闭幕式，因为它修改的每个文件。 使用此收集程序-一个批处理文件，一个脚本和一个lisp常规-可以大大减少使用的空间在硬盘上以供储存。然而，如同任何自动化过程中，有一 些需要考虑的事项-即，你真的要消除所有未使用的层，块，样式，和dimstyles从图纸？这样的节目应该仔细检查数量有限的消耗图纸文件，然后用它广 泛。如果您创建一个程序这样别人，你必须保证他们能够安全地使用它。它？ ？不是一个坏主意，包括免责开始时的计划，以防万一发生什么事超出您的控制。 一旦您运行该程序，并相信，做你想要的，旧的文件可以被删除，新的文件放置在您想要他们。或者，您可以改变行为？ ？ wbout.lsp ？ ？所以每个绘图文件是自动替换了新的小型版本。要做到这一点，删除提及工务局的文件夹并设置专家4您lisp计划和重置当程序完成后，情况如下： ( defun ： wbout （ /肾病扩声padn外汇） ;定义一个新的命令WBOUT （设置 （ getvar “专家” ） ） ;获取当前专家值 （设置的DN （ getvar “ dwgname ” ） ）获得当前绘图 （设置原（ getvar “ dwgprefix ” ） ）获得当前位置的图纸 （设置padn （ strcat剂的DN ） ）相结合的路径和名称的绘图 （ setvar “专家” 4 ） ;设定值的专家， 4压制警告 （命令“ wblock ” padn “ * ” ）取代现有的绘图 （ setvar “专家”十） ;重置价值专家 ) ;关闭第一圆括号 注：这将是明智的购买错误捕获功能，这项新计划，以确保专家的价值会回到原来的设置，不管。看到结束本文的一个例子。 要处理的绘图子目录，您可以添加一个切换到命令的批处理文件如下。请注意，现在的道路之前，更换参数，并设置（在括号内）成为公正的外卡，说明具体的文件。您也可以使用一个文本文件中指定文件名。查看帮助系统命令的更多细节。 注意。要运行一个批处理文件，您选择开放右键点击菜单。改变中的文本文件，你选择编辑。这是非常不同的behaviorthan您可能期望。 的商业/住宅 ： 数据文件 CP34 - 1升 DWG格式 女在（ *. dwg档）做启动/等待 ： “程序文件” “ AutoCAD的2005年” acad.exe “ F “类/公元前： 数据文件 CP34 - 1升 wbout.scr 例如2摄氏度现有块重新定义 这第二个例子将让你重新定义任何现有的区块范围内的一组漫画。在具体的例子将一个标题块，代表公司名称的变更，或标识的更新，或其他修改。请注意，这是唯一可行的，如果每一个绘制包含一个标题块还没有爆炸，如果更换基本上是和原先的一样。 步骤1摄氏度脚本文件 打开记事本，键入下面的脚本。将其保存为？ ？ ： 数据文件 CP34 - 1升 border_update.scr 。 ？ ？ 没有空格的第一行 有三个空间中的第二条生产线 人们之间的空间清除和L 这是一个空白行 请务必都引号。 这个命令的名称使用下划线 按下ENTER后，只有一次输入？ ？元？ ？ 插入边界= C的： 数据文件 CP34 - 1升 DWG格式边境这将重新界定现有块？ ？边界？ ？使用绘图 0,0 1 1 0插入点， X和Y表1和旋转角度为0 清除L擦除块只是重新定义后插入 一个空白行= ENTER键摄氏度停止选拔对象清除 (负荷的“ C ： au03Abbott border_update.lsp ” ）加载的AutoLISP文件建立一个新的命令 border_update问题的新的命令所造成的函数式档案 退出提请会议结束 答案吗？吗？ ？ ？问题？ ？退出而不保存？ ？ ？ 步骤2摄氏度批处理文件。 打开记事本，输入以下两行。将文件另存为？ ？ ： 数据文件 CP34 - 1升 border_update.bat 。 ？ ？ 的第一行提出了新目录的新图纸正在建立。 第二条生产线必须输入作为一个单一的路线，和类似的批处理文件中的例子之一。这个人是更有选择性的文件被选中。只有图纸开始，字符？ ？ D 5类？ ？将开放。 医学 ： 数据文件 CP34 - 1升 DWG格式 NewBorder 为 女（三： 数据文件 CP34 - 1升 DWG格式 D 5类*. dwg档）做启动/等待 ： “程序文件” “ AutoCAD的2005年” acad.exe “ F ”类/公元前： 数据文件 CP34 - 1升 border_update.scr 插入边界= C的： 数据文件 CP34 - 1升 DWG格式边界 0,0 1 1 0 擦除L （负荷的“ C ： 数据文件 CP34 - 1升 border_update.lsp ” ） border_update 戒烟 步骤3摄氏度lisp计划 使用记事本键入以下命令行，并保存该文件作为？ ？ ： 数据文件 CP34 - 1升 border_update.lsp 。 ？ ？ 空间后frontslash 两个关闭括号和两个引号在这三个线。 唐？ ？忘记这最后的圆括号 这是什么都意味着什么呢？ ( defun ： border_update （ /肾病扩声pawb博士panbdn ） ;定义了新的命令BORDER_UPDATE （设置的DN （ getvar “ dwgname ” ） ） ;获取当前绘图文件 （设置原（ getvar “ dwgprefix ” ） ） ;获得路径当前绘图文件 （设置panbdn （ strcat扩声“ NewBorder ”的DN ） ） ;创造新的路径附加“ NewBorder ” （命令“保存” panbdn ） ;与相同的名称保存在新文件夹 ) ;关闭第一圆括号 步骤4 ？ C运行的程序 移至文件夹？ ？ ： 数据文件 CP34 - 1升 ？ ？和开放的。 bat档名为？ ？ border_update.bat 。 ？ ？坐视它的工作。 例如3摄氏度创造图纸由块定义 的目的，明年的例子是自动打开一组图纸包含符号，以及创建一个新的绘图文件从每个块中定义的每一个绘图。它使用同样的过程作为实例1和2 ，但不同的lisp计划。 步骤1摄氏度脚本文件 打开记事本，然后键入下面的脚本。将文件另存为？ ？ ： 数据文件 CP34 - 1升 blockout.scr 。 ？ ？ 没有空白行任何地方的文件。 按下ENTER后，再次输入？ ？元？ ？ 步骤2摄氏度批处理文件 打开记事本，然后键入下面的脚本。将文件另存为？ ？ ： 数据文件 CP34 - 1升 blockout.bat 。 ？ ？ （负荷的“ C ： 数据文件 CP34 - 1升 blockout.lsp ” ） blockout 戒烟 （ defun ： border_update （ /肾病扩声panbdn ） （设置的DN （ getvar “ dwgname ” ） ） （设置原（ getvar “ dwgprefix ” ） ） （设置panbdn （ strcat扩声“ NewBorder ”的DN ） ） （命令“保存” panbdn ） ） 步骤3摄氏度lisp文件 atafiles CP34 - 1升 blockout.ls 县 没有空格内q D 没有括号尚未结束 ） 这一切意味着什么呢？ ( defun ： blockout （ /肾病巴中一室;定义新的命令， 6变量 （设置的DN （ getvar “ dwgname ” ） ） ;获得当前绘画和保存？ ？ d （设置原（ getvar “ dwgprefix ” ） ） ;获得路径当前绘画和保存？ ？扩声？ ？ （设置中一（ strcat扩声“ NewBlocks ”的DN ） ） ;添加新的文件夹路径和保存中一 （设置BLKDATA （ tblnext “区块”吨） ） ;设置BLKDATA =以名称第一批名单 （同时BLKDATA ;循环步骤，如果有一个价值BLKDATA （设置BLNAME （的CDR （协会2 BLKDATA ） ;设置BLNAME平等的名称旁边块 （设置姓名（ strcat一blname ） ） ;建立一个变量的路径和名称块 （命令“ wblock ”姓名blname ）使用WBLOCK建立博士 （设置BLKDATA （ tblnext “块” ） ） ;设置BLKDATA =来 打开记事本，然后键入下面的脚本。将文件另存为？ ？ （ defun ： blockout （ /肾病巴中一blkdan （设置的DN （ getvar “ dwgname ” ） ） （设置原（ getvar “ dwgprefix ” ） ） （设置中一（ strcat扩声“ NewBlocks 的” D （设置blkdata （表 （同时blkdata （设置blname （的CDR （协会2 BLKDAT （设置姓名（ strcat一blname ） ） （命令“ WBLOCK ”姓名基本法 （ ScriptPRO ScriptPro是一个迁移工具，它提供了图形用户界面采用一些脚本来多次提款。您可以免费下载。档案名称是？ ？ CCTSETUP.EXE 。 ？ ？以下是该网站截至10月4日。如果此链接没有？ ？吨的工作，种类？ ？ Autodesk的定制转换工具？ ？在搜索窗口 。 我不？ ？吨使用ScriptPro ，因为我一直无法得到运行脚本，其中包括AutoLISP语言代码。如果你能完成你想要只使用命令行输入不使用AutoLISP语言，它可能对您有用。它 也有一些内置的职能转换图纸。 DXF文件或更早的版本，和一些额外的脚本功能。您可以取得文件名和路径从脚本使用下列Scrip