连续运算的公路测量程序(含数据库).docVIP

一、公路基本型非对称曲线中边桩坐标计算放样程序（连续运算） 1、子程序 SUB.B （前后交点坐标反求偏角） 参数意义： Z—JD1X，U—JD1Y，N—JDX，E—JDY，B—JD2X，C—JD2Y， O—JD交点桩号，R—R，S—LS1，P—LS2 Z[1]—B前方位角值（角度），Z[2]—C后方位角值，Z[3]—I判断左偏或右偏（I=-1左偏，I=1右偏），A—夹角α（角度单位） 程序清单： Pol（N－Z，E－U） J0→Z[1]=360+J：≠→Z[1]=J：△Pol（B－N，C－E）：J0→Z[2]=360+J≠→Z[2]=J A=Z[2] －Z[1]：：M= ABS A M180 →GOTO 1 ≠→GOTO 2 Lb1 1 A0→“I=”：Z[3]=-1▲“A=”：A= ABS A→DMS ▲GOTO 3 ≠→“I=”：Z[3]= 1▲“A=”：A= ABS A →DMS▲GOTO 3 Lb1 2 A0→“I=”：Z[3]=1▲“A=”：A=360-Abs A→DMS▲GOTO 3 ≠→“I=”：Z[3]= -1▲“A=”：A=360-Abs A→DMS▲GOTO 3 Lb1 3 2、主程序 ZBZZB2L (中边桩坐标计算主程序) 参数意义： K—中桩桩号，D—边桩距离（恒为正），Q—边桩与中桩切线的夹角（左负右正），G—测站X坐标，H—测站Y坐标，N=”：