5800万能竖曲线程序

卡西欧5800竖曲线万能程序 程序代码:“N=?,NEW=0,OLD≠0”?N: N≠0=>Goto S:“A=”?A:“B=”?B:“O=”?O:“G=”?G:“R=”?R: Lbl S: “S=”?S :O-S→L:A-B→W:Abs(R*W÷2→T:O-T→M:O+T→P:IfS≤M:Then G-L*B→H:...

卡西欧5800竖曲线万能程序

程序代码:
“N=?,NEW=0,OLD≠0”?N: N≠0=>Goto S:“A=”?A:“B=”?B:“O=”?O:“G=”?G:“R=”?R: Lbl S: “S=”?S :O-S→L:A-B→W:Abs(R*W÷2→T:O-T→M:
O+T→P:IfS≤M:Then G-L*B→H:Goto5:Else If S≤O:Then Goto3:Else If S≤P:Then Goto4:Else Goto6:IfEnd:IfEnd:IfEnd:Lbi3:If W>0:Then G+(M-S)2÷2÷R-L*B→H:Goto5:Else If W<0:Then G-(M-S)2÷2÷R-L*B
→H:Goto5:IfEnd:IfEnd:Lbi4:If W>0:Then G+(S-P)2÷2÷R-L*A→H:
Goto5:Else If W<0:Then G-(S-P)2÷2÷R-L*A→H:Goto5:IfEnd:IfEnd:
Lbl 6:G-AL→H:Goto5:Lbl 5: “H=”:H◢Goto S(为所求桩高度)
说明:
S:待求高桩号。A:大里程坡度。B:小里程坡度。O:变坡点里程。G: 变坡点高度。R:半径。
N:等于0为输入新的参数数据,反之进入桩号求高度计算。

  • 发表于 2018-11-05 14:16
  • 阅读 ( 131 )
  • 分类:5800

你可能感兴趣的文章

相关问题

0 条评论

请先 登录 后评论
admin
admin

192 篇文章

作家榜 »

  1. admin 192 文章
  2. 老Y 25 文章
  3. 胡亮 4 文章
  4. 肖肖 3 文章
  5. netbee 1 文章
  6. 唯一 1 文章
  7. 梁雄 1 文章
  8. 秦汉 1 文章