LH10标隧道三心圆超欠挖程序.docVIP

卡西欧计算器5800正反算、隧道超欠挖计算程序概述：位于甘肃省兰州至郎木寺高速（S2）LH10标由中铁十七局五公司承建的临夏至合作隧道。隧道洞内全面工作展开后，由于各个工作面交叉施工。测量放样常常受到干扰和制约，由于外界因素干扰测量不及时常常造成超欠挖难以控制。隧道断面仪应用具有局限性，只能架设隧道中线或法线上，测站点高程还必须重新测出。隧道施工必须讲究速度快、准，如果放样时间太长就会耽误下道工序施工进展。经我们项目部测量组编制以下程序，在施工中可随时检查超欠挖、初支、二衬断面，不影响施工。并在洞身开挖时将开挖轮廓线画到掌子面，这样施钻人员可以很好的将超欠挖控制。避免向以往开完打钻时参照上一班初支断面进行打眼，周边眼施钻角度也得到很好的掌握。只有左线的，右线自己写了。隧道超欠挖计算程序正算主程序(ZSZ)：Lb1 0：?S：?Z：Prog “PMZ”： Abs(S-O) W：Prog SUB1： XS=：XYS=：YF-90F:S K:Prog“SQX2”：“H=”：HGoto 0反算主程序(FSZ)Lb1 0: ?S：?X：?Y：?N：Prog“PMZ”： X I： YJ：Prog SUB2： S=：O+WSZ=：ZS K:Prog“SQX1” ：“YXH=”：H+1.515Lb1 7：？W：“GC=”:N-(H+W) M:MIF M0：THEN GOTO 1：IFEND:IF M0 AND Z0：THEN GOTO 2： IFEND:IF M0：THEN GOTO 3：IFENDLbl 1：?L:”C=”: (Z+4.375)2+(N-(H+1.515)2)-L（右线为-4.375根据图纸）GOTO 0Lbl 2：?L:”C=”: (Z+1.857)2+(N-(H+1.515)2)-L（右线为-1.857根据图纸）GOTO 0Lbl 3：?L:”C=”: (Z+6.875)2+(N-(H+1.515)2)-L（右线为-6.875根据图纸）GOTO 0说明：超欠挖LBl 1是上半圆的，左下导lbl 2、右下导是Lbl 3。S大概的曲线或直线里程X实测X坐标Y实测Y坐标N实测高程Z偏距左负右正K实测里程H设计高程YXH圆心高程W设计高至圆心高的距离（1.515图纸上有）GCW至N的高差L设计半径（初支、二衬、开挖看图纸上加预留变形量）C= 超欠挖显示-欠+超。平面数据库（PMZ）(注：线元法的直线、直缓曲线、圆曲线、缓直曲线的分段编写数据，用线元方位角加（减）过HY点切线方位角，HY点切线方位角等于(90度缓和曲线长度）（半径圆周率)，最好画个图，YH点切线方位角则反过来用直线段的切线方位角加或减切线方位角公式一样的(90度缓和曲线长度）（半径圆周率)。ifS 45978.226（线元起点里程）Then 2214.419U（线元起点X坐标）：4802.542V（线元起点Y坐标）：45798.226O（线元起点里程）：28004954”G（线元起点方位角）：200 H（线元长度）：1300P（线元起点曲率半径）：11045R（线元终点曲率半径）：1 Q（线元左右偏标志：左负右正）：IfEndifS 45998.226（线元起点里程）Then 2262.012U（线元起点X坐标）：4608.341V（线元起点Y坐标）：45998.226O（线元起点里程）：28501420”G（线元起点方位角）：238.741 H（线元长度）：11045P（线元起点曲率半径）：11045R（线元终点曲率半径）：0 Q（线元左右偏标志：左负右正）：IfEnd正算子程序(SUB1)1P C： (P-R)(2HPR) D： 180 E： 0.1739274226A： 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(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-90T： Abs(Y-V)cosT-(X-U)sin（T）) W： 0 Z：Lbl 0：Prog SUB1： T+QEW(C+WD) L： (J-Y)cosL-(I-X)sinL Z：if AbsZJ-1FIf KB-T then 0A: I P:Goto 1: IfEnd: If KB then 1A: IP: Goto 1: IfEnd: If KB then 0A: JP: Goto 1: IfEndLbI 1: L-CP+AF(T-Abs (C)22R: “H”:HL变坡点高程 B变坡点桩号 R半径 T切线长 I前纵坡度 J后纵坡 K待求点桩号 H待求点高程说明：仪器架至测