缓和曲线超高横坡计算.docx

缓和曲线超高横坡计算缓和曲线超高段计算超高横坡计算公式：I=Abs(B-A)*2EQ-EI=Abs(B-A)-Q(D-E)(C-Q)+EI缓和曲线内任一横断面超高横坡度(I的正负,抬高边为正,降低边为负)；B缓和曲线超高段内任一点里程桩号；A缓和曲线起点ZH或终点HZ的里程桩号；E直线段路拱横坡度，输入时不考虑符号取正值；C缓和曲线长度(M);D最大超高段设定的最大超高横坡度，取正值；Abs绝对值符号；Q缓和曲线起(终)点至超高变坡临界面距离，Q=2E(E+D)*C程序清单：CGHP(文件名)1.blO:E:D:C:A:L:BH0=>Goto2Q=2E(E+D)*C:Abs(B-A)>Q=>GotoIziI=AbS(B-A)*2EQ-E/F=H+LBT=H-EL/GotoOd(计算ZH或HZ至Q之间缓和曲线上任一点超高横坡度及左右边桩F、T之高程，注意须输入与边桩同横断面的中桩高程-中桩高程另算)1.bl1:I=(Abs(B-A)-Q)(D-E)(C-Q)+E/F=H+LPT=H-IL/Goto0,(计算Q至HY或YH之间缓和曲线上任意一点超高横坡度及左右边桩之高程，L为半幅路宽，单位为M)1.bl2:EDCAL:Goto0注:输入B0重新开始竖曲线计算公式：G=H-CP+ZF(T-AbsC)22R程序清单：SHXGC(任意)内容：Lbi0:H:B:R:I:J:L:T=RAbs(J-I)2:C=B-L:F=I:I>J=>F=-ldLO=>HBRIJ:Goto0:>L<B-T=>Z=0:P=I>L<B÷T=>Z=1:P=J>Z=0:P=J/G=H<P+ZF(T-AbsC)22R注：输入L0重新开始H为变坡点高程：B为变坡点桩号:L为待求点桩号:I、J为坡度：T为切线长=R2=R(il-i2)2