天高速公路红石河隧道店子河隧道测量放样程序

1、十天高速公路红石河隧道、店子河测量放样程序1、LSKQDM（左洞坐标反算全断面开挖）Lbl0：XYZC：XYZC“BJ”： Prog“ZX1-Z”： Prog“GSKZ”：S4197.780=“S=”：S “PJ=”：K=K-5.25 Prog“HZ”： Prog“QDM-Z” ： Goto0： Prog“YQX1-Z”： Prog“GSKO”：S5839.530=“S=”：S “PJ=”：K=K-5.25 Prog“HZ”： Prog“QDM-Z” ： Goto0： Prog“ZX2-Z”： Prog“GSKZ”：S6809.364=“S=”：S “PJ=”：K=K-5.25 Prog“HZ

2、”： Prog“QDM-Z” ： Goto0： Prog“YQX2-Z”： Prog“GSKO”： S8340.275= “S=”：S “PJ=”：K=K-5.25 Prog“HZ”： Prog“QDM-Z” ： Goto0： Prog“ZX3-Z”： Prog“GSKZ”：S9919.871=“S=”：S “PJ=”：K=K-5.25 Prog“HZ”： Prog“QDM-Z” ： Goto02、RSKQDM（右洞坐标反算全断面开挖）Lbl0：XYZC：XYZC“BJ”： Prog“ZX1-Y”： Prog“GSKZ”：S4086.330=“S=”：S “PJ=”：K=K+5.25 Prog

3、“HY”： Prog“QDM-Y” ： Goto0： Prog“YQX1-Y”： Prog“GSKO”：S5870.554=“S=”：S “PJ=”：K=K+5.25 Prog“HY”： Prog“QDM-Y” ： Goto0： Prog“ZX2-Y”： Prog“GSKZ”：S6812.294=“S=”：S “PJ=”：K=K+5.25 Prog“HY”： Prog“QDM-Y” ： Goto0： Prog“YQX2-Y”： Prog“GSKO”： S8361.112= “S=”：S “PJ=”：K=K+5.25 Prog“HY”： Prog“QDM-Y” ： Goto0： Prog“ZX3

4、-Y”： Prog“GSKZ”：S9955.285=“S=”：S “PJ=”：K=K+5.25 Prog“HY”： Prog“QDM-Y” ： Goto03、ZX1-Z（左洞第一段平曲线要素直线段）U=31538.83225：V=6199.025307：F=2010954.7：O=1965404、GSK2（左洞第二段平曲线要素园曲线）U=30343.24166：V=8470.5791：F=2010954.7：O=196540：R=25505、GSK3（左洞第三段平曲线要素直线段）U=29984.98383：V=5954.87117：F=1715525：O=198136.26、GSK01（右洞第

5、一段平曲线要素直线段）U=31637.193：V=6194.214：F=2010954.7：O=1964407、GSK02（右洞第二段平曲线要素园曲线）U=30342.06317：V=8480.84513：F=2010954.8：O=196822.157：R=26008、GSK03（右洞第三段平曲线要素直线段）U=29976.7817：V=5906.634323：F=1715525.1：O=198149.0989、GSKZ（直线段坐标反算子程序）I=0：J=0：pol（X-U，Y-V：JJ=J+360 A=J-F:S=IcosA+O:K=IsinA10、GSKO（园曲线坐标反算子程序）I=0：

6、J=0：pol（X-U，Y-V：JJ=J+360 W= F+90-J:S= O+RW180:K=I-R10、HZ（左洞竖曲线计算程序）S197236.5=H=71.481-（197380-S）*0.015： S197380=H=71.481-（197380-S）*0.015-（197236.5-S）228000： S197523.5=H=71.481-（S- 197380）*0.0055-（197523.5-S）228000： S198376.787=H=71.481-（S- 197380）*0.0055： S198517.787=H=65.2232+（198517.787-S）*0.0055

7、-（198376.787-S）224000： S198658.787=H=65.2232-（S- 198517.787）*0.029-（198658.787-S）224000： H=65.2232-（S- 198517.787）*0.02911、HY（右洞竖曲线计算程序）S197246=H=70.801-（197400-S）*0.015： S197400=H=71.481-（197400-S）*0.015-（197246-S）228000： S197554=H=70.801-（S- 197400）*0.007-（1975554-S）228000： S198434=H=70.801-（S- 19

