家居装修知识
模具知识|AutoCAD中自动批量修改图形文件的程序
2017-02-10  浏览:97
模具之家讯:一、概述

在工程CAD绘图中,常常会遇到下列棘手的问题:

在施工图后期,大部分图形文件都已完成,但因某一条件的变化,需在某卷图中增加(或减少)一些图纸,这将导致许多相关图形文件的内容不得不进行相应的修改:如高层代号、图纸编号等。

在实际工程设计中,为了提高效率,60%的图形是通过修改已有的设计而形成新的图形,这时常常进行一些重复性的工作,比如图框的替换、设备元器件的变更等,有时,要几张图,甚至几十张图做同样的修改。

对于上述情况,过去一般的作法是将每一图形文件调出来,逐一修改。在图幅比较大时,只能反复使用ZOOM命令,当所涉及的图形文件较多时(有时会有几百个),采用手动操作,其工作量非常大,而且大部分操作都是重复性的工作,长时间操作很容易发生混淆和遗漏,不但效率低,图纸质量又不能保证。

能否将这些重复性的工作让计算机来完成呢?

AutoCAD是图形设计的通用软件,它为各种专业用的CAD提供了尽可能多的图形编辑功能,但很难实现自动化作图的功能。

在实践中我们用C语言编写了CHSCR应用程序,采用该程序设计人员只需编写一个简单的命令文件CH.SCR和要处理的文件表FILE.TAB,经过CHSCR?盓XE应用程序转换,形成一个可以处理FILE?盩AB所列出的所有文件的CHGE?盨CR命令文件。然后利用AutoCAD的 script命令,就可使计算机按命令自动批量修改图形并存盘或生成PLT绘图文件。由于采用了易于为非专业编程人员所接受的SCR文件方式来编写命令CH?盨CR,使用非常方便。

二、如何使用CHSCR

1. 创建CH?盨CR命令文件

CH.SCR文件的内容是由AutoCAD的命令和响应序列所组成的ASCⅡ文件,是可在AotuCAD编辑状态下执行的文本文件。

CH.SCR包含了可在指定图形中自动重复执行命令序列。

例:把图形文件C800-01~ C800-98中的图纸编号2066DD3改变2087DD2。高层代号C13改为D24,设备型号DZ20改为C45AD。

在DOS状态下用文本编辑软件建立CH.SCR文件:

CHTEXT_all _ _2066DD3<Enter>

2087DD2<Enter>

CHTEXT_all _ _C13<Enter>

D24〈Enter〉

CHTEXT _all _ _DZ20<Enter>

C45AD〈Enter〉

PLOT〈Enter〉

〈Enter〉

〈Enter〉

 其中:

_代表一个空格

〈Enter〉代表回车

CHTEXT修改图中文字的LISP程序

·AotoCAD中文字修改功能较弱,AutoCADR12.0中曾加了DDEDIT修改文字命令,但只能用鼠标器手工修改,且一次只能改一个字符串不适用程序化操作。

因此,在编写SCR命令文件时我们采用了修改图中文字的LISP程序CHTEXT.LSP(其清单附后)。将其装入ACAD.LSP后,只要键入CHTEXT,就可按汉字提示使用,它一次可以修改多个字符串。

·当编写命令文件时,必须考虑每条AutoCAD命令中的所有响应和提示。命令文件中的每个空格都是有意义的,因为AotuCAD将它看作回车,所以不能随意增减。

·如果不需要输出PLT绘图文件,PLOT后面四行可以不要。

·CHSCR有两个作用:

①如果需要修改的图形文件较少,可以在ACAD中通过SCRLPT命令直接调用CH.SCR。

②可以在ACAD中通过script命令试运行一次,看是否有错。

在ACAD命令状态下,键入以下命令即可按CH.SCR文件要求,对当前图形完成所需的修改。

Command:script<Enter>

script file:ch<Enter>

当所涉及的图形文件较多时(十几个以上),采用手动操作,将每一图形文件调出来,逐一修改,效率太低。因此建议采用以下步骤,使计算机按命令自动批量修改图形文件。

2. 建立图形文件表FILE.TAB

创建完CH.SCR后,下一步应把需要修改图形文件名(.DWG)存入FILE.TAB中:

例如:

C800-01

C800-02

C800-03

 .

 .

 .

C800-98

3. 编译生成CHGE.SCR文件

当具备CH.SCR(试运行正?:?)和FILE.TAB文件后,就可以进行编译工作,在DOS状态下键入CHSCR〈Enter〉即开始编译,若编译出现问题,系统会给出相应的提示,编译完成后,你会发现目录中多了一个CHGE.SCR文件(自动修改图形的文本文件)。

·CHSCR.EXE:其功能是配制SCR文件格式的命令字符串并调入相关的绘图参数(源程序用C语言编写,清单附后)。

