lh10标隧道三心圆超欠挖程序

《lh10标隧道三心圆超欠挖程序》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、卡西欧计算器5800正反算、隧道超欠挖计算程序概述：位于甘肃省兰州至郎木寺高速（S2）LH10标由中铁十七局五公司承建的临夏至合作隧道。隧道洞内全面工作展开后，由于各个工作面交叉施工。测量放样常常受到干扰和制约，由于外界因素干扰测量不及时常常造成超欠挖难以控制。隧道断面仪应用具有局限性，只能架设隧道中线或法线上，测站点高程还必须重新测出。隧道施工必须讲究速度快、准，如果放样时间太长就会耽误下道工序施工进展。经我们项目部测量组编制以下程序，在施工中可随时检查超欠挖、初支、二衬断面，不影响施工。并在洞身开挖时

2、将开挖轮廓线画到掌子面，这样施钻人员可以很好的将超欠挖控制。避免向以往开完打钻时参照上一班初支断面进行打眼，周边眼施钻角度也得到很好的掌握。只有左线的，右线自己写了。隧道超欠挖计算程序正算主程序(ZSZ)：Lb10：?S：?Z：Prog“PMZ”：Abs(S-O)→W：Prog"SUB1"："XS="：X◢"YS="：Y◢F-90→F:S→K:Prog“SQX2”：“H=”：H◢Goto0反算主程序(FSZ)Lb10:?S：?X：?Y：?N：Prog“PMZ”：X→I：Y→  J：Prog"S

3、UB2"："S="：O+W→S◢"Z="：Z◢S→K:Prog“SQX1”：“YXH=”：H+1.515◢Lb17：？W：“GC=”:N-(H+W)→M:M◢IFM≧0：THENGOTO1：IFEND:IFM<0ANDZ<0：THENGOTO2：IFEND:IFM<0ANDZ>0：THENGOTO3：IFENDLbl1：?L:”C=”:√((Z+4.375)2+(N-(H+1.515))2)-L◢（右线为-4.375根据图纸）GOTO0Lbl2：?L:”C=”:√((Z+1.857)2+(N-(H+1.

4、515))2)-L◢（右线为-1.857根据图纸）GOTO0Lbl3：?L:”C=”:√((Z+6.875)2+(N-(H+1.515))2)-L◢（右线为-6.875根据图纸）GOTO0说明 ：超欠挖LBl1是上半圆的，左下导lbl2、右下导是Lbl3。S→大概的曲线或直线里程 X→实测X坐标Y→实测Y坐标N →实测高程Z→偏距左负右正K→实测里程H→设计高程YXH→圆心高程W→设计高至圆心高的距离（1.515图纸上有）"GC"→W至N的高差L→设计半径（初支、二衬、开挖看图纸上加预留变形量）"C=" 

5、   →超欠挖显示-欠+超。平面数据库（PMZ）(注：线元法的直线、直缓曲线、圆曲线、缓直曲线的分段编写数据，用线元方位角加（减）过HY点切线方位角，HY点切线方位角等于(90度×缓和曲线长度）÷（半径×圆周率)，最好画个图，YH点切线方位角则反过来用直线段的切线方位角加或减切线方位角公式一样的(90度×缓和曲线长度）÷（半径×圆周率))。ifS≥45978.226（线元起点里程）Then2214.419→U（线元起点X坐标）：4802.542→V（线元起点Y坐标）：45798.226→O（线元起点里程）

6、：280049’54”→G（线元起点方位角）：200→H（线元长度）：1300→P（线元起点曲率半径）：1×1045→R（线元终点曲率半径）：1→Q（线元左右偏标志：左负右正）：IfEndifS≥45998.226（线元起点里程）Then2262.012→U（线元起点X坐标）：4608.341→V（线元起点Y坐标）：45998.226→O（线元起点里程）：285014’20”→G（线元起点方位角）：238.741→H（线元长度）：1×1045→P（线元起点曲率半径）：1×1045→R（线元终点曲率半径）

7、：0→Q（线元左右偏标志：左负右正）：IfEnd正算子程序(SUB1)1÷P→C：(P-R)÷(2HPR)→D：180÷π→E：0.1739274226→  A：0.3260725774→B：0.0694318442→K：0.3300094782→L：1-L→F：1-K→M：U+W(Acos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos(G+QEFW(C+FWD))+Acos(G+QEMW(C+MWD)))→X：V+W(Asin(G+QEKW(C+KWD))+Bsin

8、(G+QELW(C+LWD))+Bsin(G+QEFW(C+FWD))+Asin(G+QEMW(C+MWD)))→Y：G+QEW(C+WD)+90→F：X+ZcosF→X：Y+ZsinF→Y反算子程序(SUB2)G-90→T：Abs((Y-V)cosT-(X-U)sin（T）)→W：0→Z：Lbl0：Prog"SUB1"：T+QEW(C+WD)→L：(J-Y)cosL-(I-X)sinL→Z：ifAbsZ<1×10-6：th