《程序卵形曲线上各点时位中桩及边桩坐标的方法.doc》由会员分享，可在线阅读，更多相关《程序卵形曲线上各点时位中桩及边桩坐标的方法.doc（3页珍藏版）》请在三一文库上搜索。
1、卵形曲线上各点位中桩及边桩坐标的程序直线线路上点的坐标简单易算，但卵形曲线上点的坐标计算则较复杂，为了便于掌握运用，下面介绍一种施工实践中应用CASIOfx-4800PA型计算机程序计算卵形曲线上点位中桩及边桩坐标的方法。程序清单及说明：Fi LXQXFY（文件名）L1 A：R：G：B：C：D：E：O：P O（B，C）HY点里程及坐标；P（D，E）YH点里程及坐标；A缓和曲线参数；R曲线半径；G曲线左右判定条件。L2 Defm 2 扩大内存L3 L = V2/R：V= O- L L为缓和曲线总长，V直缓点里程。L4 PoL（D-B），（E-C）L5 K=J：J0K=J+360 K为缓圆至圆缓方
2、位角。L6 N=K-G（90（P-O）/R） N为缓圆点切线方位角。L7 Q“QX” =L-L3/40/R2+L5/3456/R4- L7/599040/R6L8 W“WY”=（L2/6/R-L4/R3/336+L6/42240/R5-L8/9676800/R7 Q“QX”、 W“WY”为切线支距坐标。L9 M=N-G（90L/R） M直缓点切线方位角。L10 Rec(（Q2 + W2），K+G（180-90（P-O）/R -（90L/R-tan-1 （W/Q）) 圆缓点总偏角 90（P-O）/R圆曲线弦切角； 90L/R-tan-1（W/Q）缓圆点切线角。L11 Z1=B+I：Z2=C+J
3、直缓点坐标。L12 LbI 0L13 H,T,U 待求点要素H所求点里程；T边距；U 交角（左为-，右为+）。L14 HOGoto 1 L15 HPGoto 2 L16 LbI 1 L17 S=（H-V） S：所求点至直缓点曲线长。L18 Q=S-S5/40/R2/L2+S9/3456/R4/L4-S13/599040/R6/L6L19 W=S3/6/R/L-S7/336/R3/L3+S11/42240/R5/L5 S15/9676800/R7/L7 切线支距坐标L20 Rec(（Q2 + W2），（M+G（tan-1 (W/Q)） （Q2 + W2）直缓点至所求点弦长； tan-1 (W/Q
4、) 直缓点至所求点弦切角。L21 X“XZ”=Z（1）+I L22 Y“YZ”=Z（2）+J 中桩坐标L23 Rec(T，（M+G（90S2/R/L）+U）)L24 X“XB”=X+I L25 Y“YB”=Y+J 边桩坐标L26 Goto 0L27 LbI 2 L28 S=H- 所求点到HY曲线长L29 Q=Rsin（180S/R）：W=R（1-cos（180S/R ）L30 Rec(（Q2 + W2），（N+G（tan-1 (W/Q)）) 切线支距坐标L31 X“XZ”=B+IL32 Y“YZ”=C+J 中桩坐标L33 Rec(T，（N+G（2（tan-1 (W/Q)）+U)）L39 X“XB”=X+IL40 Y“YB”=Y+J 边桩坐标L41 Goto 0