资源描述:
《卡西欧5800计算器公路测量常用程序集2.3版》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、由子夜收集整理-102805028中国测量之家QQ群欢迎爱好测量的朋友Mea.5d6d.com中国测量技术论坛一、程序功能主要功能:采用交点法方式计算多条线路坐标正反算,可算任意复杂线型及立交匝道,包括C型,S型、卵型、回头曲线等;极坐标放样,全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。新版本优化:1、优化程序语句、2、取消原线元法计算,化线元法为交点法。3、高程计算修改,4、附计算坐标及高程参数设计要素输入实例二、源程序(绿色为程序名;蓝色为输入计算器内容)红色为网友调试后修改笔误
2、。0.总主程序(1、坐标计算放样程序2、坐标反算程序;3、高程计算查阅程序;4、路基半幅标准宽度查阅程序;5、路基边坡及开挖口放样程序;6、路基标准距离放样;7、桥梁锥坡计算放样程序;8、极坐标计算程序;9、隧道超欠挖计算程序)运行后按1~9数子约半秒,则选择1至9的程序,返回时,在桩号输入-1,返回选择计算类型。输入-2,返回选择线路。程序名:0(数子0)1.主程序:一般坐标计算及放样程序程序名:1XYProg"DX":Prog"QX":90→A:"PJ1"?A:A→B:"PJ2"?B:A→Z[1]:B→Z[9]:Do:"KM"?
3、Z:Z=-1=>Stop:Z=-2=>Break:Prog"K":?D:0→L:"L0"?L:L→Z[10]:Porg"A":Z[2]+Z[1]→A:A-Z[9]→E:I+Dcos(A)+Z[10]cos(E→X:J+Dsin(A)+Z[10]sin(E→Y:Prog"XY":Prog"JS":LpWhileZ≠-12.主程序:由大概桩号及坐标反算桩号及距离程序名:2ZDProg"QX":Do:"KM"?Z:Z=-1=>Stop:Z=-2=>Break:Prog"K":"XO"?X:"Y0"?Y:Porg"B":Prog"ZD":L
4、pWhileZ≠-13.主程序:任意点高程计算及横坡程序名:3GCProg"QX":0→B:"H-B"?B:B→Z[9]:Do:"KM"?Z:Z=-1=>Stop:Z=-2=>Break:?D:Prog"H":Fix3:"H=":Lcoate6,4,H-Z[9]:"I=":Locate6,4,I:LpWhileZ≠-14.主程序:任意桩号位置的标准路基宽度计算程序名:4GDProg"QX":Do:"KM"?Z:Z=-1=>Stop:Z=-2=>Break:-1→D:Prog"C":L→P:1→D:Prog"C":Fix3:"LGD=
5、":Lcoate6,4,P:"RGD=":Locate6,4,L:LpWhileZ≠-15、主程序:路基开挖边线及填方坡脚线放样程序程序名:4BPProg"DX":Prog"QX":0.5→B:"TH-GD"?B:B→Z[7]:Do:"KM"?Z:Z=-1=>Stop:Z=-2=>Break:Prog"K":“X0"?X:"Y0"?Y:Z[8]→M:"M0"?M:M→Z[8]:Porg"B":D→P:Prog"C":IfD<0:Then0.75-L→D:ElseL-0.75→D:IfEnd:Prog“H”:H-0.03-Z[8]→G
6、:Prog“W1”:IfG>0:ThenGotoT:IfEnd:由子夜收集整理-102805028中国测量之家QQ群欢迎爱好测量的朋友Mea.5d6d.com中国测量技术论坛-G→H:IfH>E+F:ThenL+M+N+U+C(H-E-F)+BF+AE→S:Goto0:IfEnd:IfH>E:ThenL+M+N+B(H-E)+AE→S:Goto0:IfEnd:IfHWThenL+Z[7]+V+J(G-W)+IW→S:ElseL+Z[7]+GI→S:IfEnd:
7、LbI0:Fix2:P→D:Abs(D)-S→T:"LX=":Locate6,4,T:Prog"ZD":"TW=":Lcoate6,4,G◢LpWhileZ≠-16、主程序:定值放样路基桩计算填挖值程序名:6FMProg"DX":Prog"QX":Do:"KM"?Z:Z=-1=>Stop:Z=-2=>Break:Prog"K":?D:Porg"A":Z[2]+90→A:I+Dcos(A→X:J+Dsin(A→Y:Prog"XY":Prog"JS":Z[8]→M:”M0”?M:M→Z[8]:Prog“H”:”TW=”:Locate6,
8、4,H-Z[8]:LpWhileZ≠-17、主程序:桥梁锥坡计算放样程序名:7ZPProg"DX":Prog"QX":"Z0"?Z:"LD:Z-,Y+"?D:Abs(D)→R:"LR"?R:D→Z[7]:R→Z[10]:Z→Z[9]: