06公路工程放样、检测一体化计算程序.doc

公路工程放样、检测一体化计算程序
王海军
(路桥华南工程有限公司水南路七标)

摘要：根据设计文件给定的设计参数，基于全站仪、CASIOfx-4800P计算机介绍了公路工程放样、检测一体化计算的程序。
关键词：放样 检测 一体化 程序
工程技术人员总想把放样、检测的计算工作快速准确地进行，以高效准确地完成工作目标。笔者在数年公路施工测量实践的基础上，编成了放样、检测一体化的计算程序。
1. 设计参数
1.1 主线：中央分隔带宽2米，标准横坡度是2%，不设超高的最小平曲线半径是4000米，横坡度由-2%过渡到+2%路段的长度是80米。
1.2 互通立交匝道（以A匝为例）：
无中央分隔带，标准横坡度是2%，超高过渡分两次过渡（详见程序）。
1.3 改道：无中央分隔带，横坡度是2%，无超高。
2. 程序
2.1 输入参数
D—子程序选择参数；N—直线取零，左偏取正1，右偏取负1；M—缓和曲线参数的平方；I—ZH（HZ）、ZY(HY)点桩号；S、T—I点的纵、横坐标；A—I点对应于计算模式的方位角（A或A±180）；G、H—测站点坐标；E—竖曲线模型参数，直角线取零，凸曲线取正1，凹曲线取负1；C、B—变坡点的桩号，高程；P—竖曲线起始段路线前进方向的纵坡；U、V—竖曲线的切线和半径；R—圆曲线半径； L—超高过渡段长度即缓和曲线长；F—超高横坡度；Q—仪器计算高程；K—放样或检测桩号；J—放样、检测距中桩距离（左负右正）；W—交角；O、X—检测的方位角、距离；Y、Z—检测高差（Y对应中桩或D位，Z对应J位）；
2.2 输出表意
E、D—计算方位角、距离；P、Q—初次显示是放样坐标，二次显示是检测坐标；U、V—纵（横）向偏差；F—偏差；L—距中距离；Z[1]—中桩或D位设计高程；Z[2]—J位设计高程；Z[3]—中桩或D位实测高程；Z[4]—J位实测高程；D—二次显示是中桩或D位高程偏差；W—实测横坡度；J—设计横坡度；K—初次显示是J位高程偏差，二次显示是坡度差。
2.3 主程序
LbI0
D: N：M：I：S：T：A：G：H：E：B：P：U：V：L：F：Q
{KJWOXYZ}
Z[1]=E：Z[2]=B：Z[3]=P：Z[4]=U：Z[5]=V：Z[6]=L：Z[7]=F：Z[8]=Q:Z[9]=D
L=Abs（K-I）
N=0=>GotoZ△M=0=>GotoY△R=M/L
U=L-L3/40/R2+L5/3456/R4
V=L2/6/R-L4/336/R3+L6/42240/R4
B=90L/R/л
Goto1
LbIY
B=180L/R/л:U=RsinB:V=R(1-cosB)
Goto1
LbIZ
U=L:V=0:B=0
LbI1
E=S+UcosA-NVsinA
F=T+UsinA+NVcosA
J≠0=>Goto2△P=E▲Q=F▲B=A+NB
Prog“LD”
O=0=>Goto0△Goto3
LbI2
U=K-I
U<0=>Goto4△J>0=>V=W:≠>V=W+180△Goto5
LbI4
J>0=>V=W+180:≠>V=W△
LbI5
B=A+NB+V
P=E+AbsJcosB▲Q=F+AbsJsinB▲
Prog“LD”
O=0=>Goto0△
LbI3
P=G+cosO×X▲Q=H+XsinO▲U=1000(Xcos(O-B)-Dcos(E-B)) ▲
V=1000(Xsin(O-B)-Dsin(E-B)) ▲F=√（U2+V2）▲
J=0=>L=V/1000▲≠>L=Abs(J+U/1000) ▲△Y=0=>Goto0△
E=Z[1]:B=Z[2]:P=Z[3]:U=Z[4]:V=Z[5]:L=Z[6]:F=Z[7]:Q=Z[8]
Z[1]=B+P(K-C)-E(K-(C-U))2/2/V▲Z[3]=Y+Q▲D=Ans-Z[1]▲
J=0=>Goto0△Z[4]=Z+Q▲W=90=>Goto6△Goto0
LbI6
D=Z[9]
D=0=>Goto7△D“AZ:1,GD:8”
D=8=>Prog“GD”:≠>D=1=>Prog“AZ”△△Goto0
LbI7
J<0=>J=J+1:≠>J=J-1△N=0=>GotoP△M≠0=>GotoH△R≥4000=>GotoP△
Z[2]=Z[1]-NJF▲Goto8
LbIP
Z[2]=Z[1]-0.02AbsJ▲Goto8
LbIH
K>I=>Z[10]=1:≠>Z[10]=-1△Z[10]NJ>0=>GotoN△Abs(K-I)>80=>GotoQ△
Z[2]=Z[1]+AbsJ(0.0005Abs(K-I)-0.02)▲Goto8
LbIQ
Z[2]=Z[1]+ AbsJ(0.02+ Abs(K-(I±80))×(F-0.02)×(L-80))▲Goto8
LbIN
Abs(K-I)≤80=> GotoP△
Z[2]=Z[1]- AbsJ(0.02+ Abs(K-(I±80))×(F-0.02)×(L-80))▲
LbI8
Prog“PC”
Goto0
2.4 子程序
2.4.1 LD（坐标反算）
E=tan-1((G-P)/(H-Q))
Q>H=>E=90-E▲≠>E=270-E▲△D=√((G-P)2+(H-Q)2) ▲
2.4.2 AZ
K>695.843=>Goto1△Z[2]=Z[1]-0.02AbsJ▲Goto2
LbI1
K>748.64=>Goto3△NJ>0=>Goto4△
Z[2]=Z[1]+AbsJ(0.00076(K-695.843)-0.02)▲Goto2
LbI4
Z[2]=Z[1]-0.02J▲Goto2
LbI3
K≥854.107=>Goto5△Z[2]=Z[1]-J(0.02+0.00019(K-748.64))▲Goto2
LbI5
Z[2]=Z[1]-0.04J▲
LbI2
Prog“PC”
2.4.3 GD
Z[2]=Z[1]-0.02AbsJ▲Prog“PC”
2.4.4 PC
K=Z[4]-Z[2] ▲W=100 Abs((Z[3]-Z[4])/J) ▲
J=100Abs((Z[1]-Z[2])/J) ▲K=W-J▲
3．运行条件：变数记忆器扩充不得少于10个。
4．结束语
本程序既可用于平面放样、检测，也可以完全运行进行路基路面验收检测；也可拆分成平面放样、检测程序，纵、横断面高程计算、检测程序；简易、实用性强。
参考文献
[1] 道路勘测设计 张雨化 人民交通出版社 1997
[2] 测量学 钟孝顺 聂让 人民交通出版社 1997