三四等水准测量记录程序说明

If Abs List 5[4N-1]> V: Then "Back-Red height over":N-1 N:Goto 1:IfEnd 黑红面高差之差超限
"Station OK."
显示本站观测符合规范要求
"Number=":N
显示水准测量站数
"Press [AC] break"
提示按 键中断程序
If Abs List 5[4N-2]>U:Then "Front:black+K- red over":N-1 N:Goto 1:IfEnd 前尺红黑面读数差超限
If Abs List 5[4N-3]>U: Then "Back:black+K-red over":N-1 N:Goto 1:IfEnd 后尺红黑面读数差超限
1678 377
前6
1866 6554
-1
后-前 -0140 -0041
+1
-0.2
-0.5
h
-0140.5
1965
2141
后6
1832 6519
0
4
1700 265
1874 267
前5
2007 6793
+1
后-前 -0175 -0274
-1
-0.2
-0.7
h
-0174.5
测站观测视距的限差规定见表 3 所示。 表 3 三、四等水准测量每站视距限差的规定
等级 三等 四等
视线长度
仪器类型 视距 (m)
DS3
≤75
DS1,DS05 ≤100
DS3
≤100
DS1,DS05 ≤150
前后视距差 (m) ≤2.0
≤3.0
每站的前后 视距累积差(m)
≤5.0
视线高度 三丝能读数
≤10.0
三丝能读数
测站观测高差的限差规定见表 4 所示。 表 4 三、四等水准测量每站高差限差的规定(单位：mm)
同济大学出版社
后视黑面上丝读数
后视黑面下丝读数
后视黑面中丝读数
前视黑面中丝读数
前视黑面上丝读数
前视黑面下丝读数
前视红面中丝读数
后视红面中丝读数 测站数累加 1 判断是否超过最大站数 50 存储后视上、下丝读数(1)(2)步 存储后视黑面中丝读数(3)步 存储前视黑面中丝读数(4)步 存储前视上、下丝读数(5)(6)步 存储前视红面中丝读数(7)步 存储后视红面中丝读数(8)步 后视视距(9)步 前视视距(10)步 后前视距差(11)步
If N=0:Then {0,0,……,0} List 1
定义 List 1~List 5 的维数为 200
List 1 List 2: List 1 List 3: List 1 List 4: List 1 List 5
{0,0,……,0} List 6
定义 List 6 的维数为 52
IfEnd "Level order (3 or 4)="? Z If Z=3:Then 75 S:2 P:5 Q:2 U:3 V:IfEnd If Z=4:Then 100 S:3 P:10 Q:3 U:5 V:IfEnd "Date=2005.1108"? List 6[51] "Time=12.01"? List 6[52]
100 个 0
编辑为
If N=0:Then {0,0,……,0} List 1
200 个 0
同济大学出版社
前 上丝 尺 下丝
前视距
∑ 累积差 d
方向 及 尺号
水准尺读数 黑面 红面
K+黑 -红 (mm)
(1)
(5)
后尺
(3)
(8)
(14)
(2)
(6)
前尺
ቤተ መጻሕፍቲ ባይዱ
(4)
(7)
(13)
(9)
(10)
后-前 (15)
(16)
(17)
(11)
(12)
h
(18)
1571
0739
后5
1384 6171
0
1
1197 374
0363 376
覃辉编著 《土木工程测量》
§7.5 水准测量记录教辅资料： 三、四等水准测量记录与成果整理程序(P9-10-2/G9-10-2)
(1) 编程原理与输出数据串列 规范规定的三、四等水准测量的记录计算格式见表 1 所示[15]。
表 1 三、四等水准测量记录格式
测 后 上丝 站 尺 下丝 编 后视距 号 视距差
表 5 程序 P9-10-2 输出数据串列明细表
行数
List1
List2
List3
List4
List5
List6
1
A1
2
B1
E1
C1
H1
C1 + L - H1
H1
F1
D1
G1
D1 + K - G1
前 2 站高差累积
3
A1 - B1
E1 - F1
C1 - D1 H1 - G1
红黑高差之差 前 3 站高差累积
Goto 1
Lbl 2 "List number equal 50"
已经存储了 50 个测站点,中断程序
"END" 将光盘文件“\PROG\三四等水准测量记录程序\P9-10-2.CAT”上传到计算器中后，应将程序
中的下列语句
If N=0:Then {0,0,……,0}
100 个 0
{0,0,……,0} List 1
前6
0551 5239
-1
后-前 +0833 +0932
1
-0.2
-0.2
h
0832.5
2121
2196
后6
1934 6621
0
2
1747 374
1821 375
前5
2008 6796
-1
后-前 -0074 -0175
+1
-0.1
-0.3
H
-0074.5
1914
2055
后5
1726 6513
0
3
1539 375
后视距长超限
If List 2[4N-1]>10S:Then "Front length over":N-1 N:Goto 1:IfEnd 前视距长超限
If Abs List 1[4N]>P:Then "Stadia subtra over":N-1 N:Goto 1:IfEnd 前后视距差超限
If Abs List 2[4N]>Q:Then "Stadia sum over":N-1 N:Goto 1:IfEnd 视距累积差超限
黑红面高差之差(17)步
(List 3[4N-1]+List 4[4N-1]-O)÷2 List 5[4N-1] 黑红面高差平均值(18)步
If N=1:Then List 5[4N] List 6[N]
Else List 5[4N]+List 6[N-1] List 6[N]:IfEnd If List 1[4N-1]>10S:Then "Back length over":N-1 N:Goto 1:IfEnd
覃辉编著 《土木工程测量》
If N=1:Then List 1[4N] List 2[4N]
Else List 1[4N]+List 2[4(N-1)] List 2[4N]:IfEnd 视距累积差(12)步
Int ((H-C)÷100) K
求后视标尺红面零点常数
If K=46:Then 4687 K: 4787 L Else 4787 K: 4687 L:IfEnd D+L-G List 5[4N-2]
水准测量等级 三等水准限差 四等水准限差 观测日期 观测时间
Lbl 1 "1 Back-black upper="? A "2 Back-black down="? B "3 Back-black mid="? C "4 Front-black mid="? D "5 Front-black upper="? E "6 Front-black down="? F "7 Front-red mid="? G "8 Back-red mid="? H N+1 N If N>50:Then Goto 2: IfEnd A List 1[4N-3]: B List 1[4N-2] C List 3[4N-3]
后尺常数存入 K,前尺常数存入 L 前尺红黑面读数差(13)
C+K-H List 5[4N-3]
后尺红黑面读数差(14)
C-D List 3[4N-1]
黑面高差(15)步
H-G List 4[4N-1]
红面高差(16)步
K-L O
前视尺与后视尺红面零点常数差
List 3[4N-1]-List 4[4N-1]+O List 5[4N-1]
4
…… 50 51 52 …… 200
前后视距差 ……
…… …… ……
视距累积差 ……
…… …… ……
……
…… …… ……
……
…… …… ……
高差平均值 H1
……
…… …… ……
前 4 站高差累积
…… 前 50 站高差累积
观测日期 观测时间
(2) 程序
程序名：P9-10-2，1822 字节，光盘文件为“\PROG\三四等水准测量记录程序\P9-10-2.CAT”。
2) 前视标尺黑面分划(中丝-D、上丝-E、下丝-F)
3) 前视标尺红面分划(中丝-G)
同济大学出版社
覃辉编著 《土木工程测量》
4) 后视标尺红面分划(中丝-H)
每站观测需要输入 8 个数据，由表 9-10-2 可知，加上计算数据一起，需要占用串列 List 1~List 5 四行，占用 List 6 一行用于存储高差累加结果，设计的串列明细表见表 5。
D List 3[4N-2]
E List 2[4N-3]: F List 2[4N-2]
G List 4[4N-2]
H List 4[4N-3] Abs(A-B) List 1[4N-1] Abs(E-F) List 2[4N-1] 0.1(List 1[4N-1]-List 2[4N-1]) List 1[4N]
等级
观测方法
基、辅分划 (黑红面) 读数的差
基、辅分划 (黑红面) 所测高差的差
单程双转点法观测 时，左右路线转点差
检测间歇点 高差的差
三等
中丝读数法 光学测微法
2.0 1.0
3.0 1.5
四等 中丝读数法
3.0
5.0
— 1.5
3.0
4.0
5.0
观测顺序与输入数据的赋值变量为：
1) 后视标尺黑面分划(上丝-A、下丝-B、中丝-C)