缓和曲线超高段计算
超高横坡计算公式：
公式（一）：I=Abs(B-A) ×(E+D)/C-E
公式（二）：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所谓临界面 即抬高边 I=+坡比，降低边I=-坡比。即抬高值=降低值处，但符号相反。
程序清单：CGHP（文件名）
Lb1 0：E：D：C：A：L：{BH}：B≤0=> Goto 2⊿ Q=2E/（E+D）*C：Abs(B-A)> Q=> Goto 1⊿
I=Abs(B-A)*2E/Q-E◢ F=H+LI◢ T=H-EL ◢ Goto 0⊿ （计算ZH或HZ至Q之间缓和曲线上任一点超高横坡度及左右边桩F、T之高程，注意须输入与边桩同横断面的中桩高程-中桩高程另算）
Lb1 1：I=(Abs(B-A)-Q)(D-E)/(C-Q)+E◢ F=H+LI◢ T=H-IL ◢ Goto 0⊿（计算Q至HY或YH之间缓和曲线上任意一点超高横坡度及左右边桩之高程，L为半幅路宽，单位为M）
Lb1 2：{EDCAL}：Goto 0 注：输入B≤0重新开始
因篇幅问题不能全部显示，请点此查看更多更全内容