AutoLISP语言在铁路工程物探成果图绘制中的应用

2015-03-17张吉

铁道勘察 2015年3期

关键词：断面图图例图层

张　吉

(铁道第三勘察设计院集团有限公司，天津　300142)

The Application of AutoLISP in Railway Engineering Geophysical Exploration Results Map Drawing

ZHANG Ji

AutoLISP语言在铁路工程物探成果图绘制中的应用

张吉

(铁道第三勘察设计院集团有限公司，天津300142)

The Application of AutoLISP in Railway Engineering Geophysical Exploration Results Map Drawing

ZHANG Ji

摘要采用AutoLISP语言开发出具有铁路工程物探勘察特点的物探成果图自动绘制程序，实现铁路物探成果断面图框自动绘制。本程序具有使用方便、输出标准的特点，可有效提高绘图效率，同时实现铁路工程物探勘察成果图式、图例及符号标准化。

关键词物探成果图AutoLISP

铁路工程物探成果图一般包含物探断面、地形及地质、高程标尺等信息，正式的成果图还应包含图框、图名、图例、说明、责任栏等组成部分。目前，物探断面图一般由物探数据处理软件自动生成，图框、图例、责任栏及高程标尺等诸多信息都需要手工绘制。按照标准化成图要求，不同组成部分的字体、字号、线形、线宽等要求不同，同时又要求将不同内容置于对应图层，上述绘制过程繁琐复杂。为提高绘图效率，适应铁路标准化成图需要，采用AutoLISP语言编制物探成果自动成图系统，实现图框、责任栏等部件自动生成。

1开发环境简介

AutoLISP是由Autodesk公司开发的一种LISP程序语言，既具有一般高级语言的基本结构和功能，又具有一般高级语言所没有的强大图形处理功能及表处理功能，是AutoCAD二次开发的一种重要工具。

2程序设计

2.1　系统模块

依据不同功能，将程序划分成不同的模块，模块设置及其功能如下。

(1)数据读取模块：读取含有里程及高程信息的地形文件，文件为明码格式，共含两列，第一列为里程，第二列为对应点的高程，两列之间用逗号或空格隔开。

(2)绘图信息输入模块：在CAD命令框中依据提示输入比例尺、绘图深度等信息。

(3)地形信息及图框尺寸计算模块：依据断面各地形点高程、绘图比例尺等，计算图幅尺寸、地形点、图框、责任表等要素的图上坐标。

(4)图层管理模块：依据物探标准化成图要求，建立各图层，并分别设置默认线形、线宽、字体等参数。

(5)绘图模块：依次绘制地面线、图名、图例、说明、图框、责任栏等图件要素。

2.2　程序运行过程

本程序的运行过程依据上述系统模块分步进行，首先在AutoCAD程序中加载编译好的程序文件“MarkHight.fas”；其次在AutoCAD的命令行中输入程序命令“mh”，在弹出的文件选择对话框中选择需要绘图的高程文件；依据程序提示输入横向比例尺、纵向比例尺、断面绘图深度、断面图底部类型、高程标注间隔以及整公里前缀字符等信息，程序将依据上述绘图信息自动绘制物探成果断面图。

图1为程序命令交互界面，显示程序调用及绘图参数输入过程；图2为本程序绘制的完整物探断面成果图，包含图框、图名、图例、说明、责任栏及物探断面框等要素。在实际使用过程中，只需将专业物探软件生成的对应比例尺物探断面成果插入到本程序生成的物探断面框中即可，在各自位置写入说明及物探解释文字内容，必要时亦可手工修改图名、图号等信息。本程序已经自动设置好字体、字号、图层等信息，在改动过程中只需关注文字内容。

图1　程序运行命令交互界面

图2　程序绘图成果

3关键代码实现

3.1　图层管理及字体设置

图层的生成及字体分别采用AutoCAD自带的“layer”及“style”命令设置，在AutoLISP环境下采用“command”命令调用并传递相关参数，生成的图层如图3所示，程序代码如下：

(command "layer" "m" "物探解释" "c" "red" "" "l" "DASHED" ""

"m" "修改意见" "c" "blue" "" "m" "物探底图" "m" "绘图边框" "")

(command "style" "宋体" "宋体" "" "0.8" "0" "n" "n" "n" "")

图3　自动生成的图层及其特性

3.2　各地形点图上坐标计算

本程序将外边框左下角作为原点，水平向右为横坐标正向，竖直向上为纵坐标正向。依据标准化成图要求，各地形测量点的横坐标主要由以下几部分决定：装订线(15 mm)、页边距(5或10 mm)、绘图偏移量(一般为45 mm)、依据比例尺计算的横坐标增量。纵坐标在计算过程中不必设置装订线，但要考虑因绘图深度引起的纵坐标变化。