桥涵设计中计算中桩高程的两个常用程序

刘金光 刘兴光 刘笛 田光明

1.泰安市公路事业发展中心，中国·山东 泰安 27100

2.山东省公路设计咨询有限公司泰安分公司，中国·山东 泰安 27100

桥涵设计；数据；辅助程序

1 引言

自AutoCAD 应用到设计工作中以来，其强大的功能给设计人员提供了非常高效的帮助，但是，它并不是万能的，针对一些特殊的功能要求它不会提供，只有通过二次开发才能实现，幸好AutoCAD 提供了这个便利，它能够支持AutoLISP、ADS、Object ARX、VisuallISP、VBA 等。 论 文 的两个程序就是在AutoCAD 平台上直接使用的应用工具，采用AutoLISP 语言编写，对于编写小规模应用工具的设计人员来说，我推荐使用AutoLISP，其短小灵活，比较容易调试，不需要学习更多的编程知识。

论文介绍的两个程序中ZD.lsp 是计算一个具体桩号高程的工具，它有一个简单的对话框（见下图），对话框文件为ZD.dcl，它还需要一个数据文件（文后介绍），数据文件来源于路线设计参数文件；另一个是ZH.lsp，是在ZD.lsp 正常计算后可使用的工具，它共享使用ZD.lsp 的数据文件，它可以将CAD 可编辑的数字认为是桩号，选择后一次性将其转换成高程数字[1]。（此组程序非常适合从事路线施工放样、桥涵设计的技术人员使用，可作为软件教学的素材。）

2 对话框程序

对话框程序（ZD.dcl，存于ACAD 可支持的目录下），效果如下：

3 中桩设计标高计算程序（ZD.lsp）

4 桩号转换为中桩设计标高程序（ZH.lsp）

5 纵断面设计参数填写格式说明：

；后缀dat，单位：米。数据从路线软件（如纬地）纵断面设计参数文件中提取

；编辑格式如下：

；第一行为断链参数必填，没有断链填（0 0），断链起点，断链长度（长链为负值）

；第二行，起点桩号，高程 竖曲线半径

；第三行，第二个竖曲线，桩号 高程 竖曲线半径（负值为切线长度）

；其它行类推

；最后一行，终点，桩号 高程 竖曲线半径

数据如下：

6 结语

为便于学习使用，论文所涉及的程序及参数文件均在百度网盘中共享：

源代码下载地址链接：

https://pan.baidu.com/s/1x7ySw0bzgidgr3TgpPPHwQ

提取码：neex