整理隧道三心圆超欠挖程序

1、精品文档卡西欧计算器5800隧道超欠挖计算程序正算主程序(ZS)Lbl0:?S:?Z:ProgPM-SJ”：Abs(S-0)一W:ProgSUB1：XS二”:X_LYS=：Y_LF-90卡：SK:ProgSQX"：H=”：H±Goto反算主程序(FS)Lbl0:?S:?X:?Y:ProgPM-SJ"：XI:YJ:ProgSUB2:s=：o+w卡_Lz=：zjSK:ProgSQX”:H=n：H±Goto0隧道3心圆放样主程序(CQW)Lbl1:Fix3:7.315F:6.19H1"F:?Z:F-H讦：Abs(5.72-Z)煜IfF为319:The

2、nv(Z2+(F-0.715)2)-RW:IfEnd:IfF羽.577ANDF<6.319Thenv(Z-O.723)2+(F-1.577)2)-P一W:IfEnd:If<1.577:ThenZ-(P+0.723)W:IfEnd:GotolR第一个圆圆心p第二个圆圆心F实测图程H路面纵断设计高程Z由反算主程序反算得到边距(不需修改)程序中右线输入Abs(5.72-Z)Z,左线输入Abs(5.72+Z)ZCQW计算结果(+超，-欠)隧道二衬断面检测主程序(CQJC)If F 79: Then v(Z2+(F-0. 715) 2) -RTW: If End:IfF<5.79The

3、nv(Z-O.723)2+(F-1.577)2)-PTW:IfEnd:W二"：W_LGotolR第一个圆圆心P-第二个圆圆心F一实测高程H一路面纵断设计高程Abs(5. 72-Z-由反算主程序反算得到边距（不需修改）程序中右线输入Z)丁，左线输入Abs(5.72+Z)TZCQW计算结果（+超，-欠）正算子程序（SUB1）HPTC:(P-R)玄2HPR)TD:180十TE:0.1739274226TA:0.3260725774TB:0.0694318442TK:0.3300094782TL:1-LF:1-KTM:U+W(Acos(G+QEKW(C+KWD)+Bcos(G+QELW(C+

4、LWD)+Bcos(G+QEFW(C+FWD)+Acos(G+QEMW(C+MWD)TX:V+W(Asin(G+QEKW(C+KWD)+Bsin(G+QELW(C+LWD)+Bsin(G+QEFW(C+FWD)+Asin(G+QEMW(C+MWD)TY:G+QEW(C+WD)+90TF:X+ZcosFTX:Y+ZsinFTY反算子程序(SUB2)G-90TT：Abs(Y-V)cosT-(X-U)sin(T)TW：0TZ：Lbl0：Prog"SUBl"：T+QEW(C+WD)TL：(J-Y)cosL-(l-X)sinLTZ：ifAbsZvlE-6:thenGotol:Elss

5、W+ZW:Goto0:IfEndLbl1:0TZ:ProgSUB1:(J-Y)为inFTZ子程序（平面线形数据库）PM-SJifS绍5798.226（线元起点里程）Then2214.419TU（线元起点X坐标）：4802.542TV（线元起点Y坐标）：45798.226T0（线元起点里程）：280°49'4”T3（线元起点方位角）：200TH（线元长度）：1300TP（线元起点曲率半径）：1X1045TR（线元终点曲率半径）：1TQ（线元左右偏标志：左负右正）：IfEndifS绍5998.226（线元起点里程）Then2262.012TU（线元起点X坐标）：4608.341T

6、V（线元起点Y坐标）：45998.226T0（线元起点里程）：285°14'0”TG（线元起点方位角）：238.741TH（线元长度）：1X1015TP（线元起点曲率半径）：1X1045TR（线元终点曲率半径）：0TQ（线元左右偏标志：左负右正）：IfEnd子程序(竖曲线计算公式)SQXLbl0:578.318TZ1:46080TB:32000TR:160TT:0.025TI:0.035TJ:?K:B-K工:1讦：I>J=>-l讦IfKvB-Tthen0卞：I“Goto1:IfEnd:IfK<Bthen1卞：I7;Goto1:IfEnd:IfKvB+Tthe

7、n1TVJ-P:Goto1:IfEnd:IfK>Bthen0*JtR：Goto1:IfEndLbl1:Z1-CP+AF(T-Abs(0)?吃卡th：H”:H_LGoto0Zl变坡点高程B一变坡点桩号切线长J 后纵坡R一半径I前纵坡度K待求点桩号H-待求点图程说明：仪器架至测站点上定向后，观测掌子面任意点，测得数据进入反算主程序FS计算得出：对应里程桩号和边距及对应里程路面纵断设计高程。然后再进入隧道3心圆放样主程序（CQW）可计算出超欠挖或即可在掌子面上绘出开挖轮廓线，以便更好指导开挖作业。进入隧道3心圆放样主程序（CQW）程序显示Hl?-输入实测高程z?-反算得出边距（左右+）不需要修改一平面设计线距隧