賈玉琴

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

關鍵詞：Visual LISP；地形圖整飾；

隨著我國國民經濟的飛速發展和城鎮化建設規模的日益擴大，近年來，城市測量工作在城市發展中的作用越來越突出，而地形圖的應用也越來越廣泛，地形圖可以精確反映待建區域的地形地貌，為城市規劃、工程建設、政府決策提供詳盡的基礎數據。

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

1.Visual LISP程序語言的介紹

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

能夠輕松實現基于CAD平臺的交互輸入與輸出，功能強大，通俗易懂。

2.程序設計思路

如圖1所示，首先我們定義植被符號的輸入符號最小矩形框加常數值，通常把它設置成0.2米，成立個選擇集，選擇植被符號，然后獲取每個植被符號的坐標點，根據坐標值分析符號東、東南、南、西南、西、西北、北、東北八個方向的地物，自動實現植被符號移動修改處理，統計修改的壓蓋地物的植被符號個數。

程序代碼如下：

本文利用簡單易學的Visual LISP開發語言直接實現了在地形圖編輯整飾過程中符號壓蓋的問題，極大的提高了地形圖整飾的工作效率，節約人工成本。

（作者單位：天水三和數碼測繪院）