XY">
全線直曲計算程序通用

全線直曲計算程序通用

ID:14023583

大小:40.00 KB

頁數(shù):8頁

時間:2018-07-25

全線直曲計算程序通用_第1頁
全線直曲計算程序通用_第2頁
全線直曲計算程序通用_第3頁
全線直曲計算程序通用_第4頁
全線直曲計算程序通用_第5頁
資源描述:

《全線直曲計算程序通用》由會員上傳分享,免費在線閱讀,更多相關內(nèi)容在行業(yè)資料-天天文庫。

1、經(jīng)實踐在5800上可行,反算運行時間就是慢點有4秒左右才出結果。5800測量程序加入了數(shù)據(jù)庫,綜合了網(wǎng)上的一些而成。非本人原創(chuàng),希望能與廣大朋友交流。5800坐標正反程序(加入了數(shù)據(jù)庫)1.主程序(TYQXJS)Lbl4:"1.SZ=>XY":"2.XY=>SZ":?N:?S:Prog“SUB0”↙1÷P→C:(P-R)÷(2HPR)→D:180÷∏→E:N=1=>Goto1:Goto2:↙Lbl1:?Z:Abs(S-O)→W:Prog"SUB1":"XS=":X◢"YS=":Y◢F-90→F:“FS=”:F▲DMS◢Goto4↙Lbl2:?X:?Y:X→I:Y→J:Prog“SU

2、B2”:O+W→S:“S=”:S◢“Z=”:Z◢Goto4↙2.正算子程序(SUB1)0.1739274226→A:0.3260725774→B:0.0694318442→K:0.3300094782→L:1-L→F:1-K→M↙U+W(Acos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos(G+QEFW(C+FWD))+Acos(G+QEMW(C+MWD)))→X:V+W(Asin(G+QEKW(C+KWD))+Bsin(G+QELW(C+LWD))+Bsin(G+QEFW(C+FWD))+Asin(G+QEMW(C+MWD)))→Y:G+QEW

3、(C+WD)+90→F:X+Zcos(F)→X:Y+Zsin(F)→8Y2.反算子程序(SUB2)G-90→T:Abs((Y-V)cos(T)-(X-U)sin(T))→W:0→Z:Lbl0:Prog"SUB1":T+QEW(C+WD)→L:(J-Y)cos(L)-(I-X)sin(L)→Z:IFAbs(Z)<0.000001:Then0→Z:Prog"SUB1":(J-Y)÷sin(F)→ZElseW+Z→W:Goto4:IfEndSUB0數(shù)據(jù)庫子程序Goto1↙同時保存多個曲線時的指針Lbl1:IFS<***(線元終點里程):Then***→G(線元起點方位角):***→O(線

4、元起點里程):***→U(線元起點X):***→V(線元起點Y):***→P(線元起點曲率半徑):***→R(線元終點曲率半徑):***→H(線元起點至終點長度):0或1、-1→Q:Return:IfEnd↙Lbl1:IFS<***(線元終點里程):Then***→G(線元起點方位角):***→O(線元起點里程):***→U(線元起點X):***→V(線元起點Y):***→P(線元起點曲率半徑):***→R(線元終點曲率半徑):***→H(線元起點至終點長度):0或1、-1→Q:Return:IfEnd……………..為了便于解讀,每增加一個線元增加一行語句,每增加一條曲線增加一個L

5、bl,每增加一個工程增加一個文件。8三、使用說明1、規(guī)定(1)以道路中線的前進方向(即里程增大的方向)區(qū)分左右;當線元往左偏時,Q=-1;當線元往右偏時,Q=1;當線元為直線時,Q=0。(2)當所求點位于中線時,Z=0;當位于中線左鍘時,Z取負值;當位于中線中線右側(cè)時,Z取正值。(3)當線元為直線時,其起點、止點的曲率半徑為無窮大,以10的45次代替。(4)當線元為圓曲線時,無論其起點、止點與什么線元相接,其曲率半徑均等于圓弧的半徑。(5)當線元為完整緩和曲線時,起點與直線相接時,曲率半徑為無窮大,以10的45次方代替;與圓曲線相接時,曲率半徑等于圓曲線的半徑。止點與直線相接時,曲

6、率半徑為無窮大,以10的45次方代替;與圓曲線相接時,曲率半徑等于圓曲線的半徑。(6)當線元為非完整緩和曲線時,起點與直線相接時,曲率半徑等于設計規(guī)定的值;與圓曲線相接時,曲率半徑等于圓曲線的半徑。止點與直線相接時,曲率半徑等于設計規(guī)定的值;與圓曲線相接時,曲率半徑等于圓曲線的半徑。2、輸入與顯示說明輸入部分:81.SZ=>XY2.XY=>SZN?選擇計算方式,輸入1表示進行由里程、邊距計算坐標;輸入2表示由坐標反算里程和邊距。S?正算時所求點的里程,反算時為所求點的近似里程,反算時輸入的近似里程不能夸線元,若夸線元的話,需進行第二次反算,并以第一次的結果做為近似里程,否則反算的里

7、程及邊距不對,Z?正算時所求點距中線的邊距(左側(cè)取負,值右側(cè)取正值,在中線上取零)X?反算時所求點的X坐標Y?反算時所求點的Y坐標顯示部分:XS=×××正算時,計算得出的所求點的X坐標YS=×××正算時,計算得出的所求點的Y坐標FS=×××正算時,所求點對應的中線點的切線方位角S=×××反算時,計算得出的所求點的里程Z=×××反算時,計算得出的所求點的邊距要注意區(qū)別字母O和數(shù)字0,↙為回車符號。ClrMemory:1→N:5800計算器由坐標計算面積小程序LbI0:E

當前文檔最多預覽五頁,下載文檔查看全文

此文檔下載收益歸作者所有

當前文檔最多預覽五頁,下載文檔查看全文
溫馨提示:
1. 部分包含數(shù)學公式或PPT動畫的文件,查看預覽時可能會顯示錯亂或異常,文件下載后無此問題,請放心下載。
2. 本文檔由用戶上傳,版權歸屬用戶,天天文庫負責整理代發(fā)布。如果您對本文檔版權有爭議請及時聯(lián)系客服。
3. 下載前請仔細閱讀文檔內(nèi)容,確認文檔內(nèi)容符合您的需求后進行下載,若出現(xiàn)內(nèi)容與標題不符可向本站投訴處理。
4. 下載文檔時可能由于網(wǎng)絡波動等原因無法下載或下載錯誤,付費完成后未能成功下載的用戶請聯(lián)系客服處理。