摘 要：隨著AutoCAD在測繪制圖中廣泛的應(yīng)用，利用AutoCAD定制實(shí)現(xiàn)航測調(diào)繪的數(shù)字化生產(chǎn)。本文主要分析了航測調(diào)繪中的不依比例尺、半依比例尺和依比例尺地物符號(hào)的清繪要求，利用AutoCAD定制實(shí)現(xiàn)快速和規(guī)范地完成航測調(diào)繪。
　　關(guān)鍵詞：AutoCAD 定制 航測 調(diào)繪
　　中圖分類號(hào)：P2文獻(xiàn)標(biāo)識(shí)碼：A文章編號(hào)：1672-3791（2012）09（a）-0001-02
　　航測調(diào)繪過去是采用小筆尖加玻璃棒進(jìn)行繪制的，根據(jù)比例尺縮放其尺寸，其作業(yè)時(shí)的速度、出錯(cuò)率以及可修改性等是重點(diǎn)關(guān)注的要素。這里利用AutoCAD定制，通過Visual LISP程序的開發(fā)，達(dá)到快速和規(guī)范地完成航測調(diào)繪的目的。
　　1 分析與實(shí)現(xiàn)
　　1.1 分析
　　AutoCAD是已經(jīng)廣泛應(yīng)用于測繪、房地產(chǎn)施工圖設(shè)計(jì)以及機(jī)械等繪圖領(lǐng)域。通過AutoCAD定制，可以在航測調(diào)繪清繪中省時(shí)、省力、較好地完成。在AutoCAD中，可以將不依比例尺符號(hào)按圖式的要求做成塊，需要時(shí)插入塊，即可完成清繪；對(duì)于半依比例尺或依比例尺地物符號(hào)可以用手工方法或利用AutoCAD二次開發(fā)的形式半手工方法進(jìn)行。
　　1.2 實(shí)現(xiàn)
　　以數(shù)字正攝影像圖（DOM）為藍(lán)本，噴繪出適當(dāng)比例尺的DOM作為航測調(diào)繪的工作底圖，利用AutoCAD平臺(tái)進(jìn)行清繪。通過AutoCAD編輯和對(duì)它的二次開發(fā)，完成航測調(diào)繪的清繪工作。
　　1.2.1 不依比例尺地物的清繪
　　不依比例尺地物在航測調(diào)繪中只用符號(hào)表示。按要求預(yù)先在AutoCAD中繪制好各種符號(hào)，設(shè)置其插入的坐標(biāo)（一般以0，0，0坐標(biāo)設(shè)定在符號(hào)的對(duì)稱中心或底部中心），并保存為塊或文件。需要時(shí)把相應(yīng)的塊或文件插入AutoCAD中，歸入相應(yīng)的地物層，按相應(yīng)的比例尺縮放；如插入的符號(hào)需要旋轉(zhuǎn)的，加以旋轉(zhuǎn)即可（如灌木叢），如圖1。
　　1.2.2 半依比例尺地物、依比例尺地物的清繪
　　航測調(diào)繪中，除了不依比例尺地物外，還有線狀地物、面狀地物等半依比例尺和依比例尺地物。
　?。?）線狀地物。
　　一般線狀地物，如道路、水系、管線、籬笆、欄桿、坎、境界等。
　　1）對(duì)于類似境界、籬笆、欄桿、坎等地物，可以先設(shè)置線型，然后利用AutoCAD的內(nèi)置命令“LINE”或者“PLOYLINE”，如果畫出后是反向，則可以寫將其反向的程序，用“entget”函數(shù)取得其序列號(hào)中的坐標(biāo)串、用“subst”函數(shù)將其替換和“entmod”函數(shù)進(jìn)行刷新，并保留其原來的其它屬性值。操作方法是：①LINE：將LINE的兩個(gè)端點(diǎn)分別取出并用“ subst newitem olditem list”函數(shù)進(jìn)行替換。點(diǎn)1的坐標(biāo)換成點(diǎn)2的坐標(biāo)，點(diǎn)2的坐標(biāo)換成點(diǎn)1的坐標(biāo)，最后用“entmod elist”進(jìn)行刷新，如圖2a。②PLOYLINE：將PLOYLINE的各個(gè)頂點(diǎn)和圓弧參數(shù)取出分別存在各個(gè)集合中，并求出頂點(diǎn)的個(gè)數(shù)n，以循環(huán)頂點(diǎn)的個(gè)數(shù)n次的方式，按逆序的方法取出頂點(diǎn)坐標(biāo)和圓弧參數(shù)，再用“subst newitem olditem list”函數(shù)進(jìn)行替換，直至替換完畢，最后用“entmod elist”進(jìn)行刷新，如圖2b。
　　2）對(duì)于無法直接用AutoCAD的內(nèi)置命令加線型繪出的地物，如管線、交通、柱廊等，則應(yīng)寫出相應(yīng)的子程序來完成。以繪制鐵路為例，提示操作員繪出曲線，按設(shè)計(jì)的間隔距離依次取出曲線所有坐標(biāo)，并進(jìn)行曲線擬合后繪出光滑曲線。根據(jù)所給出的鐵路寬度，分別繪出兩邊平行線，并刪除原曲線；再依據(jù)填黑的間隔對(duì)兩邊線進(jìn)行分段，繪出垂線。循環(huán)地間隔一段進(jìn)行填充，即完成鐵路的繪制。
　?。?）面狀地物。
　　航測調(diào)繪中，另一個(gè)側(cè)重點(diǎn)就是一些類似斜坡、臺(tái)階等面狀地物。AutoCAD中，無法用其內(nèi)置命令一次性較好地完成。利用AutoCAD的二次開發(fā)，可以完成面狀地物清繪，下面以斜坡和臺(tái)階為例介紹。
　?、傩逼?。
　　先計(jì)算曲線的長度。先計(jì)算出曲線端點(diǎn)的參數(shù)，函數(shù)為“setq dist_end vlax-curve-getEndParam object”，然后計(jì)算出曲線從開始到指定參數(shù)的曲線段的長度，函數(shù)為“setq dist（vlax-curve-getDistAtParam object dist_end）”。然后依據(jù)AutoCAD自動(dòng)偵測到圖形比例尺，確定長短斜坡坎線間隔，計(jì)算出斜坡坎線的大概數(shù)；并進(jìn)行比較取出適當(dāng)數(shù)，計(jì)算間隔。再分別計(jì)算各條斜坡坎線出坡頂、坡底的坐標(biāo)。函數(shù)為“setq xy（vlax-curve-getPointAtDist object（ * 5 nn））”，式中的nn為第幾條斜坡坎線，5為每5m繪制一條斜坡坎線，也可改為其它數(shù)值。同時(shí)計(jì)算出方位角和距離，計(jì)數(shù)器為奇數(shù)時(shí)直接繪出直線；當(dāng)計(jì)數(shù)器為偶數(shù)時(shí)，取距離為原距離的1/3，計(jì)算另一點(diǎn)的坐標(biāo)，繪出直線直至繪制完畢。最后當(dāng)繪制出的斜坡扭曲時(shí)，刪除原繪制的直線，將斜坡底線按（1）中線狀地物中的反向后，重復(fù)第三步即可完成斜坡的修正。如圖3a的斜坡。
　?、谂_(tái)階
　　臺(tái)階與斜坡的設(shè)計(jì)理念類似，只是將繪制斜坡坎線換成繪制臺(tái)階的級(jí)階線。如果扭曲，處理方法和斜坡扭曲相似。如圖3b。
　　1.2.3 線型
　　有些線狀地物無須進(jìn)行程序設(shè)計(jì)時(shí)，可通過對(duì)線型設(shè)計(jì)繪制出相應(yīng)的圖形。但AutoCAD的線型文件“acad.lin”、“acadiso.lin”中，線型往往不能滿足地形圖圖式中的要求，解決的辦法就是向其文件中寫入一些需要的線型，以供繪圖需要時(shí)調(diào)用。
　　1.2.4 其它
　　（1）符號(hào)的填充。
　?、俜课?、街區(qū)等區(qū)域填充斜陰影線等符號(hào)。
　　地形圖圖式要求超高層房屋區(qū)要用斜陰影線填充。將超高層房屋區(qū)用真實(shí)坐標(biāo)的封閉區(qū)間線圈出，用“BHATCH”命令調(diào)用邊界圖案填充，選擇好要填充的樣例和比例，再選擇封閉線，即可完成斜陰影線的填充。
　　②植被、地貌區(qū)域填充符號(hào)。
　　一些植被、地貌區(qū)域需要用符號(hào)均勻、成品字形填充，在圖上的間隔是橫、縱向均為5.0mm。AutoCAD內(nèi)部命令一般無法快速完成，需要進(jìn)行程序設(shè)計(jì)以達(dá)到快速、準(zhǔn)確的目的。這里假設(shè)有個(gè)封閉多邊形不規(guī)則區(qū)域需要填充。
　　設(shè)計(jì)思路：取出各頂點(diǎn)的坐標(biāo)X，Y存在不同表中，用函數(shù)“min”和“max”求出所有頂點(diǎn)的X、Y值的最大、最小值。接著用X、Y值的最大、最小值設(shè)定一個(gè)矩形，并以Xmin，Ymin為起始點(diǎn)，以5.0mm×比例尺的間距進(jìn)行填充，并把填充地物添加到一個(gè)表list1中，直至完畢。然后用全部頂點(diǎn)建立的表搜索封閉多邊形不規(guī)則區(qū)域中填充的地物，分別添加到另一個(gè)表list2中。再循環(huán)地取出表list1中的地物，與表list2對(duì)照，判斷其是否在表list2中，如果不在其中，放在表list3中。最后所有表list3的地物都屬不在封閉多邊形不規(guī)則區(qū)域內(nèi)，將其全部刪除，即完成填充。
　　（2）河流名稱的注記。
　　河流名稱的注記，需用斜體字標(biāo)注。如“閩江”，利用“properties”命令，在其屬性中進(jìn)行修正。設(shè)計(jì)思路：設(shè)置圖層，寫入注記“閩江”，取出其序列中的“（51.0.0）”，向西傾斜15度，則需改為“（51.6.02139）”；用函數(shù)“（subst newitem olditem list）”進(jìn)行替換，并用“（entmod elist）”進(jìn)行刷新。
　　2 結(jié)語
　　利用AutoCAD定制優(yōu)質(zhì)高效地完成航測調(diào)繪工作，有利于外業(yè)工作人員更進(jìn)一步了解內(nèi)業(yè)成圖方法和對(duì)正射影像圖的識(shí)別，從而實(shí)現(xiàn)航測內(nèi)外業(yè)一體化工作。
　　參考文獻(xiàn)
　　[1] 康博.中文版AutoCAD 2002/2000 Visual LISP開發(fā)指南，2001，8.
　　[2] 國家技術(shù)監(jiān)督局GB/T20257.2-2006國家基本比例尺地圖圖式第2部份1∶5000 1∶10000地形圖圖式，2006.
　　[3] 國家技術(shù)監(jiān)督局.GB/T13977-92 1∶5000.1∶10000地形圖航空攝影測量外業(yè)規(guī)范，199