CASIO fx-5800p交点法计算缓和曲线内任意点计算程序

CASIO fx-5800p交点法计算缓和曲线内任意点计算程序

SpiraL curve（缓和曲线任意点坐标计算）

程序说明：本程序是基于计算对称性缓和曲线而编写的程序，是以交点法为基础，故输入数据多了点。

程序思路：根据曲线的交点数据，进而推算曲线要素，并进行曲线内任意点的坐标计算。2013年1月6日增加说明：本程序的主旨是在已知交点各要素的前提下，通过内置程序进行推算，从而得出精确的结果，已知要素只需要输入一次，便可以把该交点范围内的包括中桩，任意角度边桩结果推算出来。

LbL 0：Cls

19→DimZ 变量赋值

“INTα(s)=”?F 输入交点坐标方位角

“JD PEG=”?K 输入交点桩号

“INT X(JD)=”?X 输入交点X坐标

“INT Y(JD)=”?Y 输入交点Y坐标

“INT R(s)=”?R 输入缓和曲线半径

“INT L(s)=”?L 输入缓和曲线长

“TURNING ANGLE=”?A 输入转角

“TURNING DIRECTION –L,+R=”?I 输入路线转向：左负右正 I赋值为1

L2÷(24×R)→P

L÷2-L3÷(240×R2)→Q

90×L÷（π×R）→B

（R+P）Tan（A÷2）+Q→T 计算切线长

R（A-2B）×π÷180→O 计算圆曲线长

R（A-2B）×π÷180+2L→C 计算曲线长

（R+P）÷cos（A÷2）-R→E 计算外距

2T-C→D 计算切曲差

K-T→Z[3] ZH点

Z[3]+L→Z[4] HY点

Z[4]+O→Z[5] YH点

Z[5]+L→Z[6] HZ点

Z[6]-C÷2→Z[7] QZ点

X+Tcos（F+180）→Z[16] ZH点X坐标

Y+TsIn（F+180）→Z[17] ZH点Y坐标

L-L3÷（90R2）→G

Z[16]+Gcos(F+30×I×L÷(π×R) )→Z[8] HY点X坐标

Z[17]+Gsin(F+30×I×L÷(π×R)) →Z[9] HY点Y坐标

Z[8]+2Rsin(45×O÷(πR))cos(F+I×45×O÷(π×R)+I×90×L÷(π×R)) →Z[14] QZ点X坐标Z[9]+2Rsin(45×O÷(πR))sin(F+I×45×O÷(π×R)+I×90×L÷(π×R)) →Z[15] QZ点Y坐标Z[8]+2Rsin(90×O÷(πR))cos(F+I×90×O÷(π×R)+I×90×L÷(π×R)) →Z[10] YH点X坐标Z[9]+2Rsin(90×O÷(πR))sin(F+I×90×O÷(π×R)+I×90×L÷(π×R)) →Z[11] YH点Y坐标X+Tcos（F+I×A）→Z[12] HZ点X坐标

Y+TsIn（F+I×A）→Z[13] HZ点Y坐标

LbL 2

“XIAN SHI QXYS 0→YES,1→NO”→？Z:CLs 显示曲线要素？输入：0→YES,1→NO If Z=0:Then GoTo 3

ELse If Z=1:Then GoTo 4:IfEnd:IfEnd

LbL 3 <本段为曲线要素显示结果部分>

“QIE XIAN C=”:T▲

“QU XIAN C=”:C▲

“Y QU XIAN=”:O▲

“WAI JU=”:E▲

“QIE QU CHA=”:D▲

“ZH PEG=”:Z[3] ▲

“X(ZH)=”:Z[16] ▲

“Y(ZH)=”:Z[17] ▲

“HY PEG=”:Z[4] ▲

“X(HY)=”:Z[8] ▲

“Y(HY)=”:Z[9] ▲

“QZ PEG=”:Z[7] ▲

“X(QZ)=”:Z[14] ▲

“Y(QZ)=”:Z[15] ▲

“YH PEG=”:Z[5] ▲

“X(YH)=”:Z[10] ▲

“Y(YH)=”:Z[11] ▲

“HZ PEG=”:Z[6] ▲

“X(HZ)=”:Z[12] ▲

“Y(HZ)=”:Z[13] ▲

GoTo 0

LbL 4 <本段为待求点桩号计算部分>

“INT P PEG=”?H 输入待求点桩号

If H

If H≥Z[3]And H

ELse If H≥Z[4] And H

ELse If H≥Z[5] And H≤Z[6]:Then GoTo C :Ifend

Ifend : Ifend

If H>Z[6]:Then GoTo 4:Ifend

LbL A {待求点位于ZH到HY段上时}

“PIAN JIAO -L ,+R = ”? V 输入边桩与路线中心线夹角：左负右正

“PIAN JU = ”? W 边桩与路中法线距离

H–Z[3]→J

J–J5 ÷(90×R2×L2)→S

