5800计算器ROAD—2道路放样程序精选.docVIP

5800计算器ROAD－2放样程序 一、前言 1．采用交点定位技术，程序开始执行输入一个定位桩号K0用于定位交点，后面的坐标正、反算均在该交点范围内进行，曲线要素计算只在程序开始时运行一次，避免了每次计算桩号都要重新定位交点数据、计算曲线要素的麻烦，提高了计算速度，虽然存在每次执行程序只能在一个交点计算范围内计算，要计算另一个交点范围的桩号，要重新执行程序的缺点，但比起由此带来的优势，这是微不足道的（交点定位技术还有其它优点，后面还会提到）； 2．交点定位技术的采用，结合交点计算桩号范围的确定，可圆满解决纯直线路段、断链、卵形曲线等公路中比较特殊的情况，具体解决方案会在后面的日志中详细解读； 3．数据库子程序采用矩阵变量的形式，使数据组织更加简洁，输入更加便捷； 4．程序考虑了调用数据库子程序和手工输入交点数据两种方法。 二、程序清单 道路坐标放样计算程序包括一个主程序和四个子程序（不含交点数据子程序）。 主程序清单：ROAD－2 注意：这里删除了原ROAD-QXYS子程序第8行计算圆曲线长度的代码，请注意更改。 子程序1清单：ROAD－QXYS 功能：计算非对称型道路平曲线要素及主点桩号。 ? 子程序2清单：ROAD－LXZB 功能：计算道路中线坐标。 注意：第16行笔误，改为：Z0＝Z+360→Z:Z360＝Z-360→Z。?