《道路坐標正反算無限個拐點計算器測量程序(新20070825)》由會員分享，可在線閱讀，更多相關《道路坐標正反算無限個拐點計算器測量程序(新20070825)(10頁珍藏版)》請在人人文庫網上搜索。

1、道路坐標正反算無限個拐點計算器測量程序(新20070825)道路坐標正反算4800一、程序功能及原理1. 功能說明：本程序由一個主程序(TYQXjs)和兩個子程一一正算子程序(SUB1)、反算子程序(SUB2)序構成，可以根據曲線段 直線、圓曲線、緩和曲線(完整或非完整型)的線元要素(起點坐標、 起點里程、起點切線方位角、線元長度、起點曲率半徑、止點曲率半徑)及里程邊距或坐標，對該曲 線段范圍內任意里程中邊樁坐標進行正反算。另外也可以將本程序中核心算法部分的兩個子程序移植 到其它相關的程序中，用于對曲線任意里程中邊樁坐標進行正反算。本程序也可以在 CASIO fx-4500P計算器及CASIO。

2、 fx-4850P 計算器上運行。2 .計算原理：利用 Gauss-Legendre 5點通用公式計算線路中邊樁坐標并計算放樣數據。二、源程序1. 主程序(TYQXjs)Defm 2Lbl 1 : N=1 : N : 1.SZ = XY : 2.XY = SZ : N : Prog ” DAT1 ” :UX0: VY0 : OS0 : GF0: HLS : PR0 : RRN : Q : C=1-P: D=(P-R) p2HPR) : E=180*n: N=1=Goto 1 :工 Goto 2 T=90 : Z=0 : SZT : SZ:T” ANG : W=Abs(S-O) : Prog S。

