二、CASIOfx-5800P计算器编程方法: SDCQW LbI 0←┘
Fix9:31→DimZ:“R1”?→Z[1]:“R2”?→Z[2]:“DO2”?→Z[3]:“HO1”?→Z[4]:“HO2”?→Z[5]:“B”?→Z[6]:“H”? →Z[7]:“XA”?→Z[8]:“YA”?→Z[9]:“T”? →Z[10] ←┘ LbI 1←┘
“X”? →Z[11]:“Y”?→Z[12]:“Z”?→Z[13]:( Z[1]- Z[4]+ Z[7]-( Z[1]- Z[1]хcos(Z[6]))) →Z[14] ←┘ LbI 2←┘
If Z[13]≥Z[14]:Then√((Z[11]-Z[8])2+(Z[12]-Z[9])2)→Z[15]:Z[13]-(Z[7]-Z[4]) →Z[16]:√(Z[15]2-Z[16]2)→Z[17]:Z[17]-Z[1]→Z[18]:“CQ=”:Z[18]▲ Goto 1:Else:Goto 3:IfEnd ←┘ LbI 3←┘
If Z[13]< Z[14]:Then Z[8]+Z[3]хcos(Z[10]-90)→Z[19]:Z[9]+Z[3]хsin(Z[10]-90)→Z[20]: Z[8]+Z[3]хcos(Z[10]+90)→Z[21]:Z[9]+Z[3]хsin(Z[10]+90)→Z[22]:“L”? →Z[23]:If Z[23]= 1:Then √((Z[11]-Z[19])2+(Z[12]-Z[20])2)→Z[24]:Z[13]-(Z[7]+Z[5])→Z[25]:√(Z[24]2+Z[25]2)
→Z[26]:Z[26]-Z[2]→Z[27]: “CQ=”:Z[27]▲
Else √((Z[11]-Z[21])2+(Z[12]-Z[22])2)→Z[28]:Z[13]-(Z[7]+Z[5])→Z[29]:√(Z[28]2+Z[29]2)
→Z[30]:Z[30]-Z[2]→Z[31]: “CQ=”:Z[31]▲ IfEnd←┘ Goto 1←┘
三、程序说明
本程序按本标段实际情况编制,适用于三心圆隧道,由于第三半径包含范围小及所处水沟范围内,未编入程序内,该程序配合全站仪使用,隧道断面测量时,将全站仪置在该断面里程点中线上,测出断面上任一点三维坐标,数据输入计算
R1→半径1 R2→半径2
DO2→隧道中线至圆心O2的横向距离 HO1→隧道设计标高点至圆心O1的竖向距离 HO2→隧道设计标高点至圆心O2的竖向距离 B→半径R1与隧道中线的夹角 H→里程点隧道设计高程 XA→里程点隧道中线X坐标 YA→里程点隧道中线Y坐标 T→里程点切线方位角
X→里程点隧道断面上任一点X坐标 Y→里程点隧道断面上任一点Y坐标 Z→里程点隧道断面上任一点Z坐标 四、使用方法
1、执行程序SDCQW,按FILE键调出“SDCQW”文件,按EXE键屏幕显示“R1?”,依次输入基本数据:
R2:(若测开挖断面半径需加上二衬厚度、预留沉降量及初支厚度) DO2: 隧道中线至圆心O2的横向距离 HO1: 隧道设计标高点至圆心O1的竖向距离 HO2: 隧道设计标高点至圆心O2的竖向距离 B: 半径R1与隧道中线的夹角 H: 待测断面里程点隧道设计高程 XA: 待测断面里程点隧道中线纵坐标 YA: 待测断面里程点隧道中线横坐标 T:待测断面里程点线路中线切线方位角 2 输入全站仪采集数据 X:待测断面上任一点纵坐标 Y:待测断面上任一点横坐标 Z:待测断面上任一点高程
3 计算超欠数据
程序运行,依据输入高程Z自动判断该点在哪一半径范围内,在第一半径范围内,直接算出超欠数据“CQ=”(“—“欠,“+”超),若测点在第二半径范围内,会出现“L?”(测点在隧道中线左侧?右侧?),在隧道中线左侧直接输入1,在右侧输入其它任何数字,计算超欠挖数据“CQ=” 五、算例 R1→9.1 R2→5.55半径2 DO2→1.818 HO1→1.495 HO2→1.554 B→30°48′36″ H→366.002 XA→4477933.954 YA→504250.721 T→101°06′39.18″
全站仪采集数据1(第一半径范围内) X→4477935.751 Y→504251.073 Z→373.372
全站仪采集数据2(隧道中线左测) X→4477941.020 Y→504252.108 Z→368.920
全站仪采集数据2(隧道中线右测) X→4477926.800 Y→504249.316 Z→368.385
键操作屏幕显示操作说明
[FILE] Prog List 调出SDCQW文件
[EXE] R1?输入半径1 9.1 9.1
[EXE] R2?输入半径2 5.55 5.55
[EXE] DO2? 输入隧道中线至圆心O2的横向距离 1.818 1.818
[EXE] HO12? 输入隧道设计标高点至圆心O1的竖向距离 1.495 1.495
[EXE] HO2?输入隧道设计标高点至圆心O2的竖向距离 1.554 1.554
[EXE] B? 输入半径R1与隧道中线的夹角 30°48′36″ 30°48′36″
[EXE] H?输入里程点隧道设计高程 366.002 366.002
[EXE] XA0?输入里程点隧道中线X坐标 4477933.954 4477933.954
[EXE] YA?输入里程点隧道中线Y坐标 504250.721 504250.721
[EXE] T?输入里程点切线方位角 101°6′39.18″ 101°6′39.18
[EXE] X? 输入测得里程点隧道断面X坐标 4477935.751 4477935.751
[EXE] Y? 输入测得里程点隧道断面Y坐标 504251.073 504251.073
[EXE] Z? 输入测得里程点隧道断面Z坐标 373.372 373.372
[EXE] CQ=-0.047854508 输出超欠数据结果 [EXE] X? 输入测得里程点隧道断面X坐标 4477941.020 4477941.020
[EXE] Y? 输入测得里程点隧道断面Y坐标 504252.108 504252.108
[EXE] Z? 输入测得里程点隧道断面Z坐标 368.920 368.920 [EXE] L?
程序自动判断测点在第二半径范围内,测点在隧道中线左侧?右侧?),在隧道中线左侧直接输入1,在右侧输入其它任何数字 1 1
[EXE] CQ=0.002970720 输出超欠数据结果 [EXE] X? 输入测得里程点隧道断面X坐标 4477926.800 4477926.800
[EXE] Y? 输入测得里程点隧道断面Y坐标 504249.316 504249.316
[EXE] Z? 输入测得里程点隧道断面Z坐标 368.385 368.385
[EXE] L? 判断点位,隧道中线右侧 0 0
[EXE] CQ=-0.014906344 输出超欠数据结果
√是开平方,公式符懒得改了,自己编的一个小程序,没有加数据库,每次输入有点麻烦,有不足之处还望高手改进
因篇幅问题不能全部显示,请点此查看更多更全内容