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

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路面縱斷設(shè)計高程Z由反算主程序反算得到邊距(不需修改)程序中右線輸入Abs(5.72-Z)Z,左線輸入Abs(5.72+Z)ZCQW計算結(jié)果(+超，-欠)隧道二襯斷面檢測主程序(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一路面縱斷設(shè)計高程Abs(5. 72-Z-由反算主程序反算得到邊距（不需修改）程序中右線輸入Z)丁，左線輸入Abs(5.72+Z)TZCQW計算結(jié)果（+超，-欠）正算子程序（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子程序（平面線形數(shù)據(jù)庫）PM-SJifS紹5798.226（線元起點里程）Then2214.419TU（線元起點X坐標(biāo)）：4802.542TV（線元起點Y坐標(biāo)）：45798.226T0（線元起點里程）：280°49'4”T3（線元起點方位角）：200TH（線元長度）：1300TP（線元起點曲率半徑）：1X1045TR（線元終點曲率半徑）：1TQ（線元左右偏標(biāo)志：左負右正）：IfEndifS紹5998.226（線元起點里程）Then2262.012TU（線元起點X坐標(biāo)）：4608.341T

6、V（線元起點Y坐標(biāo)）：45998.226T0（線元起點里程）：285°14'0”TG（線元起點方位角）：238.741TH（線元長度）：1X1015TP（線元起點曲率半徑）：1X1045TR（線元終點曲率半徑）：0TQ（線元左右偏標(biāo)志：左負右正）：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-待求點圖程說明：儀器架至測站點上定向后，觀測掌子面任意點，測得數(shù)據(jù)進入反算主程序FS計算得出：對應(yīng)里程樁號和邊距及對應(yīng)里程路面縱斷設(shè)計高程。然后再進入隧道3心圓放樣主程序（CQW）可計算出超欠挖或即可在掌子面上繪出開挖輪廓線，以便更好指導(dǎo)開挖作業(yè)。進入隧道3心圓放樣主程序（CQW）程序顯示Hl?-輸入實測高程z?-反算得出邊距（左右+）不需要修改一平面設(shè)計線距隧