六武高速公路第八合同段.doc

六武高速公路
第八合同段

淡泊明志、宁静致远 六武高速公路
第八合同段（中铁四局） 旺竹园Ⅱ号隧道全断面开挖测量程序
1、RSKQDM（右幅全断面开挖程序） Lbl0：｛XYZC｝：XYZC“BJ”：Prog“RYS”：Prog“GSK”：S K“PJ”=K-0.35 Prog“HY”： Prog“QDM”：Goto0 说明： XYZ三维坐标 C“BJ”开挖半径 Prog“RYS”右幅曲线要素子程序 Prog“GSK”坐标反算子程序 S里程桩号 K“PJ”偏距 Prog“HY”右幅高程子程序 Prog“QDM”全断面开挖子程序
2、LSKQDM（左幅全断面开挖程序） Lbl0：｛XYZC｝：XYZC“BJ”：Prog“LYS”：Prog“GSK”：S K“PJ”=K+0.35 Prog“HZ”： Prog“QDM”：Goto0
3、RYS（右幅曲线要素） U=13.48657708：V=9067.896579：O=35370.001：F=253°01′43″：R=4500
4、LYS U=-22.20042292：V=9077.998279：O=35360.633:F=253°01′43″：R=4500
5、RZSXY（右幅正算程序） Lbl0：｛SK｝：SK“PJ”：Prog“RYS”：Prog“GXY”：X=X+（0.35+Ｋ）cosＴＹ＝Ｙ＋（０.35+K）sinTGoto0
6、LZSXY（左幅正算程序） Lbl0：｛SK｝：SK“PJ”：Prog“LYS”：Prog“GXY”：X=X+（-0.35+Ｋ）cosＴＹ＝Ｙ＋（- ０.35+K）sinTGoto0
7、GXY（正算程序） U“X0”：V“Y0”：O“S0”：F“F0”：R“R0”：Q=180（S-O）÷R÷π：T=F+90-Q：X=U+RcosＴ：Y=V+RsinT
8、GSK（反算程序） U“X0”：V“Y0”：O“S0”：F“F0”：R“R0”：Q=tan-1（（Y-V）÷（X- U：X＞Ｕ=>GotoＬ：≠>GotoＮ：LblＬ：Ｙ＞Ｖ=>Ｑ=>GotoＢ：≠>Ｑ＝Ｑ＋３６０：GotoＢ：LblＮ：Ｑ＝Ｑ＋１８０：Lbl Ｂ：Ｗ＝Ｆ＋９０－Ｑ：Ｐ＝ （（Ｘ－Ｕ）２＋（Ｙ－Ｖ）２：Ｓ＝Ｏ＋ＲＷπ：Ｋ＝Ｐ－Ｒ ９、ＨＹ（右幅高程） Ｓ36067.643=>H=213.212-（36370-S）×0.0215：≠>Ｓ36370=>H=213.212-（36370-S）×0.0215-（36067.643- S）2÷42000：≠>Ｓ36672.357=>H=