隧道三心圆超欠挖程序.doc

卡西欧计算器5800隧道超欠挖计算程序正算主程序(ZS)：Lb1 0：?S：?Z：Prog “PM-SJ”： Abs(S-O) W：Prog SUB1： XS=：XYS=：YF-90F:S K:Prog“SQX”：“H=”：HGoto 0反算主程序(FS)Lb1 0: ?S：?X：？Y：Prog“PM-SJ”： X I： YJ：Prog SUB2： S=：O+WSZ=：ZS K:Prog“SQX” ：“H=”：HGoto 0隧道3心圆放样主程序（CQW）Lb1 1：Fix3:7.315R：6.19P:“H1”?F:?Z:F-HF: Abs(5.72-Z)ZIf F6.319:Then (Z2+(F-0.715)2 )-RW: IfEnd:If F1.577 AND F 6.319 Then (Z-0.723)2+(F-1.577) 2)-PW :IfEnd:If1.577: Then Z-(P+0.723)W: IfEnd:“W=”: WGoto1R-第一个圆圆心P-第二个圆圆心F-实测高程H-路面纵断设计高程Z-由反算主程序反算得到边距（不需修改）程序中右线输入Abs(5.72-Z) Z，左线输入Abs(5.72+Z) ZCQW-计算结果（+超，-欠）隧道二衬断面检测主程序（CQJC）Lb1 1：Fix3:6.625R：5.5P: “H1”?F:?Z:F-HF: Abs(5.72-Z)ZIf F5.79:Then (Z2+(F-0.715) 2)-RW: IfEnd:If F5.79 Then (Z-0.723)2+(F-1.577)2)-PW :IfEnd: “W=”: WGoto1R-第一个圆圆心P-第二个圆圆心F-实测高程H-路面纵断设计高程Z-由反算主程序反算得到边距（不需修改）程序中右线输入Abs(5.72-Z) Z，左线输入Abs(5.72+Z) ZCQW-计算结果（+超，-欠）正算子程序(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：ifAbsZJ-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: Z1-CP+AF(T-Abs (C)22RH: “H”:HGoto 0Z1变坡点高程 B变坡点桩号 R半径 T切线长 I前纵坡度 J后纵坡 K待求点桩号 H待求点高程说明：仪器架至测站点上定向后，观测掌子面任意点，测得数据进入反算主程序FS计算得出：对应里程桩号和边距及对应里程路面纵断设计高程。然后再进入隧道3心圆放样主程序（CQW）可计算出超欠挖或即可在掌子面上绘出开挖轮廓线，以便更好指导开挖作业。进入隧道3心圆放样主程序（CQW）程序显示H1？-输入实测高程Z？-反算得出边距（左-，右+）不需要修改平面设计线距隧道中线5.72米已在公式中输入W=-直接