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

缓和曲线超高横坡计算缓和曲线超高段计算超高横坡计算公式：I=Abs(B-A)*2E/Q-E I=Abs(B-A)-Q(D-E)/(C-Q)+E I缓和曲线内任一横断面超高横坡度(I的正负，抬高边为正，降低边为负)；B缓和曲线超高段内任一点里程桩号；A缓和曲线起点ZH或终点HZ的里程桩号；E直线段路拱横坡度，输入时不考虑符号取正值；C缓和曲线长度(M);D最大超高段设定的最大超高横坡度，取正值；Abs绝对值符号；Q缓和曲线起(终)点至超高变坡临界面距离，Q=2E/ ( E+D )*C程序清单：CGHP (文件名)LblO :E :D :C :A :L :BH :B<0=> Goto 2a Q=2E/( E+D )*C : Abs(B-A)> Q=> Goto IziI=Abs(B-A)*2E/Q-E，F=H + LP T=H-EL / Goto 0/ (计算 ZH 或 HZ至Q之间缓和曲线上任一点超高横坡度及左右边桩F、T之高程， 注意须输入与边桩同横断面的中桩高程-中桩高程另算)Lbl 1 : I=(Abs(B-A)-Q)(D-E)/(C-Q) + E F=H + LP T=H-IL / Goto 0/ (计算Q至HY或YH之间缓和曲线上任意一点超高横坡度及左右 边桩之高程，L为半幅路宽，单位为M)Lbl 2 : EDCAL : Goto 0 注：输入 B<0 重新开始竖曲线计算公式：G = H-CP+ZF(T-Abs Q2/2R程序清单：SHXGC(任意)内容：Lbl 0 : H : B : R : I : J : L : T=R«Abs(J-I)/2 :C=B-L : F=1 : I>J =>F=-lzlL<O=>HBRIJ : Goto 0 : /> L< B-T= >Z=0 : P=I /> L< B+T =>Z=1 :P=J W>Z=0 : P=J/ G = H-CP+ZF(T-Abs C)2/2R注：输入L«0重新开始H为变坡点高程：B为变坡点桩号：L为待求点桩号：I、J为坡度：T为切线长二Rc(/2二R(il-i2)/2