龙源期刊网 http://www.qikan.com.cn
CASIO计算器全路线程序计算
作者：聂有军 聂有杰
来源：《中国科技纵横》2015年第07期
【摘 要】公路工程、市政道路工程、桥梁工程的施工过程中，设计坐标、设计标高现场计算是频率较高的一项工作。现采用CASIO-5800做为编程工具，编写了全路线坐标计算程序、全路线标高计算程序、全路线坐标反算桩号程序三组全路线计算程序。本程序主要适用于CASIO-4800、CASIO-4850、CASIO-4850计算器。
【关键词】CASIO-4800计算器 CASIO-4850计算器 CASIO-4850计算器 1前言
为了兼顾在CASIO-4800/CASIO-4850计算器上应用，路线元素输入中，采用即时校核改错输入方式，方便输入与校对改错。程序编写过程中尽可能使程序短小精简，便于手工输入程序与节约内存。全路线参数一次输入计算器存储容量不够用时，可以输入部分路线参数分段使用。CASIO-4800/CASIO-4850计算器不能使用变量定义扩充变量存储器。自定义存储器个数需要手工设置，自定义存储器个数设置为：（Z[6]+1）×6+Z[5]×3。Z[6]为平曲线个数；Z[5]为竖曲线个数（包括起点与终点）。CASIO-5800计算器，计算器程序根据输入的曲线个数自动设置。 2.程序特点
（1）以交点桩号、坐标为基础数据，避免了路线全系统错误的发生。 （2）路线断链自动处理。按设计图纸修改断链子程序序中的断链桩号。
（3）统一设置分配变量、参数存储器。三组程序根据需要任意切换调用，不影响各自的基础参数。
（4）只输入最基本的必需参数，如竖曲线的凹凸判别问题、平曲线偏转左右判别问题、前缓和线段与后缓和线判别问题、桩号断链处理、设计缓和线不等长等问题均自动处理。 （5）计算误差一般在0.5mm 以内。竖曲线段设计标高计算使用了平面解析几何方法推导的计算公式，计算精度可以满足工程施工规范要求。平曲线参数计算公式中程序将自动处理设计缓和线不等长时的相关曲线参数计算。
（6）全路线坐标计算程序，在基础参数输入时，只要求输入路线交点桩号，交点坐标X、Y值、曲线半径、缓和线长度等五个必需的参数。纯圆平曲线时，设计缓和线长度L输入0。平曲线前后设计缓和线等长时，输入设计缓和线长度L时，L值只输入一个数即可。平曲
龙源期刊网 http://www.qikan.com.cn
线前后设计缓和线不等长时，前后设计缓和线长度需合并输入L。由程序自动识别处理。（例如：设计缓和线等长L1=L2=85，L值输入85。设计缓和线不等长L1=85；L2=75，L值输入1085075。特别说明，此时的L1、L2都要以百位数输入，前面加1是为了方便程序处理）。 （7）三组程序中均考虑了桩号断链问题。如路线存在桩号断链，在程序使用前一定要修改好断链子程序中的断链桩号。如路线不存在桩号断链问题，只要将断链子程序中的断链桩号设定在路线以外即可，如：修改链桩号39350，变为939350或9939350。其它断链桩号修改方法类同，就跳开了断链问题。 3.程序使用说明
程序使用前计算器需设置为角度制。CASIO-5800P新的计算器需要首先自定义10个以上的可变存储器，才能正常运行程序。如首先使用了坐标计算程序，路线平曲线元素输入完成，再使用标高计算程序，依次完成竖曲线元素输入，这是理想的使用顺序，不会因操作问题丢失竖曲线元素数据。
三组程序总使用自定义变量存储器个数为：（Z[6]+1）×6+Z[5]×3。
Z[6]为路线平曲线交点个数，（桩号）M—Z[6K+7 ]；（X坐标）A— Z[6K+8]； （Y坐标）B— Z[6K+9]；（半径） R— Z[6K+10]； （设计缓和线）L— Z[6K+11]；（ ZH点桩号）ZH— Z[6K+12]。
Z[5]为路线竖曲线交点个数。标高计算程序的自定义存储器编号是在首先定义了平曲线个数基础上再向上递加的。C= Z[6]+1；（桩号）M— Z[6C+3K+1] ；（半径）R—
Z[6C+3K+2]；（JD标高）H —Z[6C+3K+3]。完成路线元素输入后，对照设计资料进行坐标或标高计算对比，正确无误后方可在工地现场使用。 4程序编制原理 4.1全路线坐标计算
（1）计算思路：判断计算点桩号是否小于ZH点桩号，如小于ZH点桩号（否则如大于ZH点桩号进行下一个ZH点桩号断）则确定桩号所在JD位置，进行参数赋值，计算曲线参数，计算ZH点、HY点、YH点、HZ点桩号，确定计算点桩号位置范围，调用对应的子程序计算坐标。
（2）计算步骤：输入计算点桩号→判断计算点的位置→确定计算桩号所在平曲线JD→曲线参数计算赋值→判断计算点在已确定的JD曲线上处于那个线段范围内→调用相关子程序进行中桩坐标计算→如需要进行需要的边桩坐标计算→完成计算后返回主程序进行下一个给定桩号的坐标计算。
龙源期刊网 http://www.qikan.com.cn
（3）主要变量说明。程序要求输入的路线平曲线元素：起点坐标X、Y值；终点坐标X、Y值；各平曲线交点桩号、坐标X、Y值；平曲线半径R；平曲线设计缓和线长度L。 一般变量意义说明：左偏角I设置为1，右偏角I设置为-1；JD切线方位角F；计算点桩号Z；JD桩号M；曲线切线长度T（T1为T；T2为Z[12]）；曲线总长度S；设计缓和线长度L（L1为L；L2为Z[10]）；圆曲半径R；求算点桩号Z；边桩坐标计算判断符号Q，Q为边桩偏转中线角度。可计算任一偏转角度的边桩坐标。左边桩Q输入-90，右边桩Q输入90。边距为K，输入边桩距中线距离。程序输出相应边桩坐标。Q输入0，程序只计算中桩坐标。 4.2全路线标高计算
（1）计算思路：计算切线长度，判断计算点桩号是否小于竖曲线起点桩号，如小于竖曲线起点桩号（否则如大于竖曲线起点桩号进行竖曲线起点桩号判断）则确定桩号所在JD位置，进行参数赋值，调用标高计算子程序进行标高计算。
程序要求输入的路线竖曲线元素：起点桩号；起点桩号设计标高；终点桩号；终点桩号设计标高；各竖曲线交点桩号、交点标高；竖曲线半径。
一般变量意义说明：交点桩号M ，交点标高H；竖曲线半径R；后纵坡度I；前纵坡度J；凸竖曲线D设置为1，凹竖曲线D设置为-1；竖曲线切线T。
（2）计算步骤：输入计算点桩号→判断计算点的位置→确定计算桩号所在竖曲线JD→判断计算点在已确定的JD曲线上处于那个线段范围内→调用相关子程序进行中桩标高计算→如需要进行需要的边桩标高计算→完成计算后返回主程序进行下一个给定桩号的坐标计算。 （3）竖曲线段标高计算公式的建立：将路线展开纵断面翻转90°视为一水平面， 建立大地相对坐标系：路线里程设为X轴，高程设为Y轴，假定路线起点K0+000与高程为0.000的点为坐标系的原点（0，0）。竖向坐标值（高程值）： 。
4.3全路线坐标反算桩号计算
程序变量设置与全路线标高计算相同，部分子程序共用。
（1）计算思路：判定计算点所在最近JD后，首先在临近三个JD计算判断投影点是否在圆上，如果是，完成计算。否则判断是否在本JD前或后直线段上，如果是，完成计算。否则一定在本交点或前或后缓和线上，完成计算即可。 （2）基本计算原理：基本计算原理如下图示说明：