(以下程序是专业人士编写，本店铺不对程序负责，仅供您参考使用。

)
fx5800p隧道测量超欠挖计算程序
曲线：QXLK
“ZF”？U:“RP”?O:“ZY”? K:D“X 0”?D:E“YO”?E :?V:?H:?B:?R:?M:?N:“OZ-ZXX”?A:“R1”?P:“R2”？Q←┘
Lb1 8←┘
?X:?Y←┘
Pol((X-D)，(Y-E) )) ←┘
“S ”:= -V(I-O)=→S ◢(字母O)
“L ”:=K+πOsin-1 (sin(90+V(J-U )))÷180→L◢
RAbs(N-M)÷2→T←┘
B-L→C←┘
1→F←┘
IF M＞N:Then-1→F:THEND←┘
IF L＜B-T:Then Goto 1:ELSE IF
L＜B:THEN Goto 2:ELSE IF
L＜B+T:THENGoto3:
ELSE IF L＞B+T:THEN Goto4:IFEND: :IFEND: :IFEND: :IFEND←┘
Lb1 1←┘
“G ”:=H-CM→G◢
Goto5←┘
Lb1 2←┘
“G =”:H-C M +F(T-Abs（C)2÷（2R）→G◢Goto5←┘
Lb1 3←┘
“G= ”:=H-C N +F(T-Abs（C)2÷（2R）→G◢Goto5←┘
Lb1 4←┘
“G=”:H-CN→G◢
Lb1 5←┘
?Z←┘
IF Z＞G+5.92:THEN Goto6:ELSE Goto7:IFEND←┘Lb1 6←┘
“W=”:√(S2+(Z-G-3.1) 2)-P→W◢
Goto8←┘
Lb1 7←┘
“W=”:√((A+Abs（S)2+(Z-G-1.7) 2)-Q→W◢Goto8←┘
说明：
Z F？方位角
RP？半径
ZY？圆曲线起点桩号
X0？圆心X坐标
Y0？圆心Y坐标
V？转向
H ? 变坡点高程
B? 变坡点桩号
R? 竖曲线半径
M? 前纵坡
N? 后纵坡
OZ-ZXX? 圆心距中心线距离
R 1 ? 拱顶半径
R 2 ？内圆半径
XO ? 实测坐标
YO ? 实测坐标
J ?
L ? 桩号
S ? 平距
G ? 设计高程
Z ? 实测高程
W ? 超欠挖(“+”为超挖“-”为欠挖)
算例
索子沟二号隧道圆曲线段参数设置：ZF? 324 35 53.4
RP ？500 ZY？29117.543 X O？60807.872 Y O？12833.4328 V？1
H ? 1717.4 B? 29750 R? 12000 M? 0.65％N? -0.1028％OZ-ZXX?
2.2 R1? 4.286 R2? 6.893
X=60869.64 Y=12332.5154 H=1720.211 计算L=29487.827 S=-4.711 W=0.56966
直线：ZXLK
“ZF”？U:“QSDZH”? K: “X0”?D: “YO”?E :?H:?B:?R:?M:?N:“OZ-ZXX”?A:“R1”?P:“R2”？Q←┘
Lb1 8←┘
?X:?Y←┘
Pol((X-D)，(Y-E) )) ←┘
“L ”:K+COS (J-U)×I→L◢
“S ”:SIN (J-U) ×I→S ◢(
RAbs(N-M)÷2→T←┘
B-L→C←┘
1→F←┘
IF M＞N:Then-1→F:THEND←┘
IF L＜B-T:Then Goto 1:ELSE IF
L＜B:THEN Goto 2:ELSE IF
L＜B+T:THENGoto3:
ELSE IF L＞B+T:THEN Goto4:IFEND: :IFEND: :IFEND: :IFEND←┘
Lb1 1←┘
“G ”:=H-CM→G◢
Goto5←┘
Lb1 2←┘
“G =”:H-C M +F(T-Abs（C)2÷（2R）→G◢
Goto5←┘
Lb1 3←┘
“G= ”:=H-C N +F(T-Abs（C)2÷（2R）→G◢
Goto5←┘
Lb1 4←┘
“G=”:H-CN→G◢
Lb1 5←┘
?Z←┘
IF Z＞G+5.92:THEN Goto6:ELSE Goto7:IFEND←┘
Lb1 6←┘
“W=”:√(S2+(Z-G-3.1) 2)-P→W◢
Goto8←┘
Lb1 7←┘
“W=”:√((A+Abs（S)2+(Z-G-1.7) 2)-Q→W◢
Goto8←┘
说明：
Z F？直线方位角QSDZH? 直援点圆心桩号
X O？圆心X坐标Y O？圆心Y坐标
H ? 变坡点高程B? 变坡点桩号
R? 竖曲线半径M? 前纵坡
N? 后纵坡OZ-ZXX? 圆心距中心线距离R 1 ? 拱顶半径R 2 ？内圆半径
XO ? 实测坐标YO ? 实测坐标
J ? L ? 桩号S ? 平距
G ? 设计高程Z ? 实测高程W ? 超欠挖(“+”为超挖“-”为欠挖)
算例
索子沟二号隧道直线段参数设置：ZF? 4 12 28.7 QSDZH? 29463.203 X O？60844.56 Y O？12334.7807 H ? 1717.4 B? 29750 R? 12000 M?
0.65％N? -0.1028％OZ-ZXX? 2.2 R1? 4.286 R2? 6.893
X=61056.762 Y=12348.355 H=1723.69 计算L=29675.829 S=-2.033 G=1716.888. W=-0.063。