5800P编程任何线型中边桩坐标计算.docVIP

左向卵形曲线计算图示2: JD1 X=9858.265 Y=10034.988 R=75 卵形曲线长Ls=48.166 JD2 X=9949.871 Y=10155.449 R=50 QD K0+084.182 X=9922.319 Y=10007.905 (QX)FWJ=157 04 52 YH K0+196.332 X=9880.441 Y=10100.900 (QX)FWJ=71 24 17.4 终点 HY K0+244.498 X=9910.602 Y=10136.790 (QX)FWJ=25 24 34.8 ZD K0+316.067 X=9973.800 Y=10119.149 (QX)FWJ=303 23 51.5 JD2 起点 ↑卵曲线 JD1 5800任意线型中边桩坐标计算程序（卵形曲线示例）RYSX ZB JS (主程序)Lb1 1: “K”? K:Prog “ S1 ” ↙ (R -D)/Abs(Z - Q)→P: Abs(K - Q)→C: PC→E↙F＋（E＋2D）×C×90÷π→J↙F＋（E÷8＋2D）×C×45÷（4π）→M↙F＋（3 E÷8＋2D）×C×135÷（4π）→N↙F＋（5 E÷8＋2D）×C×225÷（4π）→U↙F＋（7 E÷8＋2D）×C×315÷（4π）→V↙F＋（E÷4＋2D）×C×45÷（2π）→H↙F＋（E÷2＋2D）×C×45÷π→O↙ F＋（3 E÷ 4＋2D）×C×135÷（2π）→ G↙“X=”:A＋C÷24×（cos（F）＋4×（cos（M）＋cos（N）＋cos（U）＋cos（V））＋2×（cos（H）＋cos （O）＋cos（G））＋cos（J））→X ◢“Y=”:B＋C÷24×（sin （F）＋4×（sin（M）＋sin（N）＋sin（U）＋sin（V））＋2×（sin （H）＋sin （O）＋sin （G））＋sin（J））→Y ◢??Lb1 1:?W:? L:? I↙“XL=”:X＋Lcos（J－W）◢??“YL=”:Y＋Lsin（J－W）◢??“XR=”:X＋Icos（J＋W）◢??“YR=”:Y＋Isin（J＋W）◢ Goto 1S1（数据库）子程序If K≤终点桩号：Then起点桩号→Q:终点桩号→Z：起点X坐标→A:起点Y坐标→B： 起点切线方位角→F：起点曲率1/R1→D:终点曲率1/R2→R: （如是直线均输0） Goto 0:If End换行下一个线元要素输入同上。。。。。。。。。。。 。。。。。。。。。。。。。。。。。。。Lb1 0：Return ↙说明：曲率 “1/R1”? D: “1/R2”?R 为起终点半径的倒数. 左向为负右向为正.若有多条路线数据库建如S2, S3。。。。。S5在使用时把主程序S1根据计算需要改为S2。。。。。S5要计算线路即可。K为待求点里程, W为夹角，L为左边距，I为右边距。 （ 卵形曲线计算 ）逐桩坐标计算表 序号里 程中 边 桩X 坐 标Y 坐 标切线方位角1 QDK0+084.182中桩9922.31910007.905157度04分52秒2K0+084.182左11.25米9926.70010018.267157度04分52秒3K0+084.182右11.25米9917.9389997.543157度04分52秒4K0+089.182中桩9917.78210010.004153度15分41秒5K0+089.182左11.25米9922.84410020.051153度15分41秒6K0+089.182右11.25米9912.7209999.957153度15分41秒7K0+094.182中桩9913.39510012.401149度26分30秒8K0+094.182左11.25米9919.11510022.088149度26分30秒9K0+094.182右11.25米9907.67510002.713149度26分30秒10K0+099.182中桩9909.17710015.