自編CASIOFX-4800P隧道超欠挖程序.doc

自編CASIOFX-4800P隧道超欠挖程序.doc

ID:59133466

大小:97.50 KB

頁數(shù):6頁

時(shí)間:2020-09-12

自編CASIOFX-4800P隧道超欠挖程序.doc_第1頁
自編CASIOFX-4800P隧道超欠挖程序.doc_第2頁
自編CASIOFX-4800P隧道超欠挖程序.doc_第3頁
自編CASIOFX-4800P隧道超欠挖程序.doc_第4頁
自編CASIOFX-4800P隧道超欠挖程序.doc_第5頁
資源描述:

《自編CASIOFX-4800P隧道超欠挖程序.doc》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在教育資源-天天文庫。

1、自編卡西歐fx-4800P隧道超欠挖程序作者:VV一直想要尋找一套簡單方便又實(shí)用的計(jì)算隧道超欠挖的程序,即只要輸入任意點(diǎn)三維坐標(biāo)就能直接計(jì)算該點(diǎn)的超欠挖。前段時(shí)間有問過一些人也有上百度搜索過幾次,可都沒什么結(jié)果,有見過一些理論性的東西,可無奈對程序一竅不通,因此沒辦法自己設(shè)計(jì)程序。之前自己也有編過一個(gè)公式“程序”,也不能算是程序吧,因?yàn)槟侵皇且粋€(gè)單純利用代數(shù)關(guān)系組成的公式,沒有一點(diǎn)程序語言,原理也很簡單,就是利用所測點(diǎn)距離隧道該段圓弧的圓心的高差及平距再通過“勾股定理”便可以計(jì)算出該點(diǎn)與圓心的空間距離,即實(shí)測半徑,再用實(shí)測半徑

2、減去該段弧的設(shè)計(jì)半徑便是該點(diǎn)的超欠挖咯。只是用此方法必須事前要用另外的程序反算出該點(diǎn)的里程及偏距,再將所求的里程與偏距代入上述的“公式程序”,故要分為兩步才能計(jì)算出該點(diǎn)超欠挖。此方法顯然過于繁瑣,于是便想到要將公式編入反算程序當(dāng)中,直接利用程序中反算出的結(jié)果自行代入公式,便能一步到位計(jì)算出該點(diǎn)的超欠挖,即只需輸入所測點(diǎn)的三維坐標(biāo)便能計(jì)算超欠挖,方便且快捷。之前也有研究過一陣子,可畢竟對程序語言并不很懂,一直無處下牙,便只好放棄。前幾天因?yàn)橘I了新的計(jì)算器便又頭腦發(fā)熱的想要試一下,仔細(xì)看了一些以前用過的程序清單,觀察了下里面的程序

3、語言及之間的連接關(guān)系,通過幾天的探索,終于受到了點(diǎn)啟發(fā),于是便成功的將之前的公式整合到了反算程序當(dāng)中,經(jīng)過多次的驗(yàn)證,最終確認(rèn)準(zhǔn)確無誤。于是想著拿出來與各位同行們分享,并希望得到大家的指點(diǎn),也希望給那些剛學(xué)不久的測量新手們一些幫助,希望各位測量高手與前輩們不要見笑。本人之前一直都在用“yshf”的“TYQXJS”程序,因此上述的超欠挖程序的主體部分也就是利用“TYQXJS”中的反算功能,即利用了反算結(jié)果中的S(所測點(diǎn)的里程)與Z(所測點(diǎn)距離線中的偏距),程序內(nèi)容如下:1.主程序(CQW) U"X0":V"Y0":O"S0":G

4、"F0":N"LS":P"R0":R"RN":Q:C=1÷P:D=(P-R)÷(2HPR):E=180÷π←┘ Lbl2:{XYH}:XY:I=X:J=Y:H=H: T=G-90:W=Abs((Y-V)cosT-(X-U)sinT):Z=0:Lbl0:Prog"SUB1":L=T+QEW(C+WD): Z=(J-Y)cosL-(I-X)sinL: AbsZ<E-6=>Goto1:≠>W=W+Z:Goto0△←┘ Lbl1:Z=0:Prog"SUB1":Z=(J-Y)÷sinF: S"S"=O+W▲ Z"Z"=Z▲ M"CQW"

5、=√((H-內(nèi)軌頂標(biāo)高-圓心距離內(nèi)軌頂高差)2+(Abs(Z+線中相對遂中距離)+圓心相對遂中距離)2)-R▲Goto2←┘ 2.子程序(SUB1)A=0.:B=0.:K=0.:L=0.:F=1-L:M=1-K:X=U+W(Acos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos(G+QEFW(C+FWD))+Acos(G+QEMW(C+MWD))):Y=V+W(Asin(G+QEKW(C+KWD))+Bsin(G+QELW(C+LWD))+Bsin(G+QEFW(C+FWD))+Asin(G+

6、QEMW(C+MWD))):F=G+QEW(C+WD)+90:X=X+ZcosF:Y=Y+ZsinF一.補(bǔ)充:1.輸入顯示說明??????????X0?線元起點(diǎn)的X坐標(biāo)????Y0?線元起點(diǎn)的Y坐標(biāo)????S0?線元起點(diǎn)里程????F0?線元起點(diǎn)切線方位角????LS?線元長度????R0?線元起點(diǎn)曲率半徑????RN?線元止點(diǎn)曲率半徑????Q???線元左右偏標(biāo)志(左偏Q=-1,右偏Q=1,直線段Q=0)??????S?所求點(diǎn)的里程??????Z?所求點(diǎn)距中線的邊距(左側(cè)取負(fù),值右側(cè)取正值,在中線上取零)??????CQW?

7、所求點(diǎn)的超欠挖?????2.若隧道所測部位有兩種圓心時(shí),利用圓心所對應(yīng)的弧的分段高度劃分可設(shè)置兩個(gè)選擇條件,于是只需將主程序中“M"CQW"=√((H-內(nèi)軌頂標(biāo)高-圓心距離內(nèi)軌頂高差)2+(Abs(Z+線中相對遂中距離)+圓心相對遂中距離)2)-R▲”中改為“H>內(nèi)軌頂標(biāo)高+圓心O1分段高度=>M"CQW"=√((H-內(nèi)軌頂標(biāo)高-圓心O1距離內(nèi)軌頂高差)2+(Abs(Z+線中相對遂中距離)+圓心O1相對遂中距離)2)-R1▲≠>M"CQW"=√((H-內(nèi)軌頂標(biāo)高-圓心O2距離內(nèi)軌頂高差)2+(Abs(Z+線中相對遂中距離)+圓

8、心O2相對遂中距離)2)-R2▲”3.若所測隧道斷面無需在經(jīng)常在線元之間轉(zhuǎn)換時(shí),也可以將主程序中U(線元起點(diǎn)X坐標(biāo)),V(線元起點(diǎn)Y坐標(biāo)),O(線元起點(diǎn)里程),G(線元起點(diǎn)切線方位角),N(線元長度),P(線元起點(diǎn)半徑),R(線元終點(diǎn)半徑),Q(曲線左偏為-1右偏為1直線為0

當(dāng)前文檔最多預(yù)覽五頁,下載文檔查看全文

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

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