doi： 10． 3969 /j． issn． 1001 － 358X． 2014． 02． 13
基
于
AutoLisp
程序实现铁路的自动绘制
*
刘
吉波
，
吕小龙
，
马旺猛
，
王 潇
，
王宏达
，
苏 萍
，
田 珺
（
中国矿业大学
（
北京
）
地球科学与测绘工程学院
，
北京
100083）
摘要
：
在利用
AutoCAD
绘制工程图件特别是各种矿山图件的过程中
，
经常需要绘制铁路符号
，
而这
一直是矿山
CAD
绘图的难点
。
文中利用
AutoLisp
程序设计语言实现了在
CAD
工程图中自动绘制
铁路的功能
，
极大地提高了绘图效率
。
关键词
： AutoCAD
制图
； AutoLisp；
铁路绘制
中图分类号
： P209
文献标识码
： B
文章编号
： 1001 － 358X（ 2014）
02 － 0038 － 04
*
基
金 项 目
： 1、
中 国 矿 业 大 学
（
北 京
）
大 学 生 创 新 训 练 项 目
（ Y20131209）
； 2、
中
国 矿 业 大 学
（
北 京
）
大 学 生 创 业 训 练 项 目
（ 201311413059）
； 3、
中
国矿业大学
（
北京
）
课程建设与教学改革项
目
（ k120202）
在
利用
AutoCAD
进行矿山等各种工程图件的绘
制过程中
，
经常会遇到铁路符号的绘制问题
，
而这个
问题一直没有得到很好的解决
。
本文利用
AutoCAD
本身提供的二次开发工具
AutoLisp
语言编写了绘制
铁路的
Lisp
程序
，
从而实现了铁路符号的自动绘制
，
极大方便了工程图的绘制
。
1
开发平台简介及选择
AutoCAD
是
Autodesk
公司开发的通用计算机辅
助绘图与设计软件
，
具有界面简洁
、
易于上手
、
功能
强大及开放的体系设计等优点
，
可满足不同层次的
设计和工程人员的需求
，
深受用户喜欢
。
在矿山测
量中引入
CAD，
使工程技术人员从繁琐的传统纸张
绘图中解放出来
，
极大的提高了绘图精度和效率
。
但在利用
CAD
绘图过程中
，
经常有繁琐的重复性操
作
。
利用
AutoCAD
所提供的二次开发工具
，
编程实
现相关的特定功能
，
实现自动或半自动绘图
，
可极大
的减少用户的工作量
，
提高工作效率
［1 － 4］
。
AutoCAD
二次开发的主要方式有三种
： Autolisp、
ADS、AＲX。ADS
是
一个带有
Autodesk
提供的库文
件和头文件的
C
语言编程环境
。ADS
程序具有保密
性好
，
运行速度快的优点
，
但是要编写
ADS
应用程
序
，
用户既要熟悉
AutoCAD
的内部命令
，
同时要精通
C
语言
，
对用户的要求较高
。AＲX
是面向对象的
AutoCAD
二次开发工具
，
可直接调用
AutoCAD
的内
部函数
，
开发环境是基于强大的
Visual C + +
开发平
台
。
但
AＲX
开发需要有
C + +
编程经验
，
且开发
、
维
护成本较高
，AＲX
程序内部的错误可能同时导致
AutoCAD
软件的崩溃
。Autolisp
是嵌入
Autodesk
内
部的
Lisp
编程语言
，
具有使用简洁
、
入门门槛低的优
点
，
用户只需了解
AutoCAD
的命令和
Autolisp
的编
程规则即可
。
且
AutoCAD
内部自带
Autolisp
的编译
器
，
不用安装第三方编译环境
，
对于完成计算
、
分析
工作量不大的重复性任务最为实用
［5 － 8］
。
所
以
，
选
择
AutoLisp
编程工具进行二次开发
。
图
1 AutoCAD
内
部
lisp
编译环境
Visual Lisp
2
绘
制原理
铁路绘制的难点在于每一段铁路符号的长度和
宽度要保持相等
，
且不受绘图比例尺的影响
。
即在
打印的图纸上每一段铁路符号长度和宽度要固定不
变
。
假设规定图纸上铁路符号的长度为
10 mm，
宽
度为
3 mm，
打印图件时按
1 ∶ 2000
的比例输出
。
则
在绘图时
，
每段铁路的长度
L
应为
20
个单位
，
宽度
W
应为
6
个单位
。L
和
W
两个参数由用户根据实际
情况输入
。
以图
2
为例
，
开始绘制铁路时
，
当用户点
选铁路中心线上的特征点
A、B
和
C
时
，
先绘制铁路
83
第
2
期
2014
年
4
月
矿 山 测 量
MINE SUＲVEYING
No. 2
Apr. 2014
中国煤炭期刊网
www.chinacaj.net
资源评论
