隧道三心圆开挖程序最新

隧道超欠挖计算程序 1.正算主程序1-SDZS

Lb1 0： “KP”?S（待求桩号）：“BIANZHU”?Z（边距）：Prog “PM-SJ”： Abs(S-O) → W：Prog \"SUB1\"： X：Y: F-90→F:S→ K:Prog“SQX”：“XS=”（X正算坐标）:Locate6,4,X: “YS=”(Y正算坐标):Locate6,4, Y: “BC=”(方位角):Locate6,4, F°:“H=”（高程）:Locate6,4, H◢Goto 0

2.反算主程序1-SDFS

Lb1 0: “KP”?S：“CZX”?X：CZY”？Y（测站坐标）：Prog“PM-SJ”： X→ I： Y→ J：Prog \"SUB2\"： O+W→S：\"S=\"：Locate6,4,S: \"Z=\"：Locate6,4,Z: S→ K:Prog“SQX” ：F-90→F: “BC=”:Locate6,4, F°: “H=”：H◢

3.隧道3心圆检测程序1-CQW

程序说明：为了精简，不含数据库，直接把断面的相关数据插入程序内，一些相关的数据，请仔细去推敲它的来历 1. 0.729为设计高程到仰拱临界面的高差 2. 10.6为设计标高到O3的高差 3. 12为O3的半径

4. 0.131为设计高程到O2临界点的高差 5. 3.498为O2临界宽度 6．0.59为设计高程到O2的高差 7. 1.8为设计高程到O1的高差 8. 1.4为O2半径 9. 5.1为O1半径

Fix3:Lb1 1：Prog“SDFS” :“HC”?F： “Z”? Z: If F＜H-0.729:Then √(Z2+(10.6+H-F)2 )-12→W:

Eles If F≥H-0.729 AND F ≤H+0.131:Then Abs(Z)-3.498→Z: √((Z2+(H+0.59-F)2-1.4→W :

Eles √((F-H-1.8)2+Z2)-5.1→W: IfEnd: IfEnd “CQHD”?（衬砌厚度）A:W=”: W-A→W◢ Goto1

4.正算子程序(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(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 5.反算子程序(SUB2)

G-90→T： 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：ifAbsZ<1E-6：thenGoto1：ElssW+Z → W：Goto 0：IfEnd Lbl 1： 0→ Z：Prog \"SUB1\"： (J-Y)÷sinF→ Z 6.子程序（平面线形数据库）PM-SJ

If S ≥98509.97（线元起点里程）Then 2963.804→U（线元起点X坐标）：2770.297→V（线元起点Y坐标）：98509.97→O（线元起点里程）：200°13′51.45″→G（线元起点方位角）：35 →H（线元长度）：10^(45)→P（线元起点曲率半径）：164.4→R（线元终点曲率半径）：1 →Q（线元左右偏标志：左负右正）：IfEnd If S ≥98544.97（线元起点里程）Then2931.426→U（线元起点X坐标）：2757.04→V（线元起点Y坐标）：98544.97→O（线元起点里程）：206°19′57.88″→G（线元起点方位角）：27.891 →H（线元长度）：164.4→P（线元起点曲率半径）：164.4→R（线元终点曲率半径）：1 →Q（线元左右偏标志：左负右正）：IfEnd

If S ≥98572.86（线元起点里程）Then2907.597→U（线元起点X坐标）：2742.613→V（线元起点Y坐标）：98572.86→O（线元起点里程）：216°3′10.13″→G（线元起点方位角）：35 →H（线元长度）：164.4→P（线元起点曲率半径）：10^(45)→R（线元终点曲率半径）：1 →Q（线元左右偏标志：左负右正）：IfEnd

子程序（竖曲线计算公式）SQX

101.43→Z[1](变坡点高程):98792→B(变坡点桩号):720→R(半径):43.092→T(切线长):-.0512→J（后纵坡）:0.0676→I（前纵坡）: K:B-K→C : 1→U:I>J＝＞-1→U

If KB then 0→A: J→P: Goto 1: IfEnd

LbI 1: Z[1]-CP+AU(T-Abs (C))2÷2÷R→H: Return

平曲线要素表 JD桩号 JD-X JD-Y 转角 R LS T L E 98559.35 2917.467 2753.219 21.5506 164.4 35 49.388 97.891 3.37 298770.55 2760.228 2610.897 -28.5138 200 35 69.025 135.742 6.779 2角度采用十进制小数模式，请采用普通模式版图观看才能正常显示。

转角设计值为21°55′05.87″.方位角200°13′53.03″ -28°51′37.56″ . 方位角222°08′57.32″ 纵曲线要素:

位于R=720,T=43.092,E=1.29,前纵坡6.76%，后纵坡-5.21%的曲线上，切记前纵坡为小桩号坡，后纵坡为大桩号坡。