欢迎来到天天文库
浏览记录
ID:42269953
大小:836.82 KB
页数:3页
时间:2019-09-11
《用Excel程序快速计算公路工程逐桩坐标》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、H现代公路IGHWAY用Excel程序快速计算公路工程逐桩坐标文/左卿引言坐标计算在公路工程设计及施工过程中,逐桩坐标的计算是一直线段逐桩坐标项必不可少的工作,尤其近些年随着全站仪的普及使用,坐首先介绍函数Value(MIDB(“ZH”,2,n)标放样法因速度快、精度高而被广泛应用,逐桩坐标计算的&MIDB(“ZH”,n+3,7)),n表示公里数的位数,当里程工程量也因此而大大增加。例如:某高速公路某一合同段有公里数为1位数,则n=1,当公里数为2位数,n=2,当里程20公里的路基,按照常规的设计及施工方法,不考虑曲线加公里数为3位数时,n=3……
2、。如ZH=K136+700,运行该函桩,按每20m一个断面,每个断面左右幅2个点,则需要计算数,n=3,结果=136700,其目的为将K136+700文本数据1000个点2000个坐标。如此大的计算量如果采用传统的计算(字符串)去掉“K”和“+”,并转换成数字格式。器计算,不仅费时,还难免出错。笔者从事多年施工工作,则里程≤ZH的前直线上任意桩号坐标计算:针对这一情况,利用MicrosoftOffice中的Excel电子表格在Excel某一单元格中,坐标计算编辑公式为:X=Xj+的编程计算功能,设计了一套包括直线、缓和曲线和圆曲(T+Value(M
3、IDB(“ZH”,2,n)&MIDB(“ZH”,线的坐标计算程序,该计算程序具有快速、精确、程序简n+3,7))-Value(MIDB(“K”,2,n)&MIDB(“K”,单、使用方便等优点,较其他编程软件编制的计算程序更n+3,7)))*cos((A1+180)*PI()/180)灵活、更适用。Y=Yj+(T+Value(MIDB(“ZH”,2,n)&MIDB(“ZH”,n+3,7))-Value(MIDB(“K”,2,程序设计n)&MIDB(“K”,n+3,7)))*sin((A1+180)*PI()/180)程序设计初步里程K≥HZ的后直线上
4、任意桩号坐标计算为:X=Xj+打开MicrosoftOfficeExcel2003,新建工作表book1,(T+Value(MIDB(“K”,2,n)&MIDB(“K”,n+3,并将其命名为“公路工程逐桩坐标计算表”。7))-Value(MIDB(“HZ”,2,n)&MIDB(“HZ”,将设计的公路直曲线、主点桩号等参数输入该工作n+3,7)))*cos(A2*PI()/180);表内。Y=Yj+(T+Value(MIDB(“K”,2,n)计算图示及参数的规定:如图1,交点坐标JD(Xj,&MIDB(“K”,n+3,7))-Value(MIDB(“
5、HZ”,2,Yj),转角值α,曲线半径R,缓和曲线长度Ls,切线长n)&MIDB(“HZ”,n+3,7)))*sin(A2*PI()/180)度T,计算方位角A。任意里程桩号为“K×××+×××”第一缓和曲线(ZH~HY)内任意点坐标(简写为K),曲线上ZH/HZ(HY/YH)点里程为:X=Xj+T*cos((A1+180)*PI()/180)+“K×××+×××”(简写为ZH/HZ(HY/YH)),方位角A((VALUE(MIDB("k",2,n)&MIDB("k",n+3,7))-VALUE的单位为°。一般里程桩号书写格式为“K公里+米”,公里
6、(MIDB("ZH",2,n)&MIDB("ZH",n+3,数一般为1~3位数,米数统一采用7位数(精确到小数点后37)))-(VALUE(MIDB("k",2,n)&MIDB("k",n+3,位)。同时,Excel中三角函数的参数单位为弧度。7))-VALUE(MIDB("ZH",2,n)&MIDB("ZH",n+3,7)))^5/(40*R^2*Ls^2)+(VALUE(MIDB("k",2,n)&MIDB("k",n+3,7))-VALUE(MIDB("ZH",2,n)&MIDB("ZH",n+3,7)))^9/(3456*R^4*Ls^4)
7、)/COS((VALUE(MIDB("k",2,n)&MIDB("k",n+3,7))-VALUE(MIDB("ZH",2,n)&MIDB("ZH",n+3,7)))^2/(6*R*Ls))*COS((A1±30*(VALUE图图1逐桩坐标计算示意图1逐桩坐标计算示意图(MIDB("k",2,n)&MIDB("k",n+3,84TRANSPOWORLD2011No.17(Sep)7))-VALUE(MIDB("ZH",2,n)&MIDB("ZH",n+3,7)))^2/(PI()*R*Ls))*PI()/180)(PI()*R*Ls))*PI()/
8、180)计算式中的“±”取舍为,当路线右转时取“-”,左Y=Yj+T*sin((A1+180)*PI()/180)+转时取
此文档下载收益归作者所有