全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
卵形曲线上各点位中桩及边桩坐标的程序直线线路上点的坐标简单易算,但卵形曲线上点的坐标计算则较复杂,为了便于掌握运用,下面介绍一种施工实践中应用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为缓圆至圆缓方位角。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 直缓点坐标。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) 直缓点至所求点弦切角。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+
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
评论
0/150
提交评论