楊雪飛，黃洪彬

（黑龍江省水利水電勘測(cè)設(shè)計(jì)研究院，哈爾濱 150080）

在測(cè)繪儀器和測(cè)繪技術(shù)不斷進(jìn)步的今天，利用全站儀進(jìn)行全野外數(shù)據(jù)采集并手工連圖的工作模式仍然是各測(cè)繪單位采用的最普遍的。但是這種模式需要作業(yè)人員在外業(yè)現(xiàn)場(chǎng)繪制草圖，然后根據(jù)草圖連圖。本人在多年使用南方CASS成圖軟件的前提下，在軟件的功能和測(cè)量方法的指導(dǎo)下，為了方便本專業(yè)工作，而在南方軟件的基礎(chǔ)上，開(kāi)發(fā)了自動(dòng)連圖插件程序，現(xiàn)已在工作生產(chǎn)中廣泛應(yīng)用，并且收到了很好的效果!

1 設(shè)計(jì)目標(biāo)

利用AutoCAD VBA開(kāi)發(fā)自動(dòng)連圖程序，是基于CASS6.0成圖系統(tǒng)的一個(gè)插件用于簡(jiǎn)化全野外數(shù)據(jù)采集過(guò)程中的內(nèi)業(yè)連圖。其主要功能如下：

1）點(diǎn)狀地物全部自動(dòng)繪制。

2）現(xiàn)狀地物和面狀地物部分自動(dòng)繪制。

3）根據(jù)自己習(xí)慣修改CASS命令。

2 準(zhǔn)備工作

1）外業(yè)采集數(shù)據(jù)格式：測(cè)量點(diǎn)號(hào)，外業(yè)編碼，Y坐標(biāo)，X坐標(biāo)，Z坐標(biāo)。

如：14，TF7，10929.693，36632.507，10.458（TF 表示 7 層混凝土房）

2）建立數(shù)據(jù)庫(kù)如下：

?

庫(kù)中WY_CODE表示測(cè)量外業(yè)編碼，作業(yè)人員可根據(jù)自己的實(shí)際情況設(shè)置;CASS_CODE表示CASS系統(tǒng)下的地物編碼;DD_TYPE表示地物類型。

3 系統(tǒng)實(shí)現(xiàn)

本系統(tǒng)采用CAD VBA結(jié)合ACCESS數(shù)據(jù)庫(kù)。

3.1 分離野外數(shù)據(jù)

將帶編碼外業(yè)觀測(cè)數(shù)據(jù)分離出編碼，X，Y，Z坐標(biāo)以便在以后的自動(dòng)繪圖中用，主要代碼如下：

3.2 從數(shù)據(jù)庫(kù)中查詢出該點(diǎn)對(duì)應(yīng)的編碼和地物類型

代碼如下：

3.3 點(diǎn)狀地物可根據(jù)全部實(shí)現(xiàn)自動(dòng)繪制

實(shí)現(xiàn)該功能代碼如下：

說(shuō)明ptn表示外業(yè)采集數(shù)據(jù)中連續(xù)相同編碼的外業(yè)點(diǎn)數(shù);XYZ是存儲(chǔ)連續(xù)相同編碼的坐標(biāo)值。

由于某些點(diǎn)狀地物帶有方向，只需要將下一個(gè)點(diǎn)讀入作為其方向就行了。

3.4 地物的分類

在外業(yè)數(shù)據(jù)采集過(guò)程中線狀地物和面狀地物多數(shù)情況下，不會(huì)以地物為單位逐一采集的，因此不能自動(dòng)繪制完整地物。通常只是繪制地物的部分線段，再對(duì)改圖進(jìn)行編輯完成。根據(jù)地物是否需要擬合、閉合等特性，在繪制過(guò)程中可將地物分為7類。這里以搭車路為例，其對(duì)應(yīng)庫(kù)中的“l(fā)ine2”類型。以下為實(shí)現(xiàn)該功能的代碼：

3.5 代碼作業(yè)

很多作業(yè)員在編輯圖的時(shí)候習(xí)慣用鍵盤，而CASS提供的編碼又太長(zhǎng)。以下代碼就為作業(yè)員解決了這個(gè)問(wèn)題。

3.6 其它事項(xiàng)

為了作業(yè)員能從CAD命令行輸入命令可在CAD安裝目錄acad2000.lsp文件中加入以下代碼實(shí)現(xiàn)：

4 結(jié)束語(yǔ)

總之，我們要不斷擴(kuò)大對(duì)自己所應(yīng)用的軟件的開(kāi)發(fā)應(yīng)用。自己在實(shí)踐中總結(jié)出來(lái)的方法，才是最實(shí)用的，最有價(jià)值的方法。并且用科技的手段把在實(shí)踐中總結(jié)出來(lái)的方法應(yīng)用到實(shí)際工作中去，才能為社會(huì)創(chuàng)造更大的價(jià)值。我深信在大家的共同努力下我們的工作會(huì)變得更加快竭和方便!

[1]中國(guó)科學(xué)院希望高級(jí)電腦技術(shù)公司.REDLOG RED BOARD CAD軟件包實(shí)用指南[R].北京：中國(guó)科學(xué)院希望高級(jí)電腦技術(shù)公司，1990.

[2]南方測(cè)繪儀器有限公司.全站儀外業(yè)指南[R].廣州：南方測(cè)繪儀器有限公司，2005.