公路工程（包括桥梁隧道）多个测量计算程序.docVIP

竖曲线计算 程序名:【V.CURVE】 Lbl0 Norm {Q}:QCHAINAGE ProgDATA………………………………………………………………………………运行数据库程序“DATA” W=(B-A)/100:T=RAbsW/2……………………………………………………………计算坡度差和切线长 J=Q-U…………………………………………………………………………………………计算所求桩号点到竖交点的距离 QC=Goto6◣ QU+T=Goto6◣ …………………………………………………………………判断所求的桩号在竖曲线里所处的范围 Q≤U-T=Goto2◣ W0=Goto3◣ W0=Goto4◣…………………………………………………………………………判断该竖曲线是凸型还是凹型 Lbl2 H=F+AJ/100…………………………………………………………………………当所求点在直线上时的计算设计标高 Goto5 Lbl3 Q≤U=H=F+AJ/100-(T+J)2/2R◣ QU=H=F+BJ/100-(T-J)2/2R◣ …………………………………………凸型曲线的高程计算 Goto5 Lbl4 QU=H=F+BJ/100+(T-J)2/2R◣