8、7400）*0.007： S198560=H=62.681+（198560-S）*0.007-（198434-S）224000： S198686=H=62.681-（S- 198560）*0.028-（198686-S）224000： H=62.681-（S- 198560）*0.02812、QDM-Z（左洞全断面程序）S196684= Prog“QDM-Z2” ： S197248= Prog“QDM-Z1” ： S197530= Prog“QDM-Z2” ： S198174= Prog“QDM-Z1” ： S198204= Prog“QDM-Z2” ： S198338= Prog“QDM-Z

9、1： S198370= Prog“QDM-Z2” ： S198670= Prog“QDM-Z1： Prog“QDM-Z2”12、QDM-Z0（右洞全断面程序）S196660= Prog“QDM-Z2” ： S197252= Prog“QDM-Z1” ： S197555= Prog“QDM-Z2” ： S198186= Prog“QDM-Z1” ： S198216= Prog“QDM-Z2” ： S198347= Prog“QDM-Z1： S198378= Prog“QDM-Z2” ： S198676= Prog“QDM-Z1： Prog“QDM-Z2”13、QDM-Z1（全断面开挖程序11类断

10、面形式）“LMG=”：H “GD=”：A=H+1.61+C “YXSX=”：E=H+1.61-Z ZH+1.61-Csin5=M=（C2-E2：“ZBJ=”：A=-(M+K “YBJ”：A=M-K “SBJ”：A（C2K2）E “QW=”：AC（K2E2 “DBJ=”：A=H-0.5-Z：M=Ccos5-0.08763(H+1.61-C sin5-Z): “ZBJ=”：A=-(M+K “YBJ”：A=M-K “DBJ=”：A=H-0.5-Z14、QDM-Z2（全断面开挖程序22类断面形式）“LMG=”：H “GD=”：A=H+1.61+C “YXSX=”：E=H+1.61-ZM=（C2-E2：

11、“ZBJ=”：A=-(M+K “YBJ”：A=M-K “SBJ”：A（C2K2）E “QW=”：AC（K2E2 “DBJ=”：A=H-0.5-Z “XBJ=”:A=H+13.35-(C2-K2)-Z 15、GY（左洞矮边墙、调平层、排水沟、二衬共用程序）Lbl0：XYZ：XYZ： Prog“GSK1”： Prog“GSKZ”：S196834.777=“S=”：S “PJ=”：K=K+0.15 Prog“HZ”： Prog“GSK2”： Prog“GSKO”：S198136.2=“S=”：S “PJ=”：K=K+0.15 Prog“HZ”： Prog“GSK3”： Prog“GSKZ”： “S=

12、”：S “PJ=”：K=K+0.15 Prog“HZ”16、GY1（右洞矮边墙、调平层、排水沟、二衬共用程序）Lbl0：XYZ：XYZ： Prog“GSK01”： Prog“GSKZ”：S196822.157=“S=”：S “PJ=”：K=K-0.15 Prog“HY”： Prog“GSK02”： Prog“GSKO”：S198149.098=“S=”：S “PJ=”：K=K-0.15 Prog“HY”： Prog“GSK03”： Prog“GSKZ”： “S=”：S “PJ=”：K=K-0.15 Prog“HY”17、ABQR（右洞矮边墙放样程序）Lbl0： Prog“GY1”： “ZBJ=

13、”：A=-（5.45+K “ZQH=”：A=H+0.29-Z “YQJ=”：A=5.41-K “YQH=”：A=H+0.12-Z Goto017、TPCR（右洞调平层放样程序）Lbl0： Prog“GY1”： “ZBJ=”：A=-（4.4+K “ZBLMG=”：A=H+0.09-Z “ZBCPCH=”：A=H-0.26-Z “YBJ=”：A=3.6-K “YBLMG=”：A=H-0.08-Z “YBCPCH=”：A=H-0.43-Z Goto017、PSGR（右洞排水沟放样程序）Lbl0： Prog“GY1”： “GJ=”A=H-1.3-Z “GD=”：A=H+1.2-Z Goto018、MZ

14、TCR（右洞二衬模筑台车放样程序）Lbl0：C=5.6： Prog“GY1”： “LMG=”：H “CXC（垂线长）=”：A=H+1.61+C-Z Goto019、MZTCL（左洞二衬模筑台车放样程序）Lbl0：C=5.6： Prog“GY”： “LMG=”：H “CXC（垂线长）=”：A=H+1.61+C-Z Goto020、RXD1（2、3、4、5、6略）（人行洞1、2、3、4、5、6放样程序）Lbl0：XYZC：XYZC“BJ”：U=31268.87：V=6051.626：F=1035519.49：O=0： Prog“GSKZ”： “S=”：S=S-5.289 “PJ=”： K “LMG

15、=”：H=62.656+0.03614S Prog“RXDQDM-Z”： Goto021、RXDQDM-Z（人行洞全断面开挖程序）“GD=”：B=H+1.91+C “YXSX=”：E=H+1.91-Z Z2.2=M=（C2-E2：“ZBJ=”：A=-(M+K “YBJ”：A=M-K “SBJ”：A（C2K2）E “DBJ=”：A=H-0.1-Z： “ZBJ=”：A=-(1.3+K “YBJ”：A=1.3-K “DBJ=”：A=H-0.1-Z22、LTCD198129（左洞紧急停车带放样程序）Lbl0：XYZCB：XYZC“RDA” B“RXIAO”： Prog“GSK2”： Prog“GSKO

16、”：S198107.88= “S=”：S “NOT” Goto0 ： S198136.2= “S=”：S “PJ=”：K=K+1.65 Prog“HZ”： Prog“QDM-Z11”： Goto0 ： Prog“GSK3”： Prog“GSKZ”：S198149.88= “S=”： S“PJ=”：K=K+1.65 Prog“HZ”： Prog“QDM-Z11”： Goto0 ：“S=”：S “NOT” ： Goto023、QDM-Z11（紧急停车带、汽扩全断面开挖程序）“LMG=”：H “GD=”：A=H+0.44+C “YXSX1=”：E=H+0.44-Z“YXSX2=”：W=H+1.61-

17、Z ZH+0.44-Csin52811=M=（C2-E2：“ZBJ=”：A=-(M+K “YBJ”：A=M-K “SBJ”：A（C2K2）E “QW=”：AC（K2E2 ZH+1.61-Bsin5=M=（B2-W2：“ZBJ=”：A=-(M+K+1.5 “YBJ”：A=M-（K-1.5 ：“DBJ=”：A=H-0.5-Z：M=Bcos5+1.5-0.088105727(H+1.61-B sin5-Z): “ZBJ=”：A=-(M+K “YBJ”：A=M-K “DBJ=”：A=H-0.5-Z24、LQK198078（左洞汽扩放样程序）Lbl0：XYZCB：XYZC“RDA” B“RXIAO”：

18、Prog“GSK2”： Prog“GSKO”：S198076.38= “S=”：S “NOT” Goto0 ： S198084.88= “S=”：S “PJ=”：K=K-1.35 Prog“HZ”： Prog“QDM-Z11”： Goto0 ： “S=”：S “NOT” ： Goto025、RQK198065（右洞汽扩放样程序）Lbl0：XYZCB：XYZC“RDA” B“RXIAO”： Prog“GSK02”： Prog“GSKO”：S1980058.99= “S=”：S “NOT” Goto0 ： S1980076.49= “S=”：S “PJ=”：K=K+1.35 Prog“HY”： P

19、rog“QDM-Z11”： Goto0 ： “S=”：S “NOT” ： Goto026、RTCD198015（右洞紧急停车带放样程序）Lbl0：XYZCB：XYZC“RDA” B“RXIAO”： Prog“GSK2”： Prog“GSKO”：S197993.95= “S=”：S “NOT” Goto0 ： S198036.05= “S=”：S “PJ=”：K=K-1.65 Prog“HY”： Prog“QDM-Z11”： Goto0 ：“S=”：S “NOT” Goto027、G-XYZ（直线段坐标正算子程序）X=U+（S-O）cosF : Y=V+(S-O) sinF28、G-XYO（l园

20、曲段坐标正算子程序）W=180(s-o) R：X=U+Rcos（F+90-W） : Y=V+R sin（F+90-W : F=F-W29、YD-XY（右洞坐标正算程序）SK：SK“PJ”： S196822.157= Prog“GSK01”： Prog“GSKZ”： Goto0 ： S198149.098= Prog“GSK02”： Prog“GSKO”： Goto0： Prog“GSK03”： Prog“GSKZ”：LbI0：“X=”：X=X+(0.15+K) cos(F+90 “Y”：Y=Y+(0.15+K) sin (F+90 30、ZD-XY（左洞坐标正算程序）SK：SK“PJ”： S196834.777= Prog“GSK1”： Prog“GSKZ”： Goto0 ： S198136.2= Prog“GSK2”： Prog“GSKO”： Goto0： Prog“GSK03”： Prog“GSKZ”：