1）绘图环境设置

例1　新建（创建）图层

该段程序的功能是新建图层并设定图层的颜色。层名可以是字母、数字和汉字，层的颜色使用255种AutoCAD颜色索引（ACI）颜色设置。常用的颜色号一般为1～7，分别对应为红、黄、绿、青、蓝、品红和白色。例如要创建一个控制点层（KZD），颜色设为红色，在AutoCAD中运行该程序的效果如图5-6所示。

图5-6　创建控制点层

2）房屋绘制

例2　房屋绘制（三点）

该程序的功能是根据给定的三点位置画出房屋图形，存放在″jmd″层，颜色号为″1″，如图5-7所示。图形（a）为未进行直角校正，直角校正的情况如图形（b）所示。

图5-7　房屋绘制

多点房、不规则房屋、棚房、建筑中房屋等的绘制都可以按照类似的方法实施。一般先获取房屋位置信息，设置图层（绘制房屋的层），然后用相应的线型绘制房屋图形。

3）碎部点展绘

碎部点展绘的基本内容包括标示出点的平面位置、给出点的标号或高程。绘制的思路是先获取碎部点位置信息（X，Y，H），设置图层（碎部点的层），然后绘制标示点位（一般可用点或小圆标示），并按要求注记点号或高程。

例3　单点碎部点计算与展绘（距离交会）

该程序的功能是完成距离交会计算并展绘点位与点号，存放在碎部点（SBD）层，在AutoCAD中运行该程序的效果如图所示，图5-8中33号点为展绘的碎部点。

角度交会、方向交会等单点都可以按同样思路实施。

图5-8　单点碎部点计算与展绘

例4　批量展绘碎部点程序（文件）

；该程序能打开碎部点文件，在屏幕上按点号展点，对碎部点文件的格式要求如下：

4）测量控制点符号绘制

大比例尺数字测图应表示的测量控制点包括三角点、小三角点、导线点、埋石图根点、不埋石图根点、水准点、卫星定位等级点及独立天文点8类符号。绘制的基本方法有直接法和图形库法两种，直接法是用测量控制点绘图程序在指定位置绘制控制点并完成相应的注记；图形库法是先将各类控制点图形按1∶1的比例绘制好形成图块，建立图库，使用时调入图块，按基点插入到相应位置即可。

例5　卫星定位等级点绘制（直接法）

该段程序用于交互式绘制单个控制点符号绘制，程序运行后，其效果如图5-9所示。

图5-9　控制点绘制

例6　批量测量控制点绘制（图形库法）

当测区范围大，控制点数量和类型较多时，可以采用批量测量控制点绘制方法。首先应建立控制点文件，该文件应包括点名、类别、平面坐标和高程信息，可以按表5-3格式组成，类别控制符、图块名可按表5-4形式定义。

表5-3　控制点数据文件结构形式

表5-4　各类控制点的类别定义

续　表

自动绘制时，根据每个点的类别信息确定控制点的类型，然后绘制相应的控制点符号，并注记点名与高程信息。若假定导线点的符号已经保存在相应的文件夹中，图块名为（dxd.dwg），绘制导线点时，根据类别信息（DXD）在图形库中调出图块（dxd.dwg），然后用插入命令（insert）将图块按指定基点插入，同时完成点名与高程信息的注记。

5）线状符号绘制

线状符号绘制是它们在一个延伸方向上有定位意义或能依比例表示，而宽度方向则不一定能依比例表示的地图符号。如围墙、栏杆、铁丝网、道路、管线、等高线及境界等，都要用线状符号来绘制。程序自动绘制的思路是先确定定位线，然后在其上配置线型或辅助符号（包括文字注记）。具体步骤是先设置图层（颜色、线型），根据定位线确定符号的中轴线，并配置符号。

例7　围墙的自动绘制

(www.daowen.com)

该段程序采用直接绘制符号的方法，未利用相关线型来实现线状符号绘制。实际绘图时，对于这些要素的绘制，可以先选择相应线型，然后用″pline″命令来绘制完成。

例8　加固陡坎绘制（利用已有线型）

运行该程序的效果如图5-10所示。

