賈玉琴

摘要：本文主要介紹如何利用Visual LISP編程語(yǔ)言快速、準(zhǔn)確的查找出地形圖編輯整飾過(guò)程中的植被符號(hào)壓蓋并自動(dòng)處理，從而提高工作效率，節(jié)約人工成本。

關(guān)鍵詞：Visual LISP；地形圖整飾；

隨著我國(guó)國(guó)民經(jīng)濟(jì)的飛速發(fā)展和城鎮(zhèn)化建設(shè)規(guī)模的日益擴(kuò)大，近年來(lái)，城市測(cè)量工作在城市發(fā)展中的作用越來(lái)越突出，而地形圖的應(yīng)用也越來(lái)越廣泛，地形圖可以精確反映待建區(qū)域的地形地貌，為城市規(guī)劃、工程建設(shè)、政府決策提供詳盡的基礎(chǔ)數(shù)據(jù)。

在日常工作中我們用到的地形圖編輯軟件主要是在AutoCAD 軟件進(jìn)行二次開(kāi)發(fā)的軟件，目前行業(yè)使用廣泛、知名度很高的數(shù)字測(cè)圖軟件包括南方cass測(cè)圖系統(tǒng)，廣州開(kāi)思測(cè)圖系統(tǒng)都是在AutoCAD上面進(jìn)行二次開(kāi)發(fā)的，這些軟件滿足了測(cè)繪行業(yè)數(shù)字測(cè)繪的需要。但在實(shí)際生產(chǎn)中，還需要開(kāi)發(fā)一些有針對(duì)性的功能，以提高工作效率，滿足工作需求。比如說(shuō)在地形圖實(shí)際作業(yè)中，地形圖編輯整飾的過(guò)程中，植被符號(hào)壓蓋一直是一個(gè)頭疼的問(wèn)題，傳統(tǒng)的做法一直是通過(guò)人工干預(yù)，逐一找出植被符號(hào)壓蓋點(diǎn)，然后在繪圖軟件里面人工手動(dòng)修改，這樣不僅費(fèi)時(shí)、費(fèi)力，而且還容易遺漏和重復(fù)工作。故筆者利用Visual LISP編程語(yǔ)言實(shí)現(xiàn)了對(duì)地形圖編輯過(guò)程中植被符號(hào)壓蓋問(wèn)題的自動(dòng)分析、自動(dòng)處理，極大的提高了工作效率。

1.Visual LISP程序語(yǔ)言的介紹

Visual LISP是AutoCAD自帶的一個(gè)集成的可視化Autolisp開(kāi)發(fā)環(huán)境，最早的Autolisp程序需要用文本編輯工具編輯，然后在AutoCAD加載調(diào)試，很不方便。從AutoCAD2000開(kāi)始，有了集成的開(kāi)發(fā)環(huán)境：Visual LISP。作為開(kāi)發(fā)工具，Visual LISP提供一個(gè)完整的開(kāi)發(fā)環(huán)境（ide），包括編輯器、調(diào)試器，可以實(shí)時(shí)調(diào)試Autolisp命令，定義AutoCAD的效率，使用lisp+Open DCL

能夠輕松實(shí)現(xiàn)基于CAD平臺(tái)的交互輸入與輸出，功能強(qiáng)大，通俗易懂。

2.程序設(shè)計(jì)思路

如圖1所示，首先我們定義植被符號(hào)的輸入符號(hào)最小矩形框加常數(shù)值，通常把它設(shè)置成0.2米，成立個(gè)選擇集，選擇植被符號(hào)，然后獲取每個(gè)植被符號(hào)的坐標(biāo)點(diǎn)，根據(jù)坐標(biāo)值分析符號(hào)東、東南、南、西南、西、西北、北、東北八個(gè)方向的地物，自動(dòng)實(shí)現(xiàn)植被符號(hào)移動(dòng)修改處理，統(tǒng)計(jì)修改的壓蓋地物的植被符號(hào)個(gè)數(shù)。

程序代碼如下：

本文利用簡(jiǎn)單易學(xué)的Visual LISP開(kāi)發(fā)語(yǔ)言直接實(shí)現(xiàn)了在地形圖編輯整飾過(guò)程中符號(hào)壓蓋的問(wèn)題，極大的提高了地形圖整飾的工作效率，節(jié)約人工成本。

（作者單位：天水三和數(shù)碼測(cè)繪院）