AUTOCAD中自動(dòng)批量修改圖形文件的程序一、概述在工程CAD繪圖中，常常會遇到下列棘手的問題在施工圖后期，大部分圖形文件都已完成，但因某一條件的變化，需在某卷圖中增加或減少一些圖紙，這將導(dǎo)致許多相關(guān)圖形文件的內(nèi)容不得不進(jìn)行相應(yīng)的修改如高層代號、圖紙編號等。在實(shí)際工程設(shè)計(jì)中，為了提高效率，60的圖形是通過修改已有的設(shè)計(jì)而形成新的圖形，這時(shí)常常進(jìn)行一些重復(fù)性的工作，比如圖框的替換、設(shè)備元器件的變更等，有時(shí)，要幾張圖，甚至幾十張圖做同樣的修改。對于上述情況，過去一般的作法是將每一圖形文件調(diào)出來，逐一修改。在圖幅比較大時(shí)，只能反復(fù)使用ZOOM命令，當(dāng)所涉及的圖形文件較多時(shí)有時(shí)會有幾百個(gè)，采用手動(dòng)操作，其工作量非常大，而且大部分操作都是重復(fù)性的工作，長時(shí)間操作很容易發(fā)生混淆和遺漏，不但效率低，圖紙質(zhì)量又不能保證。能否將這些重復(fù)性的工作讓計(jì)算機(jī)來完成呢AUTOCAD是圖形設(shè)計(jì)的通用軟件，它為各種專業(yè)用的CAD提供了盡可能多的圖形編輯功能，但很難實(shí)現(xiàn)自動(dòng)化作圖的功能。在實(shí)踐中我們用C語言編寫了CHSCR應(yīng)用程序，采用該程序設(shè)計(jì)人員只需編寫一個(gè)簡單的命令文件CHSCR和要處理的文件表FILETAB，經(jīng)過CHSCREXE應(yīng)用程序轉(zhuǎn)換，形成一個(gè)可以處理FILETAB所列出的所有文件的CHGESCR命令文件。然后利用AUTOCAD的SCRIPT命令，就可使計(jì)算機(jī)按命令自動(dòng)批量修改圖形并存盤或生成PLT繪圖文件。由于采用了易于為非專業(yè)編程人員所接受的SCR文件方式來編寫命令CHSCR，使用非常方便。二、如何使用CHSCR1創(chuàng)建CHSCR命令文件CHSCR文件的內(nèi)容是由AUTOCAD的命令和響應(yīng)序列所組成的ASC文件，是可在AOTUCAD編輯狀態(tài)下執(zhí)行的文本文件。CHSCR包含了可在指定圖形中自動(dòng)重復(fù)執(zhí)行命令序列。例把圖形文件C80001C80098中的圖紙編號2066DD3改變2087DD2。高層代號C13改為D24，設(shè)備型號DZ20改為C45AD。在DOS狀態(tài)下用文本編輯軟件建立CHSCR文件CHTEXT_ALL_2066DD32087DD2CHTEXT_ALL_C13D24ENTERCHTEXT_ALL_DZ20C45ADENTERPLOTENTERENTERENTER其中_代表一個(gè)空格ENTER代表回車CHTEXT修改圖中文字的LISP程序AOTOCAD中文字修改功能較弱，AUTOCADR120中曾加了DDEDIT修改文字命令，但只能用鼠標(biāo)器手工修改，且一次只能改一個(gè)字符串不適用程序化操作。因此，在編寫SCR命令文件時(shí)我們采用了修改圖中文字的LISP程序CHTEXTLSP其清單附后。將其裝入ACADLSP后，只要鍵入CHTEXT，就可按漢字提示使用，它一次可以修改多個(gè)字符串。當(dāng)編寫命令文件時(shí)，必須考慮每條AUTOCAD命令中的所有響應(yīng)和提示。命令文件中的每個(gè)空格都是有意義的，因?yàn)锳OTUCAD將它看作回車，所以不能隨意增減。如果不需要輸出PLT繪圖文件，PLOT后面四行可以不要。CHSCR有兩個(gè)作用如果需要修改的圖形文件較少，可以在ACAD中通過SCRLPT命令直接調(diào)用CHSCR?？梢栽贏CAD中通過SCRIPT命令試運(yùn)行一次，看是否有錯(cuò)。在ACAD命令狀態(tài)下，鍵入以下命令即可按CHSCR文件要求，對當(dāng)前圖形完成所需的修改。COMMANDSCRIPTSCRIPTFILECH當(dāng)所涉及的圖形文件較多時(shí)十幾個(gè)以上，采用手動(dòng)操作，將每一圖形文件調(diào)出來，逐一修改，效率太低。因此建議采用以下步驟，使計(jì)算機(jī)按命令自動(dòng)批量修改圖形文件。2建立圖形文件表FILETAB創(chuàng)建完CHSCR后，下一步應(yīng)把需要修改圖形文件名DWG存入FILETAB中例如C80001C80002C80003C800983編譯生成CHGESCR文件當(dāng)具備CHSCR試運(yùn)行正常后和FILETAB文件后，就可以進(jìn)行編譯工作，在DOS狀態(tài)下鍵入CHSCRENTER即開始編譯，若編譯出現(xiàn)問題，系統(tǒng)會給出相應(yīng)的提示，編譯完成后，你會發(fā)現(xiàn)目錄中多了一個(gè)CHGESCR文件自動(dòng)修改圖形的文本文件。CHSCREXE其功能是配制SCR文件格式的命令字符串并調(diào)入相關(guān)的繪圖參數(shù)源程序用C語言編寫，清單附后。當(dāng)ACAD輸出PLT文件時(shí)，如果發(fā)現(xiàn)有對應(yīng)圖形的PLT文件，將提示出是否覆蓋掉它，這將引起SCRIPT命令中斷運(yùn)行。為此在CHSCREXE中，我們是這么處理的當(dāng)程序發(fā)現(xiàn)有相應(yīng)圖形的PLT文件，將自動(dòng)把它刪除掉，并在屏幕上顯示出對應(yīng)的信息。經(jīng)CHSCREXE所生成的CHGESCR文件OPENYC80001CHTEXTALL2066DD32087DD2CHTEXTALLC13D24CHTEXTALLDZ20C45ADPLOTSAVEOPENYC90098CHTEXTALL2066DD32087DD2CHTEXTALLC13D24CHTEXTALLDZ20C45ADPLOTSAVEQUITY4執(zhí)行SCRIPT命令在ACAD中通過SCRIPT命令直接調(diào)用CHGESCRCOMMANDSCRIPTCHGE啟動(dòng)AUTOCAD時(shí)從操作系統(tǒng)提示符處輸入以下正文CACADSCRIPTCHGE三、程序的安裝1將CHTEXTLSP裝入ACADLSP中。2用通用C編譯器將CHSCRC編譯成可執(zhí)行程序CHSCREXE，將其拷貝到CAD可找到的目錄下。程序CHSCREXE適用于AUTOCADR110、R120。四、結(jié)束語以上所舉例僅是該程序應(yīng)用的一個(gè)簡