·当ACAD输出PLT文件时,如果发现有对应图形的PLT文件,将提示出是否覆盖掉它,这将引起script命令中断运行。为此在CHSCR.EXE中,我们是这么处理的:当程序发现有相应图形的PLT文件,将自动把它删除掉,并在屏幕上显示出对应的信息。

经CHSCR.EXE所生成的CHGE.SCR文件:

open y C800-01

CHTEXT all 2066DD3

2087DD2

CHTEXT all C13

D24

CHTEXT all DZ20

C45AD

PLOT

<Enter>

<Enter>

<Enter>

save

 .

 .

 .

open y C900-98

CHTEXT all 2066DD3

2087DD2

CHTEXT all C13

D24

CHTEXT all DZ20

C45AD

PLOT

<Enter>

<Enter>

<Enter>

save

quit y

4. 执行script命令

①在ACAD中通过script命令直接调用CHGE.SCR:

Command:script chge<Enter>

②启动AutoCAD时从操作系统提示符处输入以下正文:

C:acad script chge<Enter>

三、程序的安装

1. 将CHTEXT.LSP装入ACAD.LSP中。

2. 用通用C++编译器将CHSCR.C编译成可执行程序CHSCR.EXE,将其拷贝到CAD可找到的目录下。

程序CHSCR.EXE适用于AutoCAD R11.0、R12.0。

四、结束语

以上所举例仅是该程序应用的一个简单例子,在实践中还可用于图块的重新定义、图框更新、建立绘图标准配制、连续显示幻灯片、连续出图,限于篇幅不一一列举。

自从我们把该程序应用于批量修改图形文件后,不但将设计人员从繁锁的人工修改图纸中解脱出来,而且大大提高了设计效率和图纸量。
模具之家为您提供最全面的塑胶,塑料,模具,模具设计,塑胶模具品牌的装修知识点和各种塑胶模具的导购与在线购买服务,拥有最便宜的塑胶模具价格和最优质的售后服务,敬请登陆模具之家:http://muju.jc68.com/
更多»您可能感兴趣的文章:
更多»有关 塑料 的产品:
南亚塑胶洛阳总经销 PVC塑料管

南亚塑胶洛阳总经销 PVC塑料管

价格:10.00/米

深圳 南亚 耐酸碱 PVC管道 pp管 PVC管 塑料管

深圳 南亚 耐酸碱 PVC管道 pp管 PVC管 塑料管

价格:3.00/米

LED封装塑料导热专用纳米氧化镁

LED封装塑料导热专用纳米氧化镁

价格:到店咨询

塑料专用纳米氧化铝

塑料专用纳米氧化铝

价格:到店咨询

联塑PE钢丝网骨架塑料(聚乙烯)复合管

联塑PE钢丝网骨架塑料(聚乙烯)复合管

价格:1.00/米

塑料光纤连接器

塑料光纤连接器

价格:7.50/个

易博仕铝方通吊顶木纹铝方通厂家直销

易博仕铝方通吊顶木纹铝方通厂家直销

价格:7.50/米

易博仕勾搭式垂帘铝挂片吊顶天花

易博仕勾搭式垂帘铝挂片吊顶天花

价格:8.50/米

供应易博仕氟碳铝单板幕墙铝单板厂家直销

供应易博仕氟碳铝单板幕墙铝单板厂家直销

价格:198.00/平方米

供应易博仕氟碳铝单板幕墙铝单板厂家直销

供应易博仕氟碳铝单板幕墙铝单板厂家直销

价格:198.00/平方米

易博仕铝天花吊顶明架跌级铝扣板600*600厂家直销

易博仕铝天花吊顶明架跌级铝扣板600*600厂家直销

价格:38.00/平方米

供应易博仕c型铝条扣 防风铝条扣天花厂家直销

供应易博仕c型铝条扣 防风铝条扣天花厂家直销

价格:38.00/平方米

  • 头条资讯
  • 发表评论 | 0评
  • 评论登陆
  • 移动社区 建材风水 木板之家 电工之家 壁纸之家 净化之家 安防之家 水暖之家 洁具之家 窗帘头条 家饰之窗 老姚之家 灯饰之家 电气之家 全景头条 陶瓷之家 照明之家 防水之家 防盗之家 博一建材 卫浴之家 区快洞察 建材 郑州建材 周口建材 信阳建材 商丘建材 南阳建材 漯河建材 许昌建材 濮阳建材 焦作建材 新乡建材 鹤壁建材 安阳建材 洛阳建材 开封建材 武汉建材 天门建材 企业之家 驻马店建材 三门峡建材 平顶山建材 神农架建材 建材之家 720全景
    (c)2015-2017 BO-YI.COM SYSTEM All Rights Reserved