引言

AutoCAD软件包是美国Autodesk公司推出的CAD软件，从AutoCAD第一版诞生到现在已有二十年的时间。AutoCAD是目前最流行的工程图形处理软件。由于它具有完善的绘图功能、良好的用户界面、易学易用等特点，因而被广泛应用于测绘、规划、设计、土地管理等行业。

2   AutoCAD使用中遇到的一些问题

    现今许多数字线划地形图的绘制有相当一部分都是基于AutoCAD二次开发的软件来绘制完成的。绘图软件读取从全站仪或RTK传出的数据，并展野外测点点号得到DWG图形，利用这些点号结合外业草图绘制数字线划地形图。此时绘出的线划标高大部分不为零，而且标高大小不等。在做高程点时，如果高程点密度不够，需复制高程点使其满足地形图对高程点的要求，复制的高程点需进行修改。使用RTK测地形高程时，如果控制点不足，RTK无法测的准确的实地高程，因此出现展出的测量高程与实地高程之间有一个固定常数（K）。综上所述，在数字化地形图制作中，高程问题经常出现，对数字化地形图中的高程进行修改是不可避免的。

3  在AutoCAD中修改高程的四种方法

通过对AutoCAD的使用、总结，结合实际遇到得问题，我们得出以下三种在AutoCAD中修改高程的方法。三种方法分别为单个修改方法、批处理修改方法、线划整体修改方法。其中批处理修改方法又分为利用AutoCAD中的命令和工具条进行手工批处理修改方法、利用在AutoCAD的命令行中输入命令批处理修改方法以及利用AutoCAD为用户提供二次开发工具进行编程进行批处理修改方法。

3.1 单个修改方法

①、打开特性窗口；

②、选择一个高程点或线划；

③、在“位置（起点、端点）Z坐标”或“标高”栏中输入正确的高程值；

④、选择下一个高程点或线划，重复第3步。

3.2 批处理修改方法

(1) 利用AutoCAD中的命令和工具条进行手工批处理修改方法.

①、将图幅中的其它层全部关闭或冻结，但除高程点所在的层外；

②、选择任意一个高程点（其高程为Z），同时任意画一条PL线；

③、打开特性窗口；

④、将PL线的“标高”值改为“K+Z”；

⑤、在AutoCAD命令行输入“move”，选择所有的高程点，捕捉先前所选的高程点为基点，PL线上的任意点为第二目标点进行移动操作。

操作结束后，查询其它点的高程值，就会发现所有点的高程值均在原有的基础上增加了一常数K。

(2) 利用在AutoCAD的命令行中输入命令批处理修改方法.

①、利用特性窗口的“快速选择”来选择符合条件的对象（也可以利用将图幅中的其它层全部关闭或冻结，但除高程点所在的层外）；

②、在AutoCAD命令行依次输入“move”、“all”、“0,0,0”、“0,0,K”。

操作结束后也能达到上述的目标。

(3) 利用AutoCAD为用户提供二次开发工具进行编程进行批处理修改方法.

本文的程序设计就是利用AutoLISP语言设计的。假定高程点所在的层为“GCD”。

程序清单：

(defun c:gcd(/k ssi pt pty ptx ptz0 ptm)

   (setq cmdecho(getvar “cmdecho”))

   (setvar “cmdecho”0)

   (command “-layer”“new”“gcd03-”“set”“gcd03-” “”)

(setq ssgcd(ssget“x”(list(cons0“point”)(cons8“gcd”)))

   (setqK(getdist“\nPlease Input  K:”))

   (if ssgcd

       (progn

          setq n (sslength ssgcd)

        n0 0

         )

         (repeat n

(setq ssi(ssname ssgcd n0))

(setq sse(entget ssi))

(setq pt(cdr(assoc 10 sse)))

(setq pty(car pt))

(setq ptx(cadr pt))

(setq pz0(caddr pt))

(setq ptz(+pz0 k))

(setq ptm(LIST pty ptx ptz))

(command“point”ptm“”)

(setq n0(+n0 1))

全文参见：pan.baidu.com/s/1o6O7LNG