一、前言
应网友(西北狼232471254)的要求,以及忻阜高速测量工程师(狼行天下吃肉785731843)的实际需求,编写本道路直线段中边桩坐标放样计算程序。 .
主要功能有:
1.输入起点坐标、桩号及直线方位角即可计算道路直线段的中边桩坐标; 2.若输入测站点坐标,可计算输出中边桩的放样数据拨角及距离。 程序的特点:使用简单。
二、示例项目基本资料
(忻阜高速测量工程师(狼行天下吃肉785731843)提供) 某一直线段道路,中间有断链,具体参数如下: 起点里程:K2+793.878
坐标:X=4265666.762,Y=388264.136 终点里程:K3+441.16
坐标:X=4265542.507,Y=388913.680 直线段的方位角:100-49-46.82 断链长:K2+824.04=K2+810
坐标:X=4265661.095,Y=388293.762 本段逐桩坐标表如下:
.
三、数学模型
.
四、程序代码
.
五、程序变量清单
.
五、计算流程示例
需要对设计文件中的逐桩坐标进行验算,将断链前后两段路线分别进行计算。 1.计算断链前路段的中桩坐标
使用道路直线段中边桩坐标放样计算程序LINE的操作流程见下表。
.
2.计算断链后路段的中桩坐标
使用道路直线段中边桩坐标放样计算程序LINE的操作流程见下表。
.
5800计算程序(正反结合)2选1
ZFS结合
Lbl 0: ”1→ZS,2→FS=”:?Q
Q=1: => Goto1 : Q=2: => Goto3 Lbl 1: ”XA”?A: ”YA”?B: Lbl 2: ”JULI”?C: ”FWJ”?D ”XB=”:cos(D)*C+A→X ◢ ”YB=”:sin(D)*C+B→Y◢ Goto0
Lbl 3:”XA”?A:”YA”?B:”XB”?C:”YB”?D Pol (C-A,D-B):Cls
If J∠0:Then J+360→F:Else J→F:IfEnd ”Ju Li =”:I◢
”FWJ =”:F◆DMS◢ Goto0
第一步输入1 是坐标正么,第二是反算,如果你只想要反算,就只输LBi3就可以,后面改一下goto3就行
因篇幅问题不能全部显示,请点此查看更多更全内容