公路曲線中邊樁坐標fx4800P計算程序

《公路曲線中邊樁坐標fx4800P計算程序》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫。

1、公路曲線中樁邊樁坐標fx4800P計算程序(山西省忻州市煤田地質(zhì)勘探隊—李鵬)　　摘要:通過程序計算公路施工中曲線上中邊樁的坐標計算。關(guān)鍵詞:公路曲線;中邊樁;坐標計算ConversionGeodeticCoordinateSystemfromBeijing1954toXi’an1980byMeansofFourParametricMethod(XinZhouCoalgeologicalprospectingparty,Shanxiprovince,China,LiPeng)Abstract:Thisarticlediscussestheconversion

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

3、eticcoordinatesystem1980０前言在快速發(fā)展的公路建設事業(yè)中，使用GPS坐標控制系統(tǒng)的高等級公路日漸增多，并且，隨著高精度的測量設備的廣泛采用，其他等級公路也開始普遍應用坐標控制。使用坐標控制的公路項目，有著線型流暢、行車速度快而舒適、環(huán)境優(yōu)美等特點，這些都來源于高質(zhì)量的設計與施工，卡西歐fx-4800p計算器由于其輕便、精度高、易于操作，能夠解決設計、施工當中很多的實際困難，因此，倍受公路工程技術(shù)人員的青睞。本人通過在高速公路多年的施工經(jīng)驗，編寫了許多公路測量實用程序，如常用的中樁邊樁計算程序，匝道坐標計算程序，施工放樣程序，換帶程序等

4、等。下面把公路中常用的中樁邊樁計算程序介紹給大家，希望本程序能夠?qū)窚y量同行有所幫助.。１程序清單：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]+