Fx5800p任意曲线中边桩,平曲+竖曲+隧道超欠挖程序.docVIP

  • 11
  • 0
  • 约2.78千字
  • 约 9页
  • 2016-12-08 发布于江苏
  • 举报

Fx5800p任意曲线中边桩,平曲+竖曲+隧道超欠挖程序.doc

Fx-5800p任意曲线中边桩,平曲+竖曲+隧道超欠挖程序 本程序结合任意曲线中边桩坐标计算,隧道超欠挖,隧道坐标正反算于一体只需运行一个主程序即可。 真正做到全线贯通 本程序由一个主程序 一个正算子程序 两个反算子程序 一个平曲线数据库 一个竖曲线数据库组成 本程序为线元参数,可计算任意曲线中边桩坐标以及隧道三维坐标 主程序(ZBZFS)运行 Fix 3 :4→ DimZ : ″1.SZ=XY ″: ″2.XY=SZ″: ″3.SZ=XYFH″: ″4.SXY=XYFH″:5.FZA=W″:?N :If N = 1:Then Goto 1: IfEnd If N = 2:Then Goto 2:IfEnd If N=3:Then Goto 3:IfEnd If N=4:Then Goto 4:IfEnd If N=5:Then Goto 5:IfEnd Lb1 1:?S : ?Z :Prog “QYS”: Abs(S-O) →W :Prog “ZS”: “XS=”?X◢ “YS=”?Y◢ Goto 1 Lb1 2:?X : ?Y :?S :X →I:Y→J:Prog “FS”: “S=”?S◢ “Z=”?Z◢ Goto 2 Lb1 3: ?S:?Z:Prog “QYS”: Abs(S-O) → W:Prog ZS: X:Y:

文档评论(0)

1亿VIP精品文档

相关文档