公路曲线中边桩坐标fx4800P计算程序

《公路曲线中边桩坐标fx4800P计算程序》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、公路曲线中桩边桩坐标fx4800P计算程序(山西省忻州市煤田地质勘探队—李鹏)　　摘要:通过程序计算公路施工中曲线上中边桩的坐标计算。关键词:公路曲线;中边桩;坐标计算ConversionGeodeticCoordinateSystemfromBeijing1954toXi’an1980byMeansofFourParametricMethod(XinZhouCoalgeologicalprospectingparty,Shanxiprovince,China,LiPeng)Abstract:Thisarticlediscussestheconversion

2、methodanditsprecisionfromBeijinggeodeticcoordinatesystem1954intoXi’angeodeticcoordinatesystem1980withfourparametricmethodbasedonanalyzingthesetwogeodeticcoordinatesystemscharacters.Keywords:coordinateconversion;fourparametriccalculation;Beijinggeodeticcoordinatesystem1954;Xi’angeod

3、eticcoordinatesystem1980０前言在快速发展的公路建设事业中，使用GPS坐标控制系统的高等级公路日渐增多，并且，随着高精度的测量设备的广泛采用，其他等级公路也开始普遍应用坐标控制。使用坐标控制的公路项目，有着线型流畅、行车速度快而舒适、环境优美等特点，这些都来源于高质量的设计与施工，卡西欧fx-4800p计算器由于其轻便、精度高、易于操作，能够解决设计、施工当中很多的实际困难，因此，倍受公路工程技术人员的青睐。本人通过在高速公路多年的施工经验，编写了许多公路测量实用程序，如常用的中桩边桩计算程序，匝道坐标计算程序，施工放样程序，换带程序等

4、等。下面把公路中常用的中桩边桩计算程序介绍给大家，希望本程序能够对公路测量同行有所帮助.。１程序清单：LbI0:Defm6↙″CURVE　MODE″:{M}:M″0:T1=T2,1:T1≠T2″↙M=0＝＞Goto7:≠＞M=1＝＞Goto8:≠＞Goto0⊿⊿↙LbI7：{ABCDEFGR}↙A″ZHD″:B″HZD″:C″XJD″:D″YJD″:E″ELPHA″:F″PJ:Z(-),Y(+)″:G″L0″:R↙T=(R+G2÷(24R)-G^4÷(2688R^3))tan(AbsF÷2)+0.5G-G^3÷(240R2)↙U=G:V=T:Goto1↙Lb

5、I8：{ABCDEFGUTVR}↙A″ZHD″:B″HZD″:C″XJD″:D″YJD″:E″ELPHA″:F″PJ:Z(-),Y(+)″:G″L01″:U″L02″:T″T1″:V″T2″:R↙LbI1：{H}:H″DQD″↙H≥B＝＞M=1:≠＞H＞B-U＝＞M=2:≠＞H≥A+G＝＞M=3:≠＞H≥A＝＞M=4:≠＞H＜A＝＞M=5⊿⊿⊿⊿⊿↙M≤2＝＞L=Abs(H-B):≠＞L=Abs(H-A)⊿↙M=1＝＞Z[1]=L:≠＞M=2＝＞Z[1]=√((L-L^5÷(40R2U2)+L^9÷(3456R^4U^4))2+(L^3÷(6RU)-L^7÷

6、(336R^3U^3)+L^11÷(42240R^5U^5))2):≠＞M=3＝＞Z[1]=√((G-G^3÷(40R2)+G^5÷(3456R^4))2+(G2÷(6R)-G^4÷(336R^3)+G^6÷(42240R^5))2):≠＞M=4＝＞Z[1]=√((L-L^5÷(40R2G2)+L^9÷(3456R^4G^4))2+(L^3÷(6RG)-L^7÷(336R^3G^3)+L^11÷(42240R^5G^5))2):≠＞M=5＝＞Z[1]=L⊿⊿⊿⊿⊿↙M≤2＝＞Z[2]=C+Vcos(E+F):Z[3]=D+Vsin(E+F):≠＞Z[2]=C

7、+Tcos(E+180):Z[3]=D+Tsin(E+180)⊿↙M=1＝＞Z[4]=E+F:≠＞M=2＝＞Z[4]=E+F+180:≠＞M=5＝＞Z[4]=E+180:≠＞Z[4]=E⊿⊿⊿↙N=F÷AbsF↙M=1＝＞I=0:≠＞M=2＝＞I=-N(30L2÷(ΠRU)):≠＞M=3＝＞I=N(30G÷(ΠR)):≠＞M=4＝＞I=N(30L2÷(ΠRG)):≠＞M=5＝＞I=0⊿⊿⊿⊿⊿↙Z[4]=Z[4]+I↙Z[5]=Z[2]+Z[1]cosZ[4]↙Z[6]=Z[3]+Z[1]sinZ[4]↙M≠3＝＞Goto3⊿↙LbI2:P=90L÷(ΠR)

8、:Q=90(L-G)÷(ΠR)↙Z[5]=Z[5]+