Z[16]+S cos(F+30×I×J2÷(π×R×L)→M

Z[17]+S sin(F+30×I×J2÷(π×R×L)→N

M+W×cos(F+90×I×J2÷(π×R×L +V) →Z[18]

N+W×sin(F+90×I×J2÷(π×R×L +v) →Z[19]

“X(p)= ”: Z[18] ▲

“Y(p)= ”: Z[19] ▲

GoTo 4

LbL B {待求点位于HY到YH段上时}

“PIAN JIAO -L ,+R = ”? V

“PIAN JU = ”? W

H–Z[4]→J

Z[8]+2Rsin(90×J÷(π×R)cos[F+90×I×J÷(π×R)+90×I×L÷(π×R)]→M Z[9]+2Rsin(90×J÷(π×R)sin[F+90×I×J÷(π×R)+90×I×L÷(π×R)]→N M+Wcos(F+90×I×L÷(π×R)+180×I×J÷(π×R)+V) →Z[18]

N+Wsin(F+90×I×L÷(π×R)+180×I×J÷(π×R)+V) →Z[19]

“X(P)= ”: Z[18] ▲

“Y(P)= ”: Z[19] ▲

GoTo 4

LbL C {待求点位于YH到HZ段时}

“PIAN JIAO -L ,+R = ”?V

“PIAN JU = ”? W

Z[6] –H →J

J–J5÷(90×R2×L2)→S

Z[12]+Scos(F+I×A+180-30×I×J2÷(π×R×L)→M

Z[13]+Ssin(F+I×A+180-30×I×J2÷(π×R×L)→N

M+Wcos(F+I×A-90×I×J2÷(π×R×L)+V) →Z[18]

N+Wsin(F+I×A-90×I×J2÷(π×R×L)+V) →Z[19]

“X(p)= ”: Z[18] ▲

“Y(p)= ”: Z[19] ▲

GoTo 4

竖曲线高程计算

4.3 某条道路变坡点桩号为K25+460.00，高程为780.72.m，i1＝0.8％，i2＝5％，竖曲线半径为5000m。（1）判断凸、凹性；（2）计算竖曲线要素；（3）计算竖曲线起点、K25+400.00、K25+460.00、K25+500.00、终点的设计高程。 解：ω＝i2-i1＝5％－0.8％＝4.2％凹曲线 L＝R?ω＝5000×4.2％＝210.00 m T＝L/2＝105.00 m E=T2/2R＝1.10 m 竖曲线起点桩号：K25+460－T＝K25+355.00 设计高程：780.72－105×0.8％＝779.88 m K25+400： 横距：x＝（K25+400）－（K25+355.00）＝45m 竖距：h＝x2/2R＝0.20 m 切线高程：779.88+45×0.8％＝780.2 m 设计高程：780.24+0.20＝780.44 m K25+460：变坡点处 设计高程=变坡点高程+E=780.72+1.10＝781.82 m 竖曲线终点桩号：K25+460＋T＝K25+565 设计高程：780.72+105×5％＝785.97 m K25+500：两种方法 1、从竖曲线起点开始计算 横距：x＝（K25+500）－（K25+355.00）＝145m 竖距：h＝x2/2R＝2.10 m 切线高程（从竖曲线起点越过变坡点向前延伸）：779.88+145×0.8%=781.04m 设计高程：781.04+2.10＝783.14 m 2、从竖曲线终点开始计算 横距：x＝（K25+565）－（K25+500）＝65m 竖距：h＝x2/2R＝0.42 m 切线高程 （从竖曲线终点反向计算）：785.97-65×5%=782.72m 或从变坡点计算：780.72+（105-65）×5%=782.72m 设计高程：782.72+0.42＝783.14 m

公路竖曲线高程计算程序

fx-4800P计算器 公路竖曲线高程计算程序 （程序名：GAO CHENG-HP） Lb1 0︰｛CDAB｝︰C“K1=”︰D“H1=”︰A“PV-K0=”︰B “PV-H0=”↙ Lb1 1 ︰｛REF ｝︰R“R=”︰E“K2=”︰F“H2=”↙Lb1 2︰U =（B－D）÷（A－C）︰V =（F－B）÷（E－A）︰U ＞V =＞N = 0︰T = R ( U－V ) ÷2︰≠＞N = 1︰T = R ( V－U ) ÷2 ︰⊿G = A －T ︰Q = A ＋T ︰W = T 2÷（2 R）↙ Lb1 3︰｛K｝︰K “I.T.E.ZY-K.YZ-K=0,1”︰ K =0 =＞Goto 4 ︰⊿U “I 1”= U ▲V “I 2”= V ▲T = T ▲W “E”= W ▲G “ZY-K”= G ▲Q “YZ-K”= Q▲↙ Lb1 4︰｛M｝︰M“PK=”︰M ≤A =＞Goto 5︰⊿Goto 6 ↙Lb1 5︰M ≤G =＞H = B－U ( A－M ) ︰Goto 7 ︰≠＞Prog “H1 ”︰N = 1 =＞H = B＋X－Y ︰Goto 7︰≠＞N = 0 =＞H = B－X －Y ︰Goto 7↙ Lb1 6︰M ≥Q =＞H = B＋V ( M－A ) ︰Goto 7 ︰≠＞Prog “H2 ”︰N = 1 =＞H = B＋X＋Y ︰Goto 7︰≠＞N = 0 =＞H = B－X ＋Y ↙ Lb1 7︰H “HP”= H ▲｛L｝︰L“BZ-T=0,L”︰L = 0 =＞Goto 8 ︰⊿｛S｝︰S “IL=”︰H “HL”= H ＋S L ▲↙

工程测量竖曲线程序及公式

竖曲线程序要素 已知要素 ? 1. 变坡点里程桩号 2. 变坡点高程3. 竖曲线半径4. 变坡点前坡度（上坡为正，下坡 为负） 5. 变坡点后坡度（上坡为正，下坡为负）6.待求点里程 计算公式 ●凹凸型：当前坡度-后坡度为正，则为凸型，反之为凹型 ●转坡角（曲折角）：前坡度–后坡度 ●竖曲线长：半径* 转坡角 ●切线长：竖曲线长/ 2 ●外矢距：切线长的平方/ 2倍半径 ●待求点到变坡点距离：待求点桩号–变坡点桩号（取绝对值） ●曲线起终点桩号： 起点：变坡点的桩号–切线长终点：变坡点的桩号+ 切线长 ●任意点切线标高：变坡点的标高±测点与变坡点里程距离*该里程对应坡度 ●任意点设计标高： 1. 凸型：该桩号在切线上的设计标高–修正值 2. 凹型：该桩号在切线上的设计标高+ 修正值 程序条件 ◆条件：如果待求点≦变坡点，则待求点–起点=间距，反之待求点>变坡点，则终点–待 求点=间距 ●曲线点间距：待求点–起点或终点–待求点 If K ≦Z:Then K - A→X:Else K > Z ＝＞B - K→X : IfEnd ●竖曲线上点的高程修正值：曲线点间距的平方/ 2倍半径 ◆条件：凸型竖曲线（J>0） 如果待求点≦变坡点，则任意点设计标高=变坡点高程-（变坡点-待求点）* 前坡度(取绝对值)-修正值，反之待求点>变坡点，则变坡点任意点设计标高=变坡点高程-（待求点-变坡点）* 后坡度(取绝对值)-修正值 If K≦Z:Then H-Abs(U*I)-Y→G：Else K>Z＝＞H-Abs(U*L)-Y→G:IfEnd ◆条件：凹型竖曲线(J<0) 如果待求点≦变坡点，则任意点设计标高=变坡点高程+（待求点-变坡点）* 前坡度(取绝对值)+修正值，反之待求点>变坡点，则变坡点任意点设计标高=变坡点高程+（变坡点-待求点）* 后坡度(取绝对值)+修正值 If K≦Z:Then H+Abs(U*I)+Y→G：Else K>Z＝＞H+Abs(U*L)+Y→G:IfEnd

通过逐桩坐标计算曲线要素

通过逐桩坐标表推算曲线要素（CAD篇） 摘要：现在从事工程行业的都流行使用AutoCAD进行绘制图形，为了更好的利用这个绘图工具来绘制线路曲线要素，本文将讲解如何通过设计院提供的逐桩坐标表推算未知曲线要素。 关键词：AutoCAD 技巧曲线要素 说明：AutoCAD已经成为国际上广为流行的绘图工具。具有良好的用户界面，通过交互 菜单或命令行方式便可以进行各种操作。它的多文档设计环境，让非计算机专业人员也能很快地学会使用。在不断实践的过程中更好地掌握它的各种应用和开发技巧，从而不断提高工作效率。 如何提高CAD速率？ 通常在开始绘图的时候一些人由于对工具命令不熟悉直接使用工具栏等查找命令，这样对制图的效率会大打折扣从而导致绘图的速率缓慢，提高制图的方法需要掌握CAD的快捷命令，孰能生巧的记住，然后择优选用其中的一些常用的绘图命令，把繁琐的长命令转化为简单的命令使用，其次需要多练习绘图的方式与方法才会提高绘图水平。 推算原理： 通过逐桩坐标表（含曲线五大桩）然后利用Excel生成展点命令在AutoCAD中进行坐标展点，再通过工具或命令绘制进行查询曲线长、切线长、外失距、交点坐标、交点里程、曲线半径、方位角、转角等。 准备工作： 1、逐桩坐标表X、Y（含曲线五大桩） 2、AutoCAD绘图软件 演示版本为：AutoCAD 2007 示例文件：某高速铁路逐桩坐标表 演示范围：DK07+586.707~DK12+126.03（由于该交点属于大转角则演示明显）

操作流程：坐标展点→绘制半径→绘制切线长→查询方位角→查询转角→查询交点坐标→查询交点里程→查询外失距→绘制缓和曲线。（请注意逐桩坐标表中所提供的ZH、HY、QZ、YH、HZ等说明） 准备操作如下： 1、打开“逐桩坐标表”并复制（里程桩号、坐标X、坐标Y）数据到“曲线坐标计算程序VBA 4.6”的“交点法正算”表格中，效果图如下： 逐桩坐标表见（本文附件）下载地址附后！

交点法线元法坐标计算

3、交点法、线元法坐标计算 坐标计算是根据图纸中“直线及曲线转角一览表”提供的数据计算道路中桩坐标，然后和图纸提供的“逐桩坐标表”比对，如果一样则说明输入平曲线参数输入正确，可以计算边桩坐标和其他结构物坐标了；如果中桩坐标不一样，一般是平曲线参数输入有误，需要重新检查输入，另一种结果是图纸有错，这种情况少见，但不代表没有。“直线及曲线转角一览表”和“逐桩坐标表”见附件1、附件2。 线元法是以路线的起点坐标、方位角、起终点桩号等节点元素来计算出要求的坐标；交点法是以路线的交点要素和路线的主要要素来求得坐标。 ①交点法 交点：路线的转折点，路线改变方向是相邻两直线的延长线相交的点。用JD表示， 有些图 纸上用 IP表示。 看下图： 交 点是针对曲线的（包含圆曲线和缓和曲线），一段曲线就有一个交点。交点参数有：坐标（X,Y）、交点桩号、转角值、圆曲线半径R、缓和曲线长度。 教学提供软件（轻松测量、双心软件、测量工具）交点法曲线要素输入说明： 1、QD起点坐标： 起点坐标必须在直线段上，或填写前一交点的坐标。

2、JD交点曲线要素： （1）交点桩号 （2）交点坐标（X,Y） （3）曲线半径R 始点的话，起始里程有时候需要校正，当然，并不是每个图纸给出的起点里程都需要校正，大多数图纸的起点里程已经被设计院校正过，我们输入平曲线的时候需要验证一下。如果我们按照图纸给出的起点里程输入，发现后面的交点里程都和图纸相差一个相同的值，这就表明我们输入的起点里程需要校正。 起始点里程正常输入，第二、三个交点输入完成后，检查第二个交点的切线长和交点

里程是否和图纸一样，如果切线长正确，交点里程不正确，说明起点里程需要校正，将第二个交点的里程与正确里程的差值，应用到起点里程中，从而使第二个交点里程和后面交点的里程与图纸吻合。 注意：交点法计算坐标适用的平曲线为对称或不对称缓和曲线、圆曲线。对于非普通的三单元曲线，交点法不适用。非普通的三单曲线例如下页的JD18及JD19处的平曲线， 的输入是否正确，有的图纸给的方位角数据较少，需要每隔几个线元才能检验方位角。

交点法坐标计算

本程序由一个主程序JD和三个子程序（JDA、JDB、JDC）构成，运行时只需运行主程序即可！ 本程序适用于单交点对称型、不对称型、无缓和曲线单圆曲线型一个交点范围内（含交点前后有直线段时）的曲线要素核对和坐标计算，手工输入要素，对设计图纸的“直线、曲线转角表”中交点数据进行复核验证，并为线元法程序提供起点坐标起点切线方位角等数据！当然本程序也可单独逐交点输入进行放样计算用！鉴于5800计算器的空间和以上所述本程序的主要目的，故此程序不修改为数据库版本！需要的自行修改结合XY框架自己修改为数据库反算程序等！ 主程序名：JD 24→Dimz↙ Cls :＂XC＂?U :＂YC＂?V :＂K（JD）＂?K :＂X（JD）＂?X : ＂Y（JD）＂?Y :＂LS1＂?B :＂LS2＂?C : ?R : ＂（ZH）FWJ°＂?M : ＂α（Z-,Y+）°＂?O : M+O→N : Prog ＂JDA＂↙ Cls :＂T1=＂:＂T2=＂:＂L=＂:＂LY=＂: Locate 4,1,S : Locate 4,2,T : Locate 4,3,L : Locate 4,4,Q◢ Cls :＂E=＂:＂K（ZH）=＂: Locate 7,1,E : Locate 7,2,Z[1]◢ Cls : ＂K（HY）=＂:＂K（QZ）=＂:＂K（YH）=＂:＂K（HZ）=＂: Locate 7,1, Z[2] : Locate 7,2, Z[3] : Locate 7,3, Z[4] : Locate 7,4, Z[5]◢ LbI 0 : ＂K×+×××＂?P : ＂Z＂?D : If D≠0 :Then ＂RJ＂?H : IfEnd : Prog ＂JDB＂↙ If D＜0 :Then Cls : ＂X(L)=＂:＂Y(L)=＂: Locate 6,1,F : Locate 6,2,G◢Pol(F-U,G-V : Cls : ＂S(L)=＂: Locate 6,1,I : ＂F(L)=＂: 360Frac((J+360)÷360▼DMS◢ Goto 0 : IfEnd↙ If D=0 :Then Cls : ＂X(Z)=＂:＂Y(Z)=＂: Locate 6,1,F : Locate 6,2,G : ＂QXFWJ(Z)=＂: Z▼DMS◢ Pol(F-U,G-V : Cls : ＂S(Z)=＂: Locate 6,1,I : ＂F(Z)=＂: 360Frac((J+360)÷360▼DMS◢ Goto 0 : IfEnd↙ If D＞0 :Then Cls : ＂X(R)=＂:＂Y(R)=＂: Locate 6,1,F : Locate 6,2,G◢Pol(F-U,G-V : Cls : ＂S(R)=＂: Locate 6,1,I : ＂F(R)=＂: 360Frac((J+360)÷360▼DMS◢ Goto 0 : IfEnd↙ 子程序1名： JDA If O＜0 :Then -1→W : Else 1→W : IfEnd : WO→A ↙ B2 ÷24÷R-B^(4)÷2688÷R ^(3) →Z[6] ↙ C2 ÷24÷R-C^(4)÷2688÷R ^(3) →Z[7] ↙ B÷2-B^(3)÷240÷R2 →Z[8] ↙ C÷2-C^(3)÷240÷R2 →Z[9] ↙ Z[8]+((R+Z[7]-(R+Z[6])cos(A))÷sin(A))→S↙ Z[9]+((R+Z[6]-(R+Z[7])cos(A))÷sin(A))→T↙ RAπ÷180+(B+C) ÷2→L↙ RAπ÷180-(B+C) ÷2→Q↙

非对称缓和曲线坐标计算程序

非对称缓和曲线坐标计算程序 CASIO fx-4800P QXZB曲线坐标计算 CASIO4800 QXZB可计算不等缓和曲线、圆曲线上的任意中、边桩坐标： 该程序适用于计算器 CASIO fx-4800P，可计算与线路中心成任意夹角的缓和曲线、圆曲线中、边桩坐标及待测点方位角和距离。 1、DK(JD)？输入交点桩号 2、X(JD)？输入交点坐标X 3、Y(JD)？输入交点坐标Y 4、T1？输入第一切线长(如果只有一条切线两者都输入一致) 5、T2？输入第二切线长(如果只有一条切线两者都输入一致) 6、FWJ？输入直线方位角(ZH→JD) 7、A？输入转角：左转为负，右转为正 8、R？输入圆曲线半径 9、LS1？输入第一缓和曲线长(如果只有一条缓和曲线两者都输入一致) 10、LY？输入圆曲线长(L-LS1-LS2) 11、LS2？输入第二缓和曲线长(如果只有一条缓和曲线两者都输入一致) 12、X(ZJD)？输入置镜点坐标X 13、Y(ZJD)？输入置镜点坐标Y 14、JSDK？输入前视点里程 15、PL？输入偏距 16、PA？输入偏角 程序下载地址： https://www.wendangku.net/doc/ff15281074.html,/blog/post/QXZB-4800.html

评价答案 好:18 不好:1 原创:18 非原创:0 菲メ帆ぅ 回答采纳率:52.8% 2010-06-02 17:37 满意答案 好评率：57% （for Casio-fx4850） 扩展变量操作（15个）：Defm 15←┚ ( O为字母、0为数字) J-PQX (平面数据输入，自行切换到J-JSMS) Defm 15←┚ A“JD” B“JDX” C“JDY” F“FWJ” O“A0：Z-，Y+” RE“LS1” K“LS2”： E<1=>E=1E-9⊿K<1=>K=1E-9⊿Z[1]=EE÷24R-E∧4÷2688RRR:Z[2]= E÷2-EEE÷240RR:X=(EE-KK)÷24R÷sin Abs O :“T1=”:Z[3]=(R+Z[1])tan(Abs O÷2)+Z[2]-X◢“T2=”:Z[4]=(R+KK÷24R-K∧4÷2688RRR)tan(Abs O ÷2)+K÷2-KKK÷240RR+X◢ “L=”:L=Abs OπR÷180+(E+K)÷2◢ J=tan-1((R+Z[1])÷(Z[3]-Z[2]):“E=”:X=(R+Z[1])÷sin J-R◢ X=A-Z[3]:Y=X+E:E<1=>“ZY=”:X◢ ≠=> “ZH=”:X◢ “HY=”:Y◢ ⊿ “QZ=”:Y =X+(L-K-E)÷2+E◢ Y=X+L-K:X=X+L:K<1=> “YZ=”:X◢

Casio fx-5800P 交点法坐标计算程序

Casiofx-5800P交点法坐标计算程序 XC U 测站X坐标 YC V 测站Y坐标 K(JD) K 交点桩号 X(JD) X 交点X坐标 Y(JD) Y 交点Y坐标 LS1 B 第一缓和曲线长度 LS2 C 第二缓和曲线长度 R 圆曲线半径 FWJ M 起始边切线方位角 α(Z-,Y+) O 本交点处线路转角(左转为负，右转为正，度分秒输入) K×+××× 待求桩号 Z 待求桩号距中距离(左负值，右正值，中为0) RJ 斜交右角(线路切线前进方向与边桩右侧夹角) →? 主程序名：JD 24→Dimz ”XC”?U:”YC”?V:”K(JD)”?K:”X(JD)”?X:“Y(JD)”?Y:”LS1”?B:”LS2”?C:?R “FWJ”?M:“α(Z-,Y+)°”?O:M+O→N Prog“JDA” Cls:”E=“:”K(ZH)=“:Locate7,1,E:Locate7,2,Z[1]◢ Cls:“K(HY)=“:”K(QZ)=“:”K(YH)=“:”K(HZ)=“:Locate7,1,Z[2]:Locate7,2,Z[3]:Locate7,3,Z[4]:Locate7,4,Z[5]◢LbI0:“K×+×××”?P:“Z”?D:If D≠0:Then “RJ”?H:IfEnd:Prog“JDB” If D<0:Then Cls:“X(L)=“:”Y(L)=“:Locate6,1,F:Locate6,2,G◢ Pol(F-U,G-V:Cls:“S(L)=“:Locate6,1,I:“F(L)=“: 360Frac((J+360)÷360?DMS◢ Goto0:IfEnd If D=0:Then Cls:“X(Z)=“:”Y(Z)=“:Locate6,1,F:Locate6,2,G:“QXFWJ(Z)=“:Z?DMS◢ Pol(F-U,G-V:Cls:“S(Z)=“:Locate6,1,I:“F(Z)=“: 360Frac((J+360)÷360?DMS◢ Goto0:IfEnd If D>0:Then Cls:“X(R)=“:”Y(R)=“:Locate6,1,F:Locate6,2,G◢ Pol(F-U,G-V:Cls:“S(R)=“:Locate6,1,I:“F(R)=“: 360Frac((J+360)÷360?DMS◢ Goto0:IfEnd 子程序1名：JDA If O<0:Then -1→W:Else 1→W:IfEnd:WO→A B2÷24÷R-B^(4)÷2688÷R^(3)→Z[6] C2÷24÷R-C^(4)÷2688÷R^(3)→Z[7] B÷2-B^(3)÷240÷R2→Z[8] C÷2-C^(3)÷240÷R2→Z[9] Z[8]+((R+Z[7]-(R+Z[6])cos(A))÷sin(A))→S Z[9]+((R+Z[6]-(R+Z[7])cos(A))÷sin(A))→T RAπ÷180+(B+C)÷2→L RAπ÷180-(B+C)÷2→Q (R+(Z[6]+Z[7])÷2)÷cos(A÷2)-R→E K-S→Z[1]

竖曲线自动计算表格

竖曲线自动计算表格 篇一：Excel竖曲线计算 利用Excel表格进行全线线路竖曲线的统一计算 高速公路纵断面线型比较复杂，竖曲线数量比较多。由于相当多的竖曲线分段造成了设计高程计算的相对困难，为了方便直接根据里程桩号计算设计高程，遂编制此计算程序。程序原理： 1、根据设计图建立竖曲线参数库； 2、根据输入里程智能判断该里程位于何段竖曲线上； 3、根据得到的竖曲线分段标志调取该分段的曲线参数到计算表格中； 4、把各曲线参数带入公式进行竖曲线高程的计算； 5、对程序进<0 = J=0; M-P=0 = J=1 B: K<=D =B=-M ; KD = B=P 程序特色： 1、可以无限添加竖曲线，竖曲线数据库不限制竖曲线条数； 2、直接输入里程就可以计算设计高程，不需考虑该里程所处的竖曲线分段；

3、对计算公式进行保护，表格中不显示公式，不会导致公式被错误修改或恶意编辑。 程序的具体编制步骤： 1、新建Excel工作薄，对第一第二工作表重新命名为“参数库”和“计算程序”，根据设计图建立本标段线路竖曲线的参数库，需要以下条目： （1）、竖曲线编号； （2）、竖曲线的前后坡度（I1、I2）不需要把坡度转换为小数； （3）、竖曲线半径、切线长（不需要考虑是凸型或凹型）；（4）、竖曲线交点里程、交点高程； （5）、竖曲线起点里程、终点里程（终点里程不是必要参数，只作为复核检测用）；如图1所示： 图1 2、进行计算准备： （1）、根据输入里程判断该里程所处的曲线编号： 需要使用lookup函数，函数公式为“LOOKUP(A2,参数库!H3:H25,参数库!A3:A25)”。如图2所示： 里程为K15+631的桩号位于第11个编号的竖曲线处，可以参照图1 进行对照 （2）、在工作表“程序计算”中对应“参数库”相应的格式建立表格

5800计算器竖曲线程序

CASIO fx5800p全线高程计算程序 GAOCHEN 主程序 Lbl 1 “KM=，<0,Stop”:?K：K<0=>Stop:“PY=”？L：Prog”GK” C-D→E:Abs(RE/2)→T：R(Abs(E)/E)→R If K≤B-T:Then 0→H:Else:If K≥B+T Then 0→H:D→C:Else K-B+T→H:Ifend:Ifend A-(B-K)C-H2/(2R)-0.000→G：Cls “KM=”：Locate 4，1，K：Locate 10，1，“PY=”：Locate 13，1，L：Fix 3 “H=”：Locate 4，2，G Prog “PODU”：（E-B）/（D-A）（K-A）+B→I：(F-C)/（D-A）（K-A）+C→J “HL=”：G+I(L-1)→X：Locate 4，3，X：Locate 11，3，“I=”：Locate 13，3，I*100 “HR=”：G+J(L-1)→Y：Locate 4，4，Y：Locate 11，4，“I=”：Locate 13，4，J*100◢显示中边桩高程 Cls：Norm 2：“BM+HS≤0,Goto 1”？Z：Z≤0=> Goto 1：Cls (输入视线高) “KM=”：Locate 4，1，K：Locate 10，1，“PY=”：Locate 13，1，L：Fix 3 “QSM=”: Locate 6，2，Z-G (显示中桩读数) “QSL=”: Locate 6，3，Z-X (显示左桩读数) “QSR=”: Locate 6，4，Z-Y◢(显示右桩读数) Norm 2：Cls：Goto1 （后面可加已知视线高计算读数部分，不想计算读数则视线高输入0或负数如不想显示麻烦，可将Locate语句去掉） 以下两个子程序不需运行，只是两个独立的数据库赋值程序，字母重复不影响计算结果 GK 数据库子程序 If K≤第二曲线起点桩号：Then 第一曲线交点高程→A：第一曲线交点桩号→B：第

缓和曲线上任意点坐标计算程序

第一缓和曲线加圆曲线上任意点坐标计算程序：L1：U=U"Ｘ0"：V=V"Y0"：F"FANG"=F：E=E"LEFT-1"：LbI 0 L2：｛B｝：｛D｝：｛P｝ L3：L=AbS（B-A"ZHD"） L 4： L5：X=L-LX Y5/（40R2S2） L6：Y= LX Y3/（6RS）- LX Y7/（336RX Y3SX Y3）：G=90L2/（∏RS） L GOtO 2 7： L8：LbI 1 L9：L=L-S L10：O=90S/（∏R）+90L/（∏R） L11：M=2（Rsin（90L/∏/R）） L12：X=S-SX Y3/（40R2）+Mcos O L13：Y=S2/（6R）+MsinO:G=90S/（∏R）+180L/（∏R） L GOtO 2 14： L15：LbI 2 L16：W=tan-1（Y/X）:Q=√（X2+Y2） L 17： L E=1=>G=-G 18： L19：X[1]=U+Qcos（F+W）+Dcos（F+G+P）◢ L20：Y[1]=V+Qsin（W+F）+Dsin（F+G+P）◢ L21：GOtO 0

注、○1、XO—为起点X坐标 EXE ○2、YO—为起点Y坐标 EXE ○3、F？—方位角 EXE ○4、LEFT-1？—左偏取1右偏取0 EXE ○5、B？—所求坐标点里程（起点输0时为到起点长度）EXE ○6、ZHD？—为直缓点里程或直圆点里程（起点可以输0）EXE ○7、S？—缓和曲线长、圆曲线时输为0 EXE ○8、R？—半径EXE ○9、D？—中桩到边桩长度EXE ○10、P？—左右方向与中线切线交角、法线方向时左-90右+90 EXE ○11、上述每一步输完后必须确认、结果显示字后转到B进行循环操作。

公路竖曲线计算

公路竖曲线计算

————————————————————————————————作者：————————————————————————————————日期:

课 题：第三节 竖曲线 第四节 公路平、纵线形组合设计 教学内容：理解竖曲线最小半径的确定；能正确设置竖曲线；掌握竖曲线的要素计算、竖曲线与路基设计标高的计算；能正确进行平、纵线形的组合设计。 重 点：１、竖曲线最小半径与最小长度的确定；２、竖曲线的设置； 3、平、纵线形的组合设计。 难 点：竖曲线与路基设计标高的计算;平、纵线形的组合设计。 第三节 竖曲线设计 纵断面上相邻两条纵坡线相交的转折处，为了行车平顺用一段曲线来缓和,这条连接两纵坡线的曲线叫竖曲线。 竖曲线的形状,通常采用平曲线或二次抛物线两种。在设计和计算上为方便一般采用二次抛物线形式。 纵断面上相邻两条纵坡线相交形成转坡点，其相交角用转坡角表示。当竖曲线转坡点在曲线上方时为凸形竖曲线,反之为凹形竖曲线。 一、竖曲线 如图所示,设相邻两纵坡坡度分别为i 1 和i 2,则相邻两坡度的代数差即转坡角为ω= i 1-i ２ ,其中i 1、i 2为本身之值，当上坡时取正值，下坡时取负值。 当 i １- i 2为正值时,则为凸形竖曲线。当 i １ - i 2 为负值时，则为凹形竖曲线。 (一)竖曲线基本方程式 我国采用的是二次抛物线形作为竖曲线的常用形式。其基本方程为: Py x 22= 若取抛物线参数P 为竖曲线的半径 R ，则有： Ry x 22 = R x y 22 = （二)竖曲线要素计算公式 竖曲线计算图示 １、切线上任意点与竖曲线间的竖距h 通过推导可得: ==PQ h )()(2112 li y l x R y y A A q p ---=-R l 22= 2、竖曲线曲线长: L = R ω ３、竖曲线切线长： T= T A =T Ｂ ≈ L/２ = 2 ω R ４、竖曲线的外距： Ｅ =R T 22 ⑤竖曲线上任意点至相应切线的距离：R x y 22 = 式中：ｘ —为竖曲任意点至竖曲线起点（终点)的距离, m; R —为竖曲线的半径，m 。

通过逐桩坐标计算曲线要素完整版

通过逐桩坐标计算曲线 要素 HEN system office room 【HEN16H-HENS2AHENS8Q8-HENH1688】

通过逐桩坐标表推算曲线要素（CAD篇） 摘要：现在从事工程行业的都流行使用AutoCAD进行绘制图形，为了更好的利用这个绘图工具来绘制线路曲线要素，本文将讲解如何通过设计院提供的逐桩坐标表推算未知曲线要素。 关键词：AutoCAD技巧曲线要素 说明：AutoCAD已经成为国际上广为流行的绘图工具。具有良好的用户界面，通过交互菜单或命令行方式便可以进行各种操作。它的多文档设计环境，让非计算机专业人员也能很快地学会使用。在不断实践的过程中更好地掌握它的各种应用和开发技巧，从而不断提高工作效率。 如何提高CAD速率？ 通常在开始绘图的时候一些人由于对工具命令不熟悉直接使用工具栏等查找命令，这样对制图的效率会大打折扣从而导致绘图的速率缓慢，提高制图的方法需要掌握CAD的快捷命令，孰能生巧的记住，然后择优选用其中的一些常用的绘图命令，把繁琐的长命令转化为简单的命令使用，其次需要多练习绘图的方式与方法才会提高绘图水平。 推算原理： 通过逐桩坐标表（含曲线五大桩）然后利用生成展点命令在AutoCAD中进行坐标展点，再通过工具或命令绘制进行查询曲线长、切线长、外失距、交点坐标、交点里程、曲线半径、方位角、转角等。 准备工作： 1、逐桩坐标表X、Y（含曲线五大桩） 2、AutoCAD绘图软件 演示版本为：AutoCAD 2007

示例文件：某高速铁路逐桩坐标表 演示范围：DK07+~DK12+（由于该交点属于大转角则演示明显） 操作流程：坐标展点→绘制半径→绘制切线长→查询→查询转角→查询交点坐标→查询交点里程→查询外失距→绘制缓和曲线。（请注意逐桩坐标表中所提供的ZH、HY、QZ、YH、HZ等说明） 准备操作如下： 1、打开“逐桩坐标表”并复制（里程桩号、坐标X、坐标Y）数据到“曲线坐标计算程序VBA ”的“交点法正算”表格中，效果图如下： 逐桩坐标表见（本文附件）下载地址附后！ 2、在“曲线坐标计算程序VBA ”的“交点法正算”表中“点击生成展点”然后点击“复制数据”按钮，再打开AutoCAD在命令行中输入pline按回车键，并在命令行上点击鼠标右键选择“粘贴”，图示如下： 3、展点完毕后删除起始点那根长线段（该线段属于展点命令的起始端位置，该线段无用可以直接删除），然后在命令行中输入zoom按回车键再选择E按回车键，图示如下： 绘图操作准备： 1、基本设置：点击AutoCAD顶部工具栏中的“格式”→“标注样式”（或 输入命令d）→“修改”→主单位精度选择“”→角度标注：单位格式选择“度/分/秒”，精度选择“0d’””→确定→设为当前。 2、在命令行中输入：se按回车键，然后弹出草图设置面板→选择“全部清除”→在“圆心”上面打勾→确定。 绘制曲线半径： 半径：在圆中，连接圆心和圆上任意一点的线段叫做圆的半径。 先找到HY 位置，点击顶部工具栏中的“绘图”→“圆弧”→“三点”然后在HY 圆心位置单击鼠标左键，图示如下：

竖曲线高程计算公式推导过程及计算流程

竖曲线高程计算公式推导过程及计算流程

竖曲线高程计算公式推导及计算流程 1. 竖曲线介绍 竖曲线是指在纵断面内，两个坡线之间为了延长行车视距或者减小行车的 冲击力，而设计的一段曲线。一般可以用圆曲线和抛物线来充当竖曲线。由于圆曲线的计算量较大，所以，通常采用抛物线作为竖曲线，以减少计算量。 2. 竖曲线高程计算流程 竖曲线计算的目的是确定设计纵坡上指定桩号的路基设计标高，其计算步骤如下： a. 计算竖曲线的基本要素：竖曲线长L ；切线长T ；外失距E b. 计算竖曲线起终点的桩号：竖曲线起点的桩号=变坡点的桩号－T c. 计算竖曲线上任意点切线标高及改正值： 切线标高=变坡点的标高±（x T -）?i 改正值：2 21x R y = d. 计算竖曲线上任意点设计标高 某桩号在凹形竖曲线的设计标高 = 该桩号在切线上的设计标高+ y 某桩号在凸形竖曲线的设计标高 = 该桩号在切线上的设计标高－y 3. 竖曲线高程计算公式推导 已知条件： 第一条直线的坡度为1i ，下坡为负值， 第一条直线的坡度为2i ，上坡为正值， 变坡点的里程为K ，高程为H ， 竖曲线的切线长为B A T T T ==, 待求点的里程为X K 曲线半径R

竖曲线特点： 抛物线的对称轴始终保持竖直，即：X 轴沿水平方向，Y 轴沿竖直方向，从而保证了X 代表平距，Y 代表高程。 抛物线与相邻两条坡度线相切，抛物线变坡点两侧一般不对称，但两切线长相等。 竖曲线高程改正数计算公式推导 设抛物线方程为： ()021≠++=a c bx ax y 设直线方程为： ()02≠+=k b kx y 由图可知，抛物线与直线都经过坐标系222Y O X 的原点2O ,所以可得： 00==b c ； 分别对21y y 、求导可得： b ax y +=2'1 k y ='2 当0=x 时，由图可得： b i y ==1'1 k i y ==1'2 O O 2 Y 1 X 1 Y 2 X 2 P Q BPD L T A T B x i 1 i 2 ω

[整理]fx-5800P坐标高程计算程序交点法.

CASIO fx-5800P单交点通用型曲线坐标高程计算程序 一、说明： 本程序采用交点法计算道路基本型曲线坐标及高程，在建立好数据库后，能连续计算全线各桩号的中边桩坐标及高程。本程序共包括一个主程序和九个子程序，其中有坐标计算、高程计算、坡口坡脚线放样，锥坡放样坐标计算等子程序。 二、内容： 1．PM5-3 XYZJS（主程序） “SINGLE BASIC TYPE CURVE”◢ “METHOD OF COORDINATE PM5-3”◢ Deg:ClrStat:FreqOn:Fix 3 40→DimZ “INPUT(0) Or DATA(Else)”?N “FUNCTION”?P Prog “SUB5-35” If Z[30]<0:Then -1→Z[20]:Else 1→Z[20]:IfEnd Abs(Z[30])→D Pol(Z[26]-Z[28],Z[27]-Z[29]):Cls If J<0: Then J+360→Z[11]:Else J→Z[11]:IfEnd 计算ZH→JD方位角 Z[11]+Z[30]+180→Z[16] 计算HZ→JD方位角 If Z[16]>360:Then Z[16]-360→Z[12]:Else Z[16]→Z[12]:IfEnd If Z[12]>180:Then Z[12]-180→Z[23]:Else Z[12]+180→Z[23]:IfEnd计算JD→HZ方位角 S2÷（24R）-S4÷(2688R3)→Z[1] 计算第一缓和曲线内移值 0.5S-S3÷(240R2)+S5÷(34560R4)→Z[2] 计算第一缓和曲线切线增长值 T2÷(24R)-T4÷(2688R3)→Z[3] 计算第二缓和曲线内移值 0.5T-T3÷(240R2)+T5÷(34560R4)→Z[4] 计算第二缓和曲线切线增长值 (R+Z[3])÷sin(D)-(R+Z[1])÷tan(D)+Z[2]→Z[5] 计算第一切线长 (R+Z[1])÷sin(D)-(R+Z[3])÷tan(D)+Z[4]→Z[6] 计算第二切线长 90S÷(πR)→Z[7]:90T÷(πR)→Z[8] 计算第一、二缓和曲线偏角πR(D-Z[7]-Z[8])÷180→Z[9] 计算圆曲线长度 S+T+Z[9]→Z[10] 计算曲线总长度 Z[25]-Z[5]→List X[1] 计算直缓点桩号 1→K:Prog “SUB5-37” List X[1]+S→List X[2]:List X[2]+Z[9]→List X[3] 计算缓圆点、圆缓点桩号 Z[26]-Z[5]cos(Z[11])→List Y[1]:Z[27]-Z[5]sin(Z[11])→List Freq[1] If S≠0:Then“ZH PEG(m)=”:List X[1]◢显示直缓点桩号 Else “ZY PEG(m)=”:List X[1]◢显示直圆点桩号 IfEnd “X(m)=”:List Y[1]◢显示直缓(圆)点X坐标 “Y(m)=”:List Freq[1]◢显示直缓(圆)点Y坐标

竖曲线高程计算公式推导过程及计算流程

竖曲线高程计算公式推导及计算流程 1. 竖曲线介绍 竖曲线是指在纵断面内，两个坡线之间为了延长行车视距或者减小行车的 冲击力，而设计的一段曲线。一般可以用圆曲线和抛物线来充当竖曲线。由于圆曲线的计算量较大，所以，通常采用抛物线作为竖曲线，以减少计算量。 2. 竖曲线高程计算流程 竖曲线计算的目的是确定设计纵坡上指定桩号的路基设计标高，其计算步骤如下： a. 计算竖曲线的基本要素：竖曲线长L ；切线长T ；外失距E b. 计算竖曲线起终点的桩号：竖曲线起点的桩号=变坡点的桩号－T c. 计算竖曲线上任意点切线标高及改正值： 切线标高=变坡点的标高±（x T -）?i 改正值：2 21x R y = d. 计算竖曲线上任意点设计标高 某桩号在凹形竖曲线的设计标高 = 该桩号在切线上的设计标高+ y 某桩号在凸形竖曲线的设计标高 = 该桩号在切线上的设计标高－y 3. 竖曲线高程计算公式推导 已知条件： 第一条直线的坡度为1i ，下坡为负值， 第一条直线的坡度为2i ，上坡为正值， 变坡点的里程为K ，高程为H ， 竖曲线的切线长为B A T T T ==, 待求点的里程为X K 曲线半径R

竖曲线特点： 抛物线的对称轴始终保持竖直，即：X 轴沿水平方向，Y 轴沿竖直方向，从而保证了X 代表平距，Y 代表高程。 抛物线与相邻两条坡度线相切，抛物线变坡点两侧一般不对称，但两切线长相等。 竖曲线高程改正数计算公式推导 设抛物线方程为： ()021≠++=a c bx ax y 设直线方程为： ()02≠+=k b kx y 由图可知，抛物线与直线都经过坐标系222Y O X 的原点2O ,所以可得： 00==b c ； 分别对21y y 、求导可得： b ax y +=2'1 k y ='2 当0=x 时，由图可得： b i y ==1'1 k i y ==1'2 当L x =时，由图可得：

一般圆曲线计算程序(5800P)

一般圆曲线计算程序(5800P) （五）圆曲线坐标计算程序(xx-03-2519:27:05)转载▼标签：杂谈 五、圆曲线坐标计算程序：1、Deg:Fix 32、Lbl 0:3、“K0=”?K:?X:?Y:?A:?R4、“L=- 1,R=+1”：?G5、“ZS=0，FS≠0”：?S6、S≠0 =＞Goto 17、“Ki”?Z8、90(Z-K)（πR）→B9、2R sin B→D 10、“Xi=”:X+Dcos (A+GB)→P◢ 11、“Yi=”:Y+Dsin (A+GB)→Q◢ 12、A+180G(Z-K)（πR）→O 13、“ZBJ”?E 14、“XiL=”:P+Ecos(O-90)◢ 15、“YiL=”:Q+Esin(O-90)◢ 16、“YBJ”?F 17、“XiR=”:P+Fcos(O+90)◢ 18、“YiR=”:Q+Fsin(O+90)◢ 19、 Goto 0 20、 Lbl1 21、 “XC”?U:“YC”?V22．X+Rcos(A+90G)→M23．Y+Rsin(A+90G)→N 24、Pol(U-M,V-N)→H

25、J＜0 =＞J+360→J 26、“PJ=”:R-H→L◢ 27、“XCCZ=”:M+Rcos(J)→T◢ 28、“YCCZ=”:N+Rsin(J)→W◢29 、Pol(T-X,W-Y)→Z 30、“CZZH=”: K+sin-1(Z2R)πR90◢ 31、 Goto 0说明：1、设置小数保留三位。2、程序03、赋值起点桩号K0，赋值起点坐标X、Y，赋值半径R,赋值起点走向方位角A。4、赋值曲线转向，左转为-1，右转为+1。5、选择正算S=0，或反算S≠0、6、如果S≠0，进入反算程序。7、正算程序：输入所求桩号Ki。8、计算弦切角B。9、计算弦长D。 10、计算中桩坐标Xi并显示。 11、计算中桩坐标Yi并显示。 12、计算i点走向方位角O。 13、输入左边桩距中桩的距离E。 14、计算左边桩坐标XiL并显示。 15、计算左边桩坐标YiL并显示。 16、输入右边桩距中桩的距离F。 17、计算右边桩坐标XiR并显示。 18、计算右边桩坐标YiR并显示。 19、到程序0。 20、反算程序1。 21、输入测量坐标X

卡西欧5800-竖曲线全线高程计算程序

竖曲线全线高程计算程序（数据库模式-精简版） 主程序：ＫSＨ Lb1 0 :＂K=＂? Ｋ:＂D=＂?D:＂H=＂?Ｈ Lb1 1:Prog＂ＫSＨ０＂ If Abs(Ｓ-Ｋ)≥Abs(Ｔ):Then Ｐ+Ｉ(Ｋ-Ｓ)→Ｕ：IfEnd If Abs(Ｓ-Ｋ) < Abs(Ｔ):Then (Ｓ-(Ｔ)-Ｋ)2/(2R)+(P+I(K-S))→Ｕ：IfEnd Lb1 2 ：Ｕ-D-Ｈ→G Locate1,1，＂Ｋ=＂: Locaet3,1，Ｋ: Locaet1,2，＂D=＂: Locaet3,2，D: Locaet1,3，＂Ｈ=＂: Locate3,3，Ｈ: Locaet1,4，＂G=＂: Locaet3,4，G◢ Goto 0 数据库Ｋ：KSＨ０ K< 0 => Stop If K>0:Then 200→S:-12000→R:45.04→P:0.01345→I:62.7→T:If End If K>262.7:Then 520→S:7000→R:46→P:0.003→I: 94.481→T :IfEnd If K> …… 输入提示： If K>前段竖曲线终点里程: Then 本段竖曲线交点里程→S: 曲率半径（凸负凹正）→R: 交点高程→P: 纵坡（上正下负，以小数表示，如0.3%为0.003）→I: 切线长→T : Ifend 符号说明： K=？: 输入待求桩号； D=？: 若计算路面高程输入0；若计算路基高程则输入路面与路基的高差； （如：路面比路基高0.5米，则输入0.5，算出结果就是路基的设计高程。） H=？: 计算设计高程则输入0；若计算高差时；则输入实测高程； G= : 若H输入0，G表示设计高程；若H输入为实测高程，G表示高差（正为填，负为挖） 注：纵坡的设计精度不够会使程序计算出的精度也不够，可以微调纵坡调整（如0.3%的0.003改为0.00301或0.002995），以每段竖曲线的前端来验证，若计算出的高程比设计的高程低，就加大纵坡比，相反则减小纵坡比。

基本型曲线测设极坐标计算程序

基本型曲线测设极坐标计算程序 基础理论 平面路线的计算和设计是铁路、公路测量工作中的一项重要的内容。主要包含平面曲线要素和平曲线主点桩号的计算，以及路线中桩逐桩坐标的计算。 随着全站仪、光电测距仪、计算机和Casio可编程系列计算器的广泛应用和飞速发展，测量的方法也随之改进，测量的效率和精度不断提高。但也存在部分测量基层人员对曲线理论了解不够深入，只会照搬程序和使用程序，如果程序出现问题、需要修改或自己编写时，却不知如何进行。 现在就目前现有的测量理论，将极坐标测设曲线基础由浅入深的介绍给广大测量人员，便于了解和读懂计算程序。当我们在现场测量时，只需携带编有曲线计算程序的计算器，输入所测点的点号（里程）或与之相关构造物的各点时，即刻得到测点的测量数据。操作简便灵活、计算快捷、便于掌握。既减轻了计算工作量，又改善了工作条件，提高了工作效率。 基本型曲线的综合理论 目前我国使用的基本型曲线主要分为两种类型：一种是圆曲线；另一种是圆曲线两端加设相等缓和曲线的曲线。 首先介绍圆曲线的综合要素的计算： 一、看图学曲线 Ⅰ

圆曲线的主点和要素的意义： JD……交点，两相邻直线相交的点； ZY……直圆点，按线路前进方向由直线（Ⅰ）进入圆曲线的分界点； QZ……曲中点，圆曲线的中点； ZY……圆直点，按线路前进方向由圆曲线进入直线（Ⅱ）的分界点； T ……切线长，为交点至直圆点或圆直点的长度； L ……曲线长，圆曲线的长度（即ZY至YZ的圆弧长度）； E ……外矢距，为交点至曲中点的长度； a……转向角，直线（Ⅰ）与直线（Ⅱ）的夹角，沿线路前进方向，直线（Ⅱ）向左转则为a左，直线（Ⅱ）向右转则为a右； R ……圆曲线的半径。 二、圆曲线要素的计算 a、R、交点里程、曲线的转向（左、右）是计算和编程时的必要资料，是已知值。其它的主要素值一般设计直接提供，也可以通过以下公式计算求得。 圆曲线要素的计算公式： 切线长 T＝Rtan（a/2） 曲线长 L＝R aπ/180° 外矢距 E＝R（sec（a/2）－1）＝R（1/cos（a/2）－1） 式中计算L时，a以度为单位。 三、圆曲线主点里程的计算 主点里程计算是根据计算出的曲线要素，由一已知里程来推算，一般设计直接提供的是交点的里程，我们先依据交点里程计算出直圆点里程，再沿里程增加方向由ZY→QZ→YZ进行推算。 ZY＝JD － T； QZ＝ZY + L/2； YZ＝QZ + L/2