4800-5800竖曲线高程计算程序

CASIO fx—4800P测设竖曲线

1.竖曲线测设计算公式：

如上图，竖曲线各基本要素可用下列近似公式求：

L=R(i1-i2)=2T

T=T1=T2=1/2R(i1-i2)

E=T2÷2R

Y=X2÷2R

式中：R—竖曲线半径

i1、i2—相邻坡道的坡度

L—竖曲线的长度（m）

T—竖曲线的切线长（m）

E—竖曲线的外矢距（m）

X—竖曲线上任意一点距其起点或终点的水平距离（m）

Y—竖曲线上任意一点距切线的纵距，即标高改正值（m）

上式中Y值在凹形竖曲线中为正号，在凸形竖曲线中为负号

2.程序源

SQX

T=0.5Abs(C"i1"-D"i2")R

E=T2÷(2R)◢ G "L1"=F"L0"-T◢ U "L2"=F+T◢

Lbl1: H "H0":X=N-G:{N}:

C-D＜0＝﹥J=1:≠﹥J=-1:K"G"=H-CT+JX2÷(2R)+CX◢

I:S:M: "Z=":Z=K+SI-M◢

Goto1

3.算例

某线路i1＝-1.114％，i2＝+0.154％，为凹形竖曲线，变坡点桩号为K2+670，高程为48.60m，欲设置R＝5000m的竖曲线，求各测设元素，起、终点桩号和高程，曲线上每10m间距里程桩设计高程。

按上列公式求得：

L=R(i1-i2)=2T＝63.4m

T=T1=T2=1/2R(i1-i2)＝31.70m

E=T2÷2R＝0.10m

竖曲线起、终点的桩号和高程为：

起点桩号＝2+(670-31.70)＝2+638.30

终点桩号＝2+(670+31.70)＝2+701.70

起点坡度高程：48.60+31.7×1.114％＝48.95m

终点坡度高程：48.60+31.7×0.154％＝48.65m

竖曲线各桩高程计算

里 程 距起点距x 竖曲线高程 备注

2+638.30 X＝0 48.95 竖起

2+650 X＝11.7 48.84

2+660 X＝21.7 48.76

2+670 X＝31.7 48.70 变坡点

2+680 X＝41.7 48.66

2+690 X＝51.7 48.64

2+701.7 X＝63.4 48.65 竖终

4.利用程序进行计算

步骤 键操作 显示 说 明

1 AC — 开机、清零

2 FILE… SQX 调出程序

3 EXE i1？ 要求输入坡度i1

4 i1 EXE i2？ 输入i1,要求输入坡度i2

5 i2 EXE R？ 输入i2,要求输入竖曲线半径R

6 R EXE T=… 输入R，显示竖曲线切线长度

7 EXE E=… 显示竖曲线外矢距

8 EXE L0？ 要求输入变坡点里程L0

9 L0 EXE L1 输入L0，显示切点(起点)里程

10 EXE L2 显示终点里程

11 EXE H0？ 要求输入变坡点切线标高

12 H0 EXE N? 输入H0，要求输入所求设计标高点的里程N

13 N EXE G=… 显示所求里程设计标高

14 EXE N? 要求输入下一个所求设计标高点的里程N

15 N EXE G=… 显示所求下一个里程点标高，以下继续求完为止

5.程序说明

该程序可以计算竖曲线设计标高，并可以根据实际需要调整竖曲线。2009-6-24

6.fx-5800

"i1"?C:"i2"?D:?R:"L0"?F:"H0"?H:"T=":.5abs(C-D)R->T◢

"E=":T2÷(2R)->E◢ "L1=":F-T->G◢ "L2=":F+T=U◢

Lb11:?L:"x=":L-G->X◢

IFC-D<0:Then1->J:Else-1->J:

IFend:"H=":H-CT+Jx÷(2R)+CX->K◢

? I:?S:?M: "Z=":K+SI-M->Z◢

Goto1

说明：i1、i2、I分别为纵坡、横坡；l0、h0为变点桩号、高程；L1、L2为竖曲线起讫桩号

；S为所求点边距；M为路面厚度。

2010-05-10王选成于山西忻州