FX5800卡西欧计算器应用及程序 【3】圆曲线段（右转向）

<=- +=>=60 序 号 实测坐标（m） X Y H 中线(ZX) <= => 7.395 桩号K+ 65.707 56.176 90.464 超欠挖显示 QIAN CAO 至圆心高差值 hV(X) h(X) 1.234 ∧1 68.016 0.932 2124.558 2.567 0.880 5.358 2.629 0.741 2 54.490 7.092 2126.336 3.809 3 78.738 26.782 2122.369 5.527

2.1.4 隧洞方形渐变至三心圆程序（圆心同一高程）

程序执行条件

“M=0 Y≠0”、 （1）等于0时执行方形渐变至三心圆程序段； （2）不等于0时执行方形渐变至圆程序段。

输 入

※ 已知数据

本程序的各项已知参数已经输入程序内部，不需单独输入。 ? 变量

X：轴线方向X坐标（m） Y、断面宽度方向Y坐标（m） H、高程（m）

输 出

※ 计算结果

“CAO”、超挖值（m） “QIAN”、欠挖值（m）

∧

“h”、向圆心上移高差值（m） “hV”、向圆心下移高差值（m）

∧

“hCAO”、顶拱超挖值（m） “hV CAO”、底板超挖值（m）

数 学 模 型

本程序是利用测得的各点计算出其与起止设计断面点的差值，再计算出差值与渐变段总长段的比例。这样就可以用相应的比例乘以测设点至起点的距离，从而得出该点所在桩号上的渐变值。

注：

1、使用时的坐标系必须是以隧洞轴线方向为X、断面宽度为Y的施工坐标系；

2、本程序是以巴塘拉拉山水电站进口渐变段作为实例进行编辑的。程序中的数据皆是实例中的各项参数；

3、示意图中是两种渐变轨迹，一种是从方形渐变至三心圆（开挖断面），第二种是方形渐变至圆形（衬砌断面），本程序可分别计算这两种渐变轨迹。

Prog JBFS（角度、半径法）

说明：本程序利用断面中各渐变部分的角度进行放样点的范围计算，超挖值与设计半径相比较得出。

且行天涯 804963666 9 FX5800卡西欧计算器应用及程序 “M=0 Y≠0”?U:-8->K:If U=0:Then 2989.5->Z:6.2->D:Else 2990->Z:5.2->D:IfEnd:Lb1 0:Norm 1:Cls:?X:?Y:?H:X-K->C:D÷2->M:Z+M->V:If U≠0:Then Pol(Abs(Y,Abs(H-V:I->W:If J>45:Then 90-J->J:IfEnd:Goto 1:IfEnd:If H>V:Then Abs(Y->F:Else M+Abs(Y->F:IfEnd:Pol(F,Abs(H-V:I->W:If H>V And J>45:Then 90-J->J:IfEnd:If HM:If J>26.5650118 And J<30:Then D÷2->M:90-J->J:Goto 1:IfEnd:If J>30:Then H->J:Z->W:Goto 2:IfEnd:IfEnd:Lb1 1:M÷cos(J->J:If U=0 And HM:IfEnd:J-C(J-M)÷Abs(K->J:Lb1 2:Abs(W-J->I:Fix 3:If W>J:Then “CAO”:Lcoate 7,4,I:Else “QIAN”:Lcoate 7,4,I:IfEnd:Abs(H-V->I:If H>V:Then “hV”:Lcoate 7,4,I◢

∧

Else “h”:Lcoate 7,4,I◢ IfEnd:Norm 1:Goto 0

Prog JBFS（偏距与半径控制）

说明：本程序是利用各点渐变点与圆点的平距进行相应计算后，超挖值由程序计算出的设计渐变平距与实测Y值相比较得出。

“M=0 Y≠0”?U:-8->K:If U=0:Then 2989.5->Z:6.2->D:Else 2990->Z:5.2->D:IfEnd:Lb1 0:Norm 1:Cls:?X:?Y:?H:Abs(Y->F:Abs(X-K->C:D÷2->M:Fix 3:If HJ:“hV cao”:J◢

∧

Goto 0:IfEnd:If H>Z+D:Then Abs(H-Z-D->J:“h cao”:J◢

Goto 0:IfEnd:Z+M->V:Abs(H-V->I:U≠0=>Goto 1:If HF:D->M:IfEnd:

22

Lb1 1:M-C(M-√(M-I))÷Abs(K->E:Abs(F-E->I:If F>E:Then “CAO”:Lcoate 7,4,I: Else “QIAN”:Lcoate 7,4,I:IfEnd:If H>V:Then “hV”:Lcoate 7,4,J◢

∧

Else “h”:Lcoate 7,4,J◢ IfEnd:Norm 1:Goto 0

渐变断面示意图

6.200R35.200R002.R62989.505.2006.200.10062.00

且行天涯 804963666 10 FX5800卡西欧计算器应用及程序 【1】

方形渐变至三心圆实例（角度与半径控制）

“M=0 Y≠0”=0 点号 1 2 3 4 5 6 7 实 测 坐 标(m) X -5.658 -5.658 -5.658 -5.658 -5.658 -2.905 -7.297 Y 3.509 1.622 3.013 3.100 1.371 2.216 3.496 H 2995.070 2995.494 2991.063 2989.500 2989.580 2989.695 2994.346 方形渐变至圆实例 “M=0 Y≠0”=3 点号 1 2 3 实 测 坐 标(m) X -6.588 -5.998 -6.588 Y 2.417 2.718 1.206 H 2994.228 2990.947 2990.103 CAO 0.249 超欠挖值(m) QIAN 0.126 0.064 CAO 0.702 0.214 0.475 超欠挖值(m) QIAN 0.103 0.033 0.080 0.238 【2】 方形渐变至三心圆实例（偏距与半径控制） 点号 1 2 3 4 5 6 7 实 测 坐 标(m) X -5.658 -5.658 -5.658 -5.658 -5.658 -2.905 -7.297 Y 3.509 1.622 3.013 3.100 1.371 2.216 3.496 H 2995.070 2995.494 2991.063 2989.500 2989.580 2989.695 2994.346 超欠挖值(m) CAO 0.768 0.243 0.443 QIAN 0.896 0.030 1.499 0.424 至拱肩(圆心)高差 上(h) 1.537 3.100 3.020 2.905 ∧下(hV) 2.470 2.894 1.746 方形渐变至圆实例 “M=0 Y≠0”=3 点号 1 2 3 点号 4 5 实 测 坐 标(m) X -6.588 -5.998 -6.588 X -2.905 -7.297 Y 2.417 2.718 1.206 Y -1.095 2.201 H 2994.228 2990.947 2990.103 H 2995.651 2989.696 超欠挖值(m) CAO 0.266 QIAN 0.082 1.063 至拱肩(圆心)高差 上(h) 1.653 2.497 ∧下(hV) 1.628 高程超出断面（顶拱与底板高程）时 h CAO(超挖) 0.451 0.304 顶 拱 底 板 且行天涯 804963666 11 FX5800卡西欧计算器应用及程序

2.1.5 基本型曲线中桩、边桩坐标计算程序

本程序专用于基本型曲线任意一点中桩、边桩坐标计算。程序可以自动准确判断计算点位于曲线的位置，并根据命令输出中桩、边桩坐标。本程序可以计算对称型及非对称型基本曲线。

程序执行条件

N=0、输入起算数据 N≠0、进入坐标计算程序段

输 入

※ 已知数据

X1、Y1：ZZ点坐标（直线段上任意点）（m） X0、Y0：ZH点坐标（m） ※ 设计数据

<=- +=>、曲线半径（m）,半径输为负值时为左转向；反之为右转向 W：输入道路宽度(1/2总宽度) 1、W=0、只计算输出中桩； 2、道路1/2宽度（m），计算输出中桩、边桩。

ZH、HY、YH、HZ：直缓点、圆缓点、缓圆点、缓直点里程（m） ※ 变量

K、所计算点里程

输 出

※ 起算参数

r、反算的后视点－测站点边长（m） θ、反算的后视点－测站点象限角（°） ※ 计算结果

X(0)、Y(0)：中桩坐标（m）

X(-)、Y(-)：左边桩坐标（m） X(+)、Y(+)：右边桩坐标（m） 注：

四大桩里程必须按从小到大的顺序排列。

Prog JQX

?N:I f N=0:Then “X1”?Q:“Y1”?G:“X0”?O:“Y0”?P:Pol(O-Q,P-G◢

J->C:C<0=C+360->C:“<=- +=>”?R:Abs(R->M:?W:“ZH”?Z:“HY”?E:“YH”?F:“HZ”?H:IfEnd:「b」0:“K+”?K:KGoto 0:E-Z->L:If KJ:Else L->J:IfEnd:Prog “J0”:K≤E=>Goto 1:If K≤F:Then K-E->I:Else F-E->S:S->I:IfEnd:90I

∧22∧

÷π÷M->N:2N+3A->B:Pol(Msin(B)+L÷2-L(3)÷240÷M,M(1-cos(B))+L÷24÷M-L

∧-122

(4)÷2688÷M(3:If K≤F:Then I->D:J->A:Goto 1:IfEnd:J->V:N+sin(D÷(√(I+D-2IDcos(J-A))÷sin(J-A->N:I->S:H-F->L:L->J:Prog“J0”:A->T:D->U:If K

22

H-K->J:Else 0->J:IfEnd:Prog“J0”:T-A->I:√(U+D-2UDcos(I->L:A->U:180-N-(2T

-122-1

-sin(D÷(L÷sin(I->N:√(S+L-2SLcos(N->D:sin(L÷(D÷sin(N->J:V+J->A:K≤H

22-1

=>Goto 1:K-H->I:N+J-T->V:√(D+I-2DIcos(V->D:A+sin(I÷(D÷sin(V->A:「b」1:If R<0:Then C-A->I:Else C+A->I:IfEnd:O+Rec(D,I->X:P+J->Y:Fix 4:“X(0)=”:Locate 7,4,X:“Y(0)=”:Locate 7,4,Y◢

W=0=>Goto 3:If R<0:Then C-270->D:D<0=>D+360->D:Else C+270->D:IfEnd:K≤E=>3A->B:If R<0:Then D-B->L:Else D+B->L:IfEnd:K≤F=>Goto 2:3T-3U->A:If R<0:Then

且行天涯 804963666 12