贾玉琴

摘要：本文主要介绍如何利用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开发语言直接实现了在地形图编辑整饰过程中符号压盖的问题，极大的提高了地形图整饰的工作效率，节约人工成本。

（作者单位：天水三和数码测绘院）