标准规范下载简介和部分内容预览:
标高全线路任意点计算“HL=”:G+IL→X:Locate 4,3,X:Locate 11,3,“I=”:Locate 13,3,I*100
“HR=”:G+JL→Y:Locate 4,4,Y:Locate 11,4,“I=”:Locate 13,4,J*100◢
Cls:Norm 2:“BM+HS≤0,Goto 1”?Z:Z≤0=> Goto 1:Cls (输入视线高)
“KM=”:Locate 4,1,K:Locate 10,1,“PY=”:Locate 13,1,L:Fix 3
Norm 2:Cls:Goto1
(后面可加已知视线高计算读数部分,不想计算读数则视线高输入0或负数如不想显示麻烦,可将Locate语句去掉)
以下两个子程序不需运行,只是两个独立的数据库赋值程序,字母重复不影响计算结果
If K≤第二曲线起点桩号:Then 第一曲线交点高程→A:第一曲线交点桩号→B:第一曲线前坡→C:第一曲线后坡→D:第一曲线半径→R:Return:Ifend
连接线新建工程门式墩施工方案…………….(有几个变坡点编几个If语句)
PODU 计算坡度子程序
If K≤第一变(非变)坡段终点:Then 第一曲线起点桩号→A:第一曲线起点左坡→B:第一曲线起点右坡→C:第一曲终点桩号→D:第一曲终点左坡→E:第一曲终点右坡→F: Return:Ifend
………………(每一个超高变化线元一个If语句)
©版权声明
资源来自互联网,如有侵权请联系删除