4800全线任意点设计高程计算程序,竖曲线内外都可以计算!有详细的说明!

4800全线任意点设计高程计算程序,竖曲线内外都可以计算!有详细的说明!

任意点高程计算 RYDGC  JS(4800版)
程序特点:既可计算竖曲线范围内任意点的设计高程,也可计算竖曲线之外任意点的设计高程。
程序如下:
T=Abs(A“I1”- B“I2”) ×R÷200◢ 计算并显示切线长
L=2T◢ 计算并显示竖曲线长
E=T2÷2÷R◢ 计算并显示外距
F“BPDZH”:G“GC”:X “ZY”=F-T◢ 输入前变坡点桩号、高程,计算并显示竖曲线起点桩号
Y“QZ”=X+T◢ 计算并显示竖曲线中点桩号
Z“YZ”=F+T◢ 计算并显示竖曲线终点桩号
LbI 1:{J}:J“JZZH”:J<X => H = G-(F -J)×A÷100◢ 输入加桩桩号,加桩桩号小于竖曲线起点桩号时计算并显示加桩处的设计高程
Goto 1Δ J<Y => M=(J-X)2÷2÷R:Goto 2ΔJ<Z => M=(J-Z)2÷2÷R:Goto 3ΔH = G+(J-F)×B÷100◢ 计算竖曲线竖距、计算并显示加桩桩号大于竖曲线终点桩号时加桩处的设计高程
Goto 1ΔLbI 2:A > B => H = G-(F-J)×A÷100 - M◢
Goto 1ΔA < B => H = G-(F-J)×A÷100 + M◢
Goto 1ΔLbI 3:A > B => H = G+(J- F)×B÷100 - M◢
Goto 1Δ A < B => H = G+(J- F)×B÷100 + M◢
Goto 1Δ←┘
以上程序段是判断竖曲线的凹凸并计算加桩处的设计高程

  • 发表于 2018-11-05 13:41
  • 阅读 ( 19 )
  • 分类:4800

你可能感兴趣的文章

相关问题

0 条评论

请先 登录 后评论
admin
admin

87 篇文章

作家榜 »

  1. admin 87 文章
  2. 胡亮 3 文章
  3. 肖肖 2 文章
  4. 12 1 文章
  5. boyving 1 文章
  6. 焦淑闻 0 文章
  7. 王家勇 0 文章
  8. 刘知远 0 文章