3、UB1 : XS=:X=X 丄YS=:Y=Y 丄Goto 3 F=F+360:工 F360=F=F-360 ” DIST=” :丄” FW= :F tDMS 丄 Goto 12. 正算子程序(SUB1)A=0.1184634425:B=0.2393143352:N=0.2844444444:K=0.0469100770:L=0.2307653449:M=0.5:F=1-LX=U+W(Acos(G+QEKW(C+KWD)+Bcos(G+QELW(C+LWD)+Ncos(G+QEMW(C+MWD)+Bcos(G+QE(1-L)W(C+(1-L)WD)+Acos(G+QE(1-K)W(C+(1-K)。

4、WD): Y=V+W(Asin(G+QEKW(C+KWD)+Bsin(G+QELW(C+LWD)+Nsin(G+QEMW(C+MWD)+Bsin(G+QE (1-L)W(C+(1-L)WD)+Asin(G+QE(1-K)W(C+(1-K)WD): F=G+QEW(C+WD)+T : X=X+ZcosFY=Y+ZsinF3. 反算子程序(SUB2)T=G-90 : W=Abs(Y-V)cosT-(X-U)sinT) : Z=0 : Lbl 0 : Prog SUB1 : L=T+QEW(C+WD):Z=(J-Y)cosL-(I-X)sinL : AbsZGoto1 :工 W=W+Z : Goto。

5、 0 Lbl 1 : Z=0 : Prog SUB1 : Z=(J-Y) -sinF : Z 工 0=Z=Z -AbsZ 2 2Z=Z ? (I-X)+( J-Y)4. 曲線元要素數據庫：DAT1S:S :S*=S v*=U=* ：v=* ：O=* ：G=* ：H=* p=* R=*:Q=* I5. 曲線元要素數據庫：DAT2注：如有多個曲線元要素繼續添加入數據庫DAT1中，每一段(直線、緩和曲線、圓曲線等)線元曲線要素為：起點X坐標U、起點Y坐標V、起點里程0、起點切線方位角 G、線元長度H、起點曲率半徑P、 止點曲率半徑R、偏角標志Q (左偏Q=-1、右偏Q=1、直線Q=0 )。線元曲線各。

6、點的坐標、起點切線方位角均可用專門的excel程序計算，該excel程序還可以計算岀所需要只的其它坐標。附后專門的excel程序計算。1、規定(1) 以道路中線的前進方向(即里程增大的方向)區分左右；當線元往左偏時， Q=-1 ;當線元往右偏時，Q=1 ;當線元為直線時，Q=0。(2) 當所求點位于中線時，Z=0 ;當位于中線左鍘時，Z取負值；當位于中線中線右 側時，Z取正值。(3) 當線元為直線時，其起點、止點的曲率半徑為無窮大，以10的45次代替。(4) 當線元為圓曲線時，無論其起點、止點與什么線元相接，其曲率半徑均等于圓 弧的半徑(5) 當線元為完整緩和曲線時，起點與直線相接時，曲率半徑。

7、為無窮大，以10的45次代替；與圓曲線相接時，曲率半徑等于圓曲線的半徑。止點與直線相接時，曲率半徑為無窮大，以10的45次代替；與圓曲線相接時，曲率半徑等于圓曲線的半徑。(6) 當線元為非完整緩和曲線時，起點與直線相接時，曲率半徑等于設計規定的 值；與圓曲線相接時，曲率半徑等于圓曲線的半徑。止點與直線相接時，曲率半徑等 于設計規定的值；與圓曲線相接時，曲率半徑等于圓曲線的半徑。(7) 曲線元要素數據庫(DAT1 )可根據線型不同分為各個線元段輸入到DAT1中，即分為直線段、緩和曲線、圓曲線等。2、輸入與顯示說明提示：計算前可手工輸入測站坐標經Z1，Z2，反算前需對該反算線段內，正算一次任意一樁。

8、號，以確定反算起始數據。輸入部分：1. SZ = XY2. XY = SZN?選擇計算方式，輸入 1表示進行由里程、邊距計算坐標；輸入2表示由坐標反算里程和邊距。S0 ?線元起點里程S ?正算時所求點的里程S ? EXEZ ?正算時所求點距中線的邊距 (左側取負，值右側取正值，在中線上取零)ANG ?正算邊樁時左右邊樁連線與線路中線的右交角X ?反算時所求點的X坐標Y ?反算時所求點的 Y坐標X0 ?線元起點的X坐標Y0 ?線元起點的Y坐標 顯示部分:XS=x xx正算時，計算得岀的所求點的X坐標YS=x xx正算時，計算得岀的所求點的Y坐標DIST=xxx正算時，放樣距離FW=xxx正算時，。

9、放樣方位角X=xxx反算時，測量點的Y=xxx反算時，測量點的放樣方位角S=x xx反算時，計算得岀的所求點的里程Z=xxx反算時，計算得岀的所求點的邊距(負為左邊，正號為右邊四、算例S=940 Z=0計算得 XS=19736.47687YS=28722.35642S=940 Z= 3.009計算得 XS=19733.47298YS=28722.531682、反算X=19831.418X=19827.336Y=28509.726Y=28506.838計算得 S=699.9999974 Z= -5 .00018164計算得 S=699.9996493 Z= 0.000145136X=19823.。

10、25398Y=28503.95084計算得 S=699.9999985 Z= 5.000003137X=19785.25749X=19781.15561X=19777.05373Y=28575.02270Y=28572.16358Y=28569.30446計算得 S=780.0000035 Z= -5 .000001663計算得 S=780.0000025 Z=- 0.000002979計算得 S=780.0000016 Z= 4.99999578X=19747.536X=19742.686X=19737.837Y=28654.131Y=28652.914Y=28651.697計算得 S=87。

11、0.0001137 Z= -4.99941049計算得 S=870.0003175 Z=- 0.00041814計算得 S=870.0002748 Z= 4.999808656X=19741.5912Y=28722.0580計算得 S=939.9999786 Z= -5.123024937X=19736.4769Y=28722.3564計算得 S=939.9999862 Z=- 0.000027710某匝道的由五段線元(直線 +完整緩和曲線+圓曲線+非完整緩和曲線+直線)組 成，各段線元的要素(起點里程SO、起點坐標X0 Y0、起點切線方位角 F0、線元長度LS、起點曲率半徑 R0、止點曲率半。

12、徑 RN、線 元左右偏標志 Q)如下：S0X0Y0F0LSR0RNQ500.00019942.83728343.561125 16 31.00269.2561E451E450769.25619787.34028563.378125 16 31.0037.4921E45221.75-1806.74819766.56628594.574120 25 54.07112.779221.75221.75-1919.52719736.07228701.89391 17 30.6380.285221.759579.228-1999.81219744.03828781.65980 40 50.00100.00。

13、01E451E4501、正算(注意：略去計算方式及線元要素輸入，請自行根據所求點所在的線元輸入線元要素)S=700Z=-5計算得XS=19831.41785YS=28509.72590S=700Z=0計算得XS=19827.33592YS=28506.83837S=700Z= 5計算得XS=19823.25398YS=28503.95084S=780Z=-5計算得XS=19785.25749YS=28575.02270S=780Z=0計算得XS=19781.15561YS=28572.16358S=780Z= 5計算得XS=19777.05373YS=28569.30446S=870Z=-5計。

14、算得XS=19747.53609YS=28654.13091S=870Z=0計算得XS=19742.68648YS=28652.91379S=870Z= 5計算得XS=19737.83688YS=28651.69668S=940 Z=-5.123計算得 XS=19741.59118 YS=28722.05802X=19733.4730Y=28722.5317 計算得 S=940.0000238 Z= 3.00898694所附后的專門的excel程序，可以計算各曲線要素的樁號、中樁坐標、邊樁、橋涵等。用法：(1)主要在控制臺一欄進行操作；(2)先輸入高程、平面要素數據，可單獨輸入平面要素。輸入數。

15、據只需輸入黃色區域就可以了，然后 到控制臺啟動計算程序并刷新和保存。(3)計算中樁時，在控制臺啟動計算程序，輸入起始樁號和計算間距，然后列表后，可以在逐樁坐標看到各樁號中樁坐標和該樁號的切線方位角( 注意：用此項功能可以計算得 ZH、HY、 YH、HZ點的中樁坐標和方位角)。以下是無用的參考資料曲線任意里程中邊樁坐標正反算及放樣fx-4850程序(第五次修改)本程序是在yshf及hangniu佃73兩位師傅的成果上作的一次改動，修改內容主要有一下幾點：1、在變量符號上修改，目的是更能與工地實際 結合；2、把原主程序分為兩個，更能靈活調用；3、加入放樣程序，做到坐標計算到放樣一體化；4、使得整個。

16、測量放樣過程更加簡單。附件(點擊下載):GAUSSLE坐標正反算fx 4850程序源程序1.正算主程序GSZSIX0:SY0 : OK0 : GF0 : HKN:PR0 : RRN : Q Q-Z +Y) ” ：D=(P-R) 2(H-0)PR):KL” L(-Z +Y) ” ：M” ANG(YJJ)” =90:(注：此處若不給M賦值，則可計算斜交點)J=Abs(K-O): ProgSUB1:” FWJ= :F=FM:” X=” ：X=X:Pause0” Y=” :Y=YJ2.反算主程序GSFSXY : Z2=X : Z3 =Y :IX0:SY0 : OK0 : GF0 : HKN:PR0 :。

17、 RRN : Q Q-Z +Y) ” :D=(P-R) 2(H-0)PR):J=Abs(Y-S)cos(G-90 (X-I)sin(G-90):L=0 : M M(YJJ) ” =90:Lbl 0: Prog SUB1:L=(Z3-Y)cos(G- 90+QJ(1 十 P+JD)X 180 円不2 -X)sin(G-90+QJ(1 十 P +JD) X 180:-%)AbsLGoto1:半 J=J+L Goto 0 -1Lbl 1 : L=0 : Prog SUB1 : L=(Z3-Y) sinF:” K=” ：K=O+J:Pause0: ” L=” 1L=L3.正算子程序(SUB1)Defm。

18、 4:A=0.1184634425:B=0.2393143352:Z4=0.28444 44444:C=0.0469100770:E=0.2307653449:Z1=0.5:X=l+J(Acos(G+QCJ(1 十 P+CJD)X 180 十 n )+Bcos( G+QEJ(1 十 P+EJD)X 180 十 n )+Z4cos(G+QZ1J(1 十 P+Z1JD) X 180 十 n )+Bcos(G3)Q(1 P+(1- E)JD) X 180 十 n )+Acos(G(HQC)J(1 P+(1-C)JD) X 180 十 n ):Y=S+J(Asin(G+QCJ(1 十 P+CJD)X 。

19、180 十 n )+Bsin( G+QEJ(1 十 P+EJD)X 180 十 n )+Z4sin(G+QZ1J( 1 十 P+Z1JD) X 180 十 n )+Bsin(G&Q(1 P+(1- E)JD) X 180 十 n )+Asin(G+Q-C)J(1 P+(1-C)JD) X 180 十 n )F=G+QJ(1 十 P+JD) X 180 十 n +MX=X+LcosF : Y=Y+LsinF4.曲線兀要素數據庫：DAT-MK 0=KVH=*：S=*：O=*:G=* H=* p=* R=* Q=*K O=KVH=I=*:S=*：O=*:G=* H=* p=* R=* Q=*K O=。

20、KVH=I=*:S=*：O=*:G=* H=* p=* R=* Q=*K O=KVH=I=*:S=*:O=*:G=* H=* p=* R=* Q=*K O=KC H=I=*:S=*:O=*:G=* H=* p=* R=* Q=*K O=KC H=I=* ：s=* ：o=* ：G=* ：H=* p=* R=* Q=*(注：如有多個曲線元要素繼續添加入數據庫DAT-M 中)5、M線(坐標正算)組合程序 MG-ZBProg ” DAT” ：Prog ” GSZS 6、 M線(坐標計算放樣)組合程序 MG-FY Prog ” MGZB :Prog ” LTKZD” : Prog ” FY”7、M線(坐。

21、標反算)組合程序 M-GSFBProg ” DAT” :Prog ” GSFS說明：一、程序功能及原理1功能說明：本程序由兩個主程序 正算主程序(GSZS)、 反算主程序(GSFS)和兩個子程一一正算子程序 (SUB1)、線元數據庫(DAT-M)構成，可以根據曲 線段 直線、圓曲線、緩和曲線(完整或非完 整型)的線元要素(起點坐標、起點里程、起點 切線方位角、終點里程、起點曲率半徑、止點曲 率半徑)及里程邊距或坐標，對該曲線段范圍內 任意里程中邊樁坐標進行正反算。本程序可以在CASIO fx-4800P 計算器及 CASIO fx-4850P 計算器上運行。由于加入了數據庫(DAT-M)，可實 現坐標正反算的全線貫通 組合程序5可實現M線的正算貫通，組合程序7可實現M線的反算貫通，組合程序 6可實現 坐標計算到放樣一體化。2 計算原理：利用Gauss-Legendre 5點通用公式計算線路中邊樁坐標并計算放樣數據。利用待求點至線元起點切線作垂線，逐次迭代趨 近原理反算里程及邊距。10/10。

總結

以上是生活随笔為你收集整理的坐标反算c语言程序,道路坐标正反算无限个拐点计算器测量程序(新20070825)的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。