《2022年Fx-隧道测量程序实用版 .pdf》由会员分享,可在线阅读,更多相关《2022年Fx-隧道测量程序实用版 .pdf(4页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、Fx-5800P测量程序(两条线路)断面检测计算程序:DMJC 3DimZ:Lbl 0:?N:If N=1:Then Goto 1:Else Goto 2:IfEnd:Lbl 1:Prog“FANS ZX”:If Z-5.32:Then-1Z -15.32E:Else 1Z 15.32E:IfEnd:?C:Prog“GCJS ZX”:M1.65Z3:If CZ3:Then Goto3:Else Goto4:IfEnd:Lbl 2:Prog“FANS YX”:If Z5.32:Then-1Z15.32E:Else 1 Z-15.32E:IfEnd:?C:Prog“GCJS YX”:M 1.65Z
2、3:If CZ3:Then Goto3:Else Goto4:IfEnd:Lbl 3:?A:“Z1=”:E(A2(CZ3)2)Z1“Z2=”:(E2(CZ3)2)AZ2 Goto 0Lbl 4:?B:“Z1=”:(E2.5)(B2(CZ3)2)Z1“Z2=”:(E2.5)2(CZ3)2)BZ2 Goto 0正算主程序:ZHENGSUAN Lbl 0:?N:?S:?Z:If N=1:Then Goto1:Else Goto2:IfEnd:Lbl 1:Prog“SJK ZX”:Goto3:Lbl 2:Prog“SJK YX”:Goto3:Lbl 3:(P R)(2HPR)D:Abs(S O)W:P
3、rog“SUB1”:“XS=”:XX“YS=”:YY“FS=”:F90FGoto 0反算主程序:FANSUAN Lbl 0:?N:?S:?X:?Y:If N=1:Then Goto1:Else Goto2:IfEnd:Lbl 1:Prog“SJK ZX”:Goto3:Lbl 2:Prog“SJK YX”:Goto3:Lbl 3:(P R)(2HPR)D:XI:YJ:Prog“SUB2”:“S=”:OW S“Z=”:ZZGoto 0左线反算程序:FANS-ZX?S:?X:?Y:Prog“SJK ZX”:(PR)(2HPR)D:XI:YJ:Prog“SUB2”:“S=”:OW S“Z=”:ZZ右线
4、反算程序:FANS-YX?S:?X:?Y:Prog“SJK YX”:(PR)(2HPR)D:XI:YJ:Prog“SUB2”:“S=”:OW S“Z=”:ZZ高程计算主程序:GCJS Lbl 0:?N:?S:If N=1:Then Prog“GCJS ZX”:Else Prog“GCJS YX”:IfEnd:“M=”:M M Goto 0名师资料总结-精品资料欢迎下载-名师精心整理-第 1 页,共 4 页 -左线高程计算程序:GCJSZXIf 8687.5S And S 9012.5:Then 361.517 (162.5 (S(8850 162.5)10.034-1(S(8850 162.5
5、)2213000M:Else Goto1:IfEnd:Lbl 1:If 9012.5S And S9212.306:Then 362.9795 (S 9012.5)0.009M:Else Goto2:IfEnd:Lbl 2:If 9212.306 S And S9697.694:Then 366.962 (242.694(S (9455 242.694)10.009 -1(S(9455 242.694)2212000M:IfEnd右线高程计算程序:GCJSYXIf 8664 S And S 8986:Then 360.667(161(S(8825 161)10.034-1(S (8825 16
6、1)2214000M:Else Goto1:IfEnd:Lbl 1:If 8986S And S9199:Then 362.438(S 8986)0.011M:Else Goto2:IfEnd:Lbl 2:If 9199S And S 9751:Then 367.817 (276(S(9475 276)10.011-1(S(9475 276)2212000M:IfEnd子程序:SUB1 6DimZ:0.1739274226Z1:0.3260725774Z2:0.0694318442K:0.3300094782L:G180QKW(1P KWD)Z3:G 180QLW(1P LWD)Z4:G180
7、(1 L)QW(1P(1 L)WD)Z5:G 180(1 K)QW(1P (1 K)WD)Z6:UW(Z1Cos(Z3)Z2 Cos(Z4)Z2 Cos(Z5)Z1 Cos(Z6)X:VW(Z1 Sin(Z3)Z2 Sin(Z4)Z2 Sin(Z5)Z1 Sin(Z6)Y:G 180QW(1P WD)90F:XZ Cos(F)X:YZ Sin(F)Y子程序:SUB2 G90T:Abs(Y V)Cos(T)(X U)Sin(T)W:0Z:Lbl 0:Prog“SUB1”:T 180QW(1P WD)L:(J Y)Cos(L)(I X)Sin(L)Z:If Abs(Z)10-6:Then Goto
8、1:Else W ZW:Goto0:IfEnd:Lbl 1:0Z:Prog“SUB1”:(JY)Sin(F)Z左线数据库:SJKZX If 8664.061S And S9247.115:Then 9112.707U:2432.7762V:8664.061O:1564326.5G:583.054H:3368.07P:3368.07R:1Q:Else Goto1:IfEnd:Lbl 1:If 9247.115S And S9759.572:Then 8559.884U:2615.7832V:9247.115O:1663833.5G:512.457H:3500P:3500R:-1Q:I fEnd右
9、线数据库:SJKYX If 8645.739S And S9193.166:Then 9127.191U:2417.1346V:8645.739O:1583210.9G:547.427H:3800P:3800R:1Q:Else Goto1:IfEnd:Lbl 1:If 9193.166S And S9759.023:Then 8605.084U:2580.1189V:9193.166O:1664725.3G:565.857H:3196.23 9P:3196.239R:-1Q:IfEnd名师资料总结-精品资料欢迎下载-名师精心整理-第 2 页,共 4 页 -使用说明特别申明:(1)本程序可对直线
10、、圆曲线、缓和曲线(完整或非完整型)进行计算(2)适用于弧长小于2倍半径的各种线元坐标正反算1、规定(1)以道路中线的前进方向区分左右;当线元往左偏时Q=-1,当线元往右偏时Q=1,当线元为直线时Q=0(2)当所求点位于中线(设计线)时Z=0,当位于中线(设计线)左边时Z 取负值,当位于中线(设计线)右边时,Z取正值。(3)当线元为直线时,其起、止点的曲率半径为无穷大,以10 的 45 次代替。(4)当线元为圆曲线时,无论其起、止点与什么线元相接,其曲率半径均等于圆弧的半径。(5)当线元为完整缓和曲线时,起点与直线相接时,曲率半径为无穷大,以10 的 45 次代替;与圆曲线相接相接时,曲率半径
11、等于圆曲线的半径。止点与直线相接时,曲率半径为无穷大,以10 的 45 次代替;与圆曲线相接时,曲率半径等于圆曲线的半径。(6)当线元为非完整缓和曲线时,起点与直线相接时,曲率半径等于设计规定值;与圆曲线相接时,曲率半径等于圆曲线的半径。止点与直线相接时,曲率半径等于设计规定值;与圆曲线相接时,曲率半径等于圆曲线的半径。2、符号说明U线元起点X坐标V线元起点Y坐标O 线元起点里程G 线元起点切线方位角H线元长度P线元起点圆曲率半径R线元止点圆曲率半径Q 线元左右偏标志(左偏Q=-1,右偏 Q=1,直线段Q=0)输入部分N计算左线输入1,计算右边输入其他数即可S正算时为待求点里程,反算时为所求点
12、近似里程Z正算时所求点距中线(设计线)的边距(左边取负,右边取正,在线上取0)X反算时所求点的X坐标Y反算时所求点的Y坐标A测点所求断面半径C测点实际高程名师资料总结-精品资料欢迎下载-名师精心整理-第 3 页,共 4 页 -输出(显示)部分XS=正算计算得出的所求点X坐标YS=正算计算得出的所求点Y坐标FS=正算计算得出的所求点的切线方位角S=反算计算得出的所求点的里程Z=反算计算得出的所求点的边距Z1 计算得出测点支距方向平移值(“+”往内移、“-”往外移)Z2 计算出测点超欠值“超欠挖计算程序”及“断面检测计算程序”:5.32:隧道中线与设计线距离1.65:圆心至设计高程点距离2.5:边
13、墙圆心至隧中距离A:隧拱半径B:隧道边墙半径“高程计算程序”:a 90927.5:第一竖曲线起点里程(其值为f 值-竖曲线切线长T)b 251.443:线路起算点高程c 1.2:第一坡度d 90619.24:线路起算点里程e 91692.5:第一竖曲线终点里程f 259.73:第一变坡点(竖曲线交点)高程g-1:当 c 值h 值即凸曲线为-1,c值h 值即凹曲线为1h-1.35:第二坡度i 30000:第一竖曲线半径j 91310:第一竖曲线交点里程k 1:当 c 值h值即凸曲线为1,c 值h 值即凹曲线为-1l 93000:第二竖曲线起点里程m 254.566:第二竖曲线起点里程382.5:竖曲线切线长3、程序编辑及运行说明1、先编辑SUB1、SUB2两个子程序和正算主程序,然后编辑对应的数据库(SJK)程序。2、先输入完数据库程序中第一段线元要素后,立即退出并运行正算主程序计算此段线元止点坐标及方位角,然后将计算结果“XS”、“YS”、“FS”记录下来,此结果将是下一线元要素的“U”、“V”、“G”。以相同方法将数据库要素输完。3、最后编辑反算程序、超欠计算程序及高程计算程序。4、高程计算程序可独立运行。名师资料总结-精品资料欢迎下载-名师精心整理-第 4 页,共 4 页 -
限制150内