陈文平
(中交集团四公局四处)
CASIOfx-4500P计算器因其携带方便、编程简单、易操作,在测绘领域尤其在野外测量放样中应用较为广泛,在莆秀高速公路中 4850计算器得到了充分的利用。在西埔互通区匝道半径小,线性复杂,计算数据量大,侧设工作难度大。针对这种情况,需要编写一个能满足等缓和不等缓及各种复曲线连接的程序,根据现有的条件及设计图纸所给的曲线要素,结合以前编程的经验编写了以下程序,将对这种方便、快捷、适用的计算程序进行分析与介绍。
曲线起点 X、Y坐标,曲线起点沿计算方向切线方位角(根据曲线起点坐标和交点坐标可反算),起点曲率半径,终点曲率半径,起点里程,终点里程,解算曲线任意点任意角度中边桩坐标。
图1 数学模型
LbI1:{H}:H“DKI”:H≤圆直点(缓直点)里程=>A =圆直点(缓直点)X坐标:B=圆直点(缓直点)Y坐标:C=起点切线方位角‘:D=1÷起点半径:Z=1÷终点半径:F=起点<直缓(或缓园)>里程:G=终点里程:Prog“LXQX”: Goto1⊿。
程序把数据库作为主程序,在主程序中调用其它模块。
运行时直接运行主程序,如计算匝道A的,就运行A,其它匝道的数据库类同。
莆秀高速西埔互通A匝道计算实例,主程序如下:
A匝道为不等缓和曲线,圆曲线半径为 65米,运行后显示输入:DKI?(待求点里程)如要计算AK0+120坐标输入: 120,下一步显示T?(输 0为计算中桩坐标,输大 1的数字是求外依点)输 0下一步会直接显示 AK0+120中桩坐标,下一步显示X0、Y0(要求输入测站X、Y坐标如输入X= 5093.034,Y=3764.593,下一步显示QA=201.950(放样点到测站点的距离)QS=160'32'07”(放样点到测站的方位角)。要计算外移点坐标时在显示 T?时输 1下一步显示QH?(外移点前后距离前正后负,如输3),下一步显示ZY? (外移点左右距离左负右正,如输-4)下一步显示QA?(外移点角度,输入见数学模型,如输入 0算正交)下一步显示X =4941.467,Y=3700.357(为外移点坐标)下一步显示QA =202.968,QS=164'37'01”(外移点到测站点的方位角)下一步循环计算。在进行逆算时起点、终点曲率半径、里程互换。
程序方便、快捷、准确、适用性很强,通过以上方式的简化后,使繁重的测量工作变得轻松,大大减轻了测量的工作量。