图5-10　加固陡坎示图

例9　等高线绘制

等高线绘制分为两种情况，一是大范围绘制等高线，二是局部（或单条）绘制等高线。对于大范围的等高线绘制，主要采用DEM方法来自动绘制等高线，单条等高线绘制一般采用手工交互方式完成。具体绘制时应注意首曲线、计曲线、间曲线和助曲线的线型与线宽问题，首曲线线宽0.15 mm，线型一般为实线（水下常定义为虚线）；计曲线线型与首曲线一致，线宽为0.3mm；间曲线和助曲线的线型为虚线（6个单位实线，1个单位长空白），线宽为0.15mm。在加固陡坎绘制程序的基础上，稍作修改即可完成单条等高线的绘制，具体程序代码如下：

6）面状符号绘制

数字测图中，面积符号主要用于植被和土质符号的配置。面积符号的使用，一般分为两种情况，一是小范围的面积符号配置，另外是大范围的面积符号配置。对于小范围的面积符号配置，可以插入符号块的方法，手工交互完成，较大范围时，一般应采用程序方法来完成面积符号绘制。具体步骤是先定义好填充图案，确定面积符号范围，一般用“pline”命令画线形成闭合区域，然后用autocad的“hatch”命令完成面积符号绘制。

在命令提示下输入“＿hatch”，将显示命令行提示：

指定内部点或［特性（P）／选择对象（S）／绘图边界（W）／删除边界（B）／高级（A）／绘图次序（DR）／原点（O）］：交互输入相应选项即可完成面积符号的自动配置，整个过程可以用如下的lisp程序来自动完成，其效果如图5-11所示。

图5-11　面积符号绘制

例10　面积符号绘制

；本例中，“1111”为图案名，“1”为指定图案缩放比例，“0”为指定图案角度。

7）文字与高程注记

数字测图中的注记内容主要包括说明文字注记、高程点和比高注记等。文字注记包括地理名称注记、说明注记和各种数字注记。注记字大以毫米（mm）为单位，字级级差为0.25mm，数字字大在2.0毫米（mm）以下时，字级级差为0.2 mm。注记字列分水平、垂直、雁行和屈曲字列。字间隔按接近、普通、隔离字隔三种方式执行，接近字隔的间隔大小为0mm～0.5mm，普通字隔的间隔大小为1.0mm～3.0mm，隔离字隔的间隔大小字大的2～5倍。字体一般采用等线体。

高程点注记要确定高程点的施测位置，一般为0.6mm的实心圆，高程值注记在点位的右侧或适当位置。高程值的取位依比例尺而定，一般取位至0.1m～0.01m。

例11　文字与高程注记

该程序完成高程点的注记。“style”命令的相关参数按以下顺序设置：在“输入要列出的文字样式”提示下输入样式名，将显示样式的名称、字体文件、高度、宽度比例、倾斜角和生成方式，并退出命令。输入星号（＊）或按ENTER键显示高度、宽度比例、倾斜角以及每种样式的生成方式（反向、颠倒、垂直或普通的文字绘制方式），然后退出此命令。

8）工程图绘制

纵横断面图绘制是工程测量的重要成果，其绘制方法基本相同。对于数量较多时，断面测量的数据一般是用文件形式组织，用lisp程序来自动完成断面图绘制，例题12运行后，其效果如图5-12所示。

该程序能打开断面数据文件，按1∶100的比例尺绘制断面图，并注记断面点到中桩的距离与高程。对横断面数据文件的格式要求如下：

文件中，中桩的距离输入“0”，其他点从左到右输入，并规定左边为负，右边为正。纵断面数据格式与横断面数据文件的格式类似，格式如下：

图5-12　横断面图

例12　绘制断面图

9）栅格影像图定向

在原图数字化时，栅格影像图插入后，一般都会出现图5-13所示情况，即图像的位置、大小和方向不正确，需要校正，此过程称为栅格影像图定向。用例题13的LISP程序，能自动完成该过程。将扫描图像插入CAD，利用该程序对图像定向后就可以在CAD中进行矢量化作图，是一个很实用的小程序。

图5-13　未定向栅格影像图

例13　栅格影像图定向