【摘要】大比例尺地圖在城市建設(shè)及鐵路、道路的修建上有著廣泛的應(yīng)用,傳統(tǒng)的數(shù)字化模式已經(jīng)被航空攝影測量所替代。數(shù)字?jǐn)z影測量工作站采集的數(shù)據(jù),其層碼與成圖要求不符,傳統(tǒng)的編輯模式比較落后,先查看采集數(shù)據(jù)代碼所代表的地物內(nèi)容,然后在CASS編輯軟件下進(jìn)行相應(yīng)編輯。VLISP能很便捷的解決這個(gè)數(shù)據(jù)轉(zhuǎn)換問題,使工作效率得到有效提高。
【關(guān)鍵詞】CASS;數(shù)據(jù)轉(zhuǎn)換;VLISP
引言
隨著攝影測量技術(shù)的飛速發(fā)展,原來只能使用數(shù)字化測量技術(shù)才能達(dá)到精度的1:2000和1:1000地形圖,現(xiàn)在都可以通過航空攝影測量來實(shí)現(xiàn)。使用航測的好處是成圖快,成本低,不受條件限制等優(yōu)點(diǎn)。
1.數(shù)字?jǐn)z影測量工作站數(shù)據(jù)采集格式
使用JX4 DPS數(shù)字?jǐn)z影測量工作站采集 1:2000、1:1000的大比例尺數(shù)據(jù),其模板和數(shù)據(jù)圖層以及編碼都是固定的格式,采集的數(shù)據(jù)都只是一些線劃圖和特定的符合,很難直接判讀這些線劃圖和符號所代表的地物要素,不可以直接拿來使用,需要在專業(yè)的成圖系統(tǒng)下進(jìn)行編輯,實(shí)現(xiàn)其使用價(jià)值。
2.數(shù)據(jù)編輯方法
CASS地形地藉成圖軟件是基于AutoCAD平臺技術(shù)的數(shù)字化測繪數(shù)據(jù)采集系統(tǒng)。廣泛應(yīng)用于地形成圖、地藉成圖、工程測量應(yīng)用三大領(lǐng)域,且全面面向GIS,徹底打通數(shù)字化成圖系統(tǒng)與GIS接口,使用骨架線實(shí)時(shí)編輯、簡碼用戶化、GIS無縫接口等先進(jìn)技術(shù)。自CASS軟件推出以來,已經(jīng)成長成為用戶量最大、升級最快、服務(wù)最好的主流成圖系統(tǒng)。CASS成圖系統(tǒng)的最大特點(diǎn)是操作簡單,易學(xué)。
傳統(tǒng)的編輯方式使用鼠標(biāo)選取每一個(gè)地物查看其圖層,如果所在圖層為“3102003”,則為居民地層,解決這個(gè)問題的方法有兩個(gè),其一就是先畫一條居民地的邊線,然后使用屬性刷改變所編輯地物的圖層及擴(kuò)展屬性。其二就是使用正確的命名重新畫一個(gè)房屋。如果所在圖層為“4401002”,則為大車路,解決的方法同上,區(qū)別在于大車路邊線有虛實(shí)之分,而且大車路的節(jié)點(diǎn)比較多,重新跟蹤一遍實(shí)現(xiàn)起來有很大難度。還有坎、柵欄、圍墻、河流、地類界等線狀地物實(shí)現(xiàn)跟蹤都很繁瑣。而且使用攝影測量工作站所采集的地物都不帶擴(kuò)展屬性。
3.實(shí)現(xiàn)數(shù)據(jù)自動轉(zhuǎn)換的方法
使用VLISP對攝影測量工作站采集的數(shù)據(jù)進(jìn)行數(shù)據(jù)轉(zhuǎn)換,使所采集的數(shù)據(jù)轉(zhuǎn)為正確的圖層、編碼、線型并添加相應(yīng)的擴(kuò)展屬性。節(jié)省了大量的數(shù)據(jù)跟蹤或使用屬性刷進(jìn)行數(shù)據(jù)編輯的工作量。進(jìn)行數(shù)據(jù)轉(zhuǎn)換最關(guān)鍵的環(huán)節(jié)在于如何改變現(xiàn)狀地物的線型及如何添加地物要素的擴(kuò)展屬性。初步采用CHPROP命令改變地物線型,使用APPEND和ENTMOD函數(shù)添加地物擴(kuò)展屬性。實(shí)現(xiàn)了數(shù)字?jǐn)z影測量工作站所采集地物與南方CASS的居民地層、獨(dú)立地物層、植被層、水系層、管線層等常用地物的一一對照。
3.1居民地層對照
(setq s1 (ssget \"x\" '((8 . \"21100,21103\"))))
(if s1
(progn
(setq n1 (sslength s1))
(setq i1 0)
(repeat n1
(setq a1 (ssname s1 i1))
(setq b1 (entget a1))
(setq b1 (subst (cons 8 \"居民地及設(shè)施\") (assoc 8 b1) b1))
(setq b1 (append b1 (list (list -3 (list \"SOUTH\" (cons 1000 \"141121\"))))))
(entmod b1)
;(command \"recass\" a1)
(setq i1 (+ i1 1))
)
)
)
3.2道路層對照
(setq s1 (ssget \"x\" '((8 . \"41100\"))))
(if s1
(progn
(setq n1 (sslength s1))
(setq i1 0)
(repeat n1
(setq a1 (ssname s1 i1))
(setq b1 (entget a1))
(setq b1 (subst (cons 8 \"交通及附屬設(shè)施\") (assoc 8 b1) b1))
(setq b1 (append b1 (list (list -3 (list \"SOUTH\" (cons 1000 \"161101\") (cons 1040 1.435))))))
(entmod b1)
;(command \"recass\" a1)
(setq i1 (+ i1 1))
)
)
)
3.3水系層對照
(setq s1 (ssget \"x\" '((8 . \"61120\"))))
(if s1
(progn
(setq n1 (sslength s1))
(setq i1 0)
(repeat n1
(setq a1 (ssname s1 i1))
(setq b1 (entget a1))
(setq b1 (subst (cons 8 \"水系及附屬設(shè)施\") (assoc 8 b1) b1))
(setq b1 (append b1 (list (list -3 (list \"SOUTH\" (cons 1000 \"181101\"))))))
(entmod b1)
(setq i1 (+ i1 1))
)
)
)
4.總結(jié)
通過VLISP語言獲取攝影測量工作站采集數(shù)據(jù),與南方CASS成圖系統(tǒng)的地物編碼一一對應(yīng),實(shí)現(xiàn)數(shù)據(jù)的自動轉(zhuǎn)換。該方法在生產(chǎn)中得到了廣泛的應(yīng)用,提高了工作效率和質(zhì)量,由于程序原代碼較長,論文只截取了原代碼的一部分,希望大家批評指正!
參考文獻(xiàn)
[1]陳伯雄,馮偉.Visual LISP 程序設(shè)計(jì)---技巧與范例.人民郵電出版社,2002.