FX5800計算器測量程序集24 版使用說明

1、CASIO FX5800計算器測量程序集2.4版 作者：藍星FX5800計算器測量程序集2.4 版使用說明一、程序功能主要功能：采用交點法方式計算多條線路坐標正反算，可算任意復雜線型及立交匝道，包括C型，S型、卵型、回頭曲線等；極坐標放樣，全線路基邊坡開挖口及坡腳放樣計算、路基任意點設計高程、橫坡、設計半幅寬度.隧道欠超挖放樣計算。新版本優(yōu)化：1、優(yōu)化程序語句、2、以復數形式輸入變量及數據庫，取消原矩陣數據庫;3、修改隧道超欠挖程序為通用形，不受圓心個數限制、4、新增測量資料表計算二、源程序（綠色為程序名；藍色為輸入計算器內容）紫色為新版改動處（可以根據自己標段情況用相關主程序及子程序，再在0

2、程序中匯總）0.匯總程序（1、坐標計算放樣程序(1XY、A、AB、HX、JS、DX、QX、F、XY、X1)；2、坐標反算程序（2ZD、A、B、AB、HX、QX、F、ZD、X1)；3、高程計算查閱程序（3GC、H、I、QX、S1、I1）；4、路基半幅標準寬度查閱程序（4GD、C、QX、G1）；5、路基邊坡及開挖口放樣程序（5BP、A、B、AB、HX、H、I、C、JS、DX、QX、F、ZD、X1、S1、I1、G1、W1）；6、路基標準距離放樣（6FM、A、AB、HX、H、I、JS、DX、QX、F、XY、X1、S1、I1)；7、橋梁錐坡計算放樣程序（7ZP、A、AB、HX、C、JS、DX、QX、F、

3、XY、X1、G1)；8、極坐標計算程序（8JS、JS、DS）；9、隧道超欠挖計算程序（A、B、AB、HX、H、I、QX、S、SD、F、ZD、X1、S1、I1、SD1）運行后按19數子約半秒，選擇程序，返回時，在樁號輸入-1,返回選擇計算類型，輸入-2,返回選擇線路。計算內程序排例：0、01（測量資料專用）、02、0XYH 、1DAO XIAN、1SC（水準測量用）、1XY、2XY-S（由坐標計算面積）、2ZD、3GC、4GD、5BP、6FM、7ZP、8JS、9SD、A、AB、B、B6（測量表格檢表6）、B7（檢表7）、B8（檢表8）、B9（檢表9）、C、DX、DX0、F、G1、H、HX、I、I

4、1、JS、M（度分秒轉十進制）、QX、S、S1、SD0、SD1、T、W1、X1、XY、（五點通線元法計算坐標）、ZD帶有不完整緩和曲線的線元轉交點數據程序（T）。只為轉交點的輔助程序，不參入任何主程序中運行。說明：運行后“QKM”？輸入起點樁號；“XQ”？ “YQ”？輸入起點X、Y坐標；“LS1”？ “LS2”？輸入前段緩和曲線長度，后段緩和曲線長度；“A1”？ “A2”？輸入前段緩和曲線參數，后段緩和曲線參數；“FWJ“？輸入起點切線方位角；”ZJ“？輸入轉角（終點方位角減起點方位角之差，左轉為負，右轉為正）；計算結果要素同QX子程序中要素字母。以下全為數據子程序，根據自己標段設計數據修改黑

5、色部分數據。 -1程序名：X1（線路1和線路2坐標計算要素程序，）Z4=0=Return:Z4=1=Goto 1:Z4=2=Goto 2:LbI 1:If Z241.086:Then -336.478+60iR:2600441.639+514392.519iU:280。2028.78”+203。0828.32”iG:106.667+81.667iH:-270.668-283.056iT: ProgF:Return:IfEndLbI 2:If Z273.006:Then 171.674+180iR:2600784.547+514635.863iU:58。4917.2”+68。0926.91iG:

6、93.889+125iH:171.674+184.771iT:ProgF: Return:IfEndIf Z466.227:Then 341.96+445iR:2600664.76+514799.865iU:123。4325.9”+15。5849.5”iG:138.211iH:68.954+125.273iT:Prog”F”:Return:IfEndZ4=0=Return:Z4=1=Goto 1:Z4=2=Goto 2:LbI 1:If Z40.858:Then 0O:2600509.148U:5144063.566V:299。4339”G:40.857H:97.25P: 60R:1Q:Ret

7、urn:IfEndIf Z159.42:Then 40.857O:2600537.297U:514034.668V:331。1615.1”G:118.562H:60P: 60R:1Q:Return:IfEndIf Z241.087:Then 159.419O:2600625.86U:514081.521V:84。2922.4”G:81.667H:60P: 11045R:1Q:Return:IfEndLbI 2: If Z93.89:Then 0O:2600695.67U:514488.986V:58。4917.2”G:93.889H: 11045P:180R:1Q:Return:IfEndIf

8、 Z198.568:Then 93.889O:2600736.998U:514572.974V:73。4551.6”G:104.678H: 180P:180R:1Q:Return:IfEndIf Z273.007:Then 198.567O:2600736.233U:514676.181V:107。54.3”G:74.439H: 180P:445R:1Q:Return:IfEnd程序字母說明：O-線元起點樁號；U-起點X坐標；V-起點Y坐標；G-線元起點樁號切線方位角; 線元長度，線元起點曲率半徑，線元終點曲率半徑,Q線元判別(以道路中線的前進方向（即里程增大的方向）區(qū)分左右；當線元往左偏時，

9、Q=-1；當線元往右偏時，Q=1；當線元為直線時，Q=0)。說明：1、If Z計算交點段終點樁號(或者直線段任意樁號)：Then 交點樁號+圓半徑iR:交點X坐標+交點Y坐標iU:起點至交點方位角+交點轉角iG:交點前段緩和曲線長度+交點后段緩和曲線長度iH:交點前段切線長度+交點后段切線長度iT: Prog”F”: Return: IfEnd（轉角則為交點段終點方位角減起點方位角，分正負，左偏為負，右偏為正）如整條線無曲線，全為直線段，則交點為終點樁號，XY為終點坐標，方位角為起點方位角，轉角和圓半徑為1，其它全為0。-1程序名：S1(線路1和線路2高程豎曲線要素子程序)Z4=1=Goto

10、1:Z4=2=Goto 2: LbI 1:If Z241.09:Then 2000R：95.356+40.742iC:-3.155+.812iI: Return:IfEnd:LbI 2:If Z133.601:Then 1525R:106+45.12iC:-.64+2.98iI:Return:IfEnd:If Z466.23:Then 1945R:298+50.841iC:2.98-1.968iI:Return:IfEnd:程序字母說明：R-豎曲線半徑:C-豎曲線交點樁號+交點樁號高程i（未豎曲線調整的）；I豎曲線前縱坡+豎曲線后縱坡i-1程序名：I1（線路1和線路2高程超高參數子程序）0K:

11、1W: Z4=1=Goto 1:Z4=2=Goto 2:LbI 1:If Z159.419:Then 0S:6-6iM: Return:IfEnd:If Z187.987:Then 28.568+28.568iS:159.419C:6-6iM:2-2iN: Return:IfEnd:If Z241.086:Then 0S:2-2iM: Return:IfEnd:LbI 2:If Z77.872:Then 0S:2-2iM:Return:IfEnd:If Z93.889:Then 16.017+16.017iS:77.872C:2-2iM:5-5iN:Return:IfEnd:If Z198.5

12、67:Then 0S: 5-5iM:Return:IfEnd: If Z273.006:Then 74.439S:198.567C:5-5iM:2-2iN:Return:IfEnd:If Z335:Then 0S:2-2iM:Return:IfEnd: If Z346.235:Then 11.235+11.235iS:335C:2-2iM:1.5-1.5iN:Return:IfEnd子程序中字母表示說明：K中央分隔帶半幅寬（中樁標高至中樁中線距離，無分隔帶則為0）；W超高方式參數（W=1為一般直線方式超高，W=2為三次拋物線方式超高）;S超高漸變段左距離+右距離i（不是漸變段則輸入0）；C-超

13、高漸變段起點樁號（不是漸變段，無需輸入）；M超高段起點左橫坡+右橫坡i，N-超高漸變段終點左橫坡+右橫坡i（不是漸變段，無需輸入）。-1程序名：G1(線路1和線路2路基標準半幅寬度參數子程序)Z4=1=Goto 1:Z4=2=Goto 2：LbI 1:If Z40.857:Then 40.857iS:0C:3.5+5iA:5.25iB: Return:IfEnd:If Z159.419:Then 0S:3.5+5.25iA:Return:IfEnd: If Z187.987:Then 28.568iS:159.419C:3.5+5.25iA:5.5iB: Return:IfEnd:If Z24

14、1.086:Then 0S:3.5+5.5iA:Return:IfEnd:LbI 2: If Z321.611:Then 0S:3.5+5iA:Return:IfEnd:If Z346.235:Then 24.624iS:321.611C:3.5+5iA:5.75iB: Return:IfEnd:If Z466.227:Then 0S:3.5+5.75iA:Return:IfEnd子程序中字母表示說明：C寬度漸變段起點樁號（不是漸變段不輸）；A寬度漸變段起點左側寬度+右側寬度i; B寬度漸變段終點左側寬度+右側寬度i（不是漸變段，無需輸入）；S-寬度漸變段左側距離+右側距離i（不是漸變段輸0）

15、。-1程序名：SD1(隧道1和隧道2參數子程序)If Z4=1:Then 5I:1.4V:12+19。16iZ16:1.4+51。4218”iZ17:5.1+218。3iZ18: 1.4+51。4218”iZ19:12+19。16iZ20:Return:IfEnd:If Z4=2:Then 5+2.2iI:3.825V:4.355Z16:4.355-251。1846”iZ17: 6.07+217。2228”iZ18:4.355-108。4114”iZ19:4.355-180iZ20:Return:IfEnd:子程序中字母表示說明：I隧道開挖面里圓心個數和直線段共個數+隧道中線距設計路中線距離（

16、左負右正）i；V路中線標高至設計隧道中線底高差+底部圓心水平偏移距離（向左偏為負，向右偏為正）；Z16Z16+I-隧道中線型數據，直線段為：長度-起點方位角；圓曲線段為：圓半徑+偏角（即圓心夾角）.-1程序名：W1(線路1和線路2路基填挖邊坡參數子程序)10E:10F:2.6M:2N:2U:1.5I:1.75J:8W:2V:Z4=1=Goto 1:Z4=2=Goto 2：LbI 1: If D0:Then Goto L:Else Goto R:IfEnd:LbI L:1A:1.25B:1.25C:Return:LbI R:If Z110:Then 1.25A:1.25B:1.5C: Retur

17、n:Else Goto L: IfEndLbI 2:If D0:Then Goto L:Else Goto R:IfEnd:LbI L:0.75A:0.75B:0.75C:Return:LbI R:If Z445:Then Goto L:Else If Z506.9:Then 0.25(Z-445)21.2Q:.75+QA:AB:AC:Return:IfEnd子程序中字母表示說明：A挖方第一階邊坡邊率；B挖方第二階邊坡邊率；C挖方第三階邊坡邊率；E挖方第一階高度；F挖方第二階高度；M挖方路基碎落臺及水溝寬度；N挖方第二臺階平臺寬度；U挖方第三臺階平臺寬度；I填方第一階邊坡邊率；J填方第二階邊坡

18、邊率; W填方第一階高度；V-填方第二臺階平臺寬度。（注：本程序只做出挖方三個臺階，填方二個臺階，如需增加，先需在程序5BP程序相應增加。再如一標段有坡率及坡高不一樣時，可以照其它參數程序一樣，用判別語句。）三、使用說明1、規(guī)定 (1) 坐標計算以交點方式計算，一般情況下一個交點計算一段線是：直線+緩和曲線+圓曲線+緩和曲線+直線。在匝道中先根據實際線來調整，可以單獨計算一段不完整的緩和曲線+圓曲線。也可以單獨計算一段緩和曲線或一段圓曲線，需先運行T程序整理成交點數據。無緩和曲線時，緩和長度輸0。(2) 程序中：10-9 為10的負9次方即0.000000001; 1045 為10的45次方；

19、為圓周率即3.1415926; 為根號； =：X前有空格二個，為了顯示效果, -336.478+60i中i是復數中虛數符號,在計算器從上向下第三排鍵，第一個。(3) 為了區(qū)別字母O及數子0，特把字母0加粗。2、輸入與顯示說明 輸入提示部分：A:XY=1， ZD=2 ，GC=3， GD=4， BP=5， FM=6， ZP=7， JS=8， SD=9? 按對應數子鍵約半秒:1、坐標計算放樣程序2、坐標反算程序；3、高程計算查閱程序；4、路基半幅標準寬度查閱程序；5、路基邊坡及開挖口放樣程序；6、路基標準距離放樣；7、橋梁錐坡計算放樣程序；8、極坐標計算程序；9、隧道超欠挖計算程序XZ？YZ？ 為置

20、儀點坐標，第一次運行輸一次，以下運行不需再輸入，下次再運行此程序調上次輸值，如需改，則輸入，不需改，則按確認鍵。(后附有導線點坐標存儲子程序,有興趣的可加上)“QX:X1=1,X2=2”?選擇經路，坐標計算中輸入0值，變?yōu)檩斎刖€元段曲線要素。輸1為第一條線路。輸2為第二條線路，本程序暫設計實例為2條線路。KM？算輸入大概樁號）輸入-1，返回輸入選擇計算類型，輸入-2,返回選擇線路。 KM+Di？正算時輸入所求點樁號和所求點距中線的邊距(左側取負值,右側取正值，在中線上后面不輸)X0+YOi？反算時所求點的X+Y坐標（放樣程序中實測X+Y坐標）以復數形式一次輸入。L0? 涵洞放樣程序中涵距中心樁

21、號前后距離,前為正,后為負.(即涵洞半幅寬度)M0? 放樣程序中原地面標高輸入H-B？計算面至路面高差（默認路面為0）PJ1?+PJ2? 為路線中線與邊線的右夾角+邊線至路前進方向夾角,默認值均為90度.，不是涵洞橋梁計算不需輸PJ2，后面也不會出行L0？TH-GH？邊坡放樣中填方超放寬值，默認值為0.5m.LD:Z-,Y+? 橋梁錐坡向左右方向邊長，左為負數，右為正數。(即為錐坡高程減地面高程后乘以填方坡比)LR? 錐坡向路線前進或向后退方向邊長。Z0? 錐坡頂邊樁號L0:SZ+,DZ-?錐坡放樣中，橢圓上分段放樣距離，小樁號錐坡輸正數，大樁號錐坡輸負數?！癈QHD”? 隧道超欠挖程序中襯砌

22、厚度, 默認值為0.65m.QX子程序中和T程序結果中：“JDKM”？輸入交點樁號；“JDX”？ “JDY”？輸入交點X、Y坐標；“FWJ“？輸入起點至交點方位角”ZJ“？輸入轉角（終點方位角-起點方位角之差，左轉為負，右轉為正）;“LS1”？ “LS2”？輸入交點前段緩和曲線長度，交點后段緩和曲線長度；“T1”？ “T2”？ 輸入交點前段切線長度，交點后段切線長度；”R”?圓半徑輸出部分 X=* 正算時，計算得出的所求點的X坐標Y=* 正算時，計算得出的所求點的Y坐標FWJ=* 正算時，計算得出的所求點的至置儀點方位角S=* 正算時，計算得出的所求點的至置儀點距離KM=* 反算時，計算得出的

23、所求點的里程D=* 反算時，計算得出的所求點的邊距H=* 所求點位置設計計算面頂標高I=* 所求點位置設計路面橫坡（D輸0時為，本段路基縱坡）LGD=* 所求點位置設計路面頂左半幅標準寬度LGD=* 所求點位置設計路面頂右半幅標準寬度LX=* 邊樁放樣程序中實測點至設計邊坡點距離，正向內移，負向外移。(隧道程序中為超欠挖值，正為超挖，負為欠挖)TW=* 邊樁放樣程序中，實測放樣邊坡點至止樁號設計頂填挖高度值(負為挖方值,正為填方值)H0=* 隧道放樣程序中測量點至設計面高度四、結束語1、本套程序實例線路給二條，如標段像匝道有多條線時，同理增加。2、為了更好的開發(fā)計算器程序，本人特建一QQ群，歡

24、迎各位測友加入，QQ群號是：17507020。3、因本人QQ加人已滿，以后有問題請在群內或論壇中回復。附后為坐標計算參數子程序X1、X2和高程計算子程序S1、S2數據來源（X1、S1為C線，X2、S2為I線）交點數據均需先運行T程序，計算出交點數據例如X1要素：先運行T程序，輸入表中C線參數：QKM輸0；XQ輸2600509.148；YQ輸514063.566；LS1輸40.857;LS2輸81.667;A1輸80，A2輸70；FWJ輸299。4339“；ZP輸183。4518.1“;R輸60。計算后各要素結果記錄在本上，再對應做X1子程序就可以了。18上圖為SD1程序中Z4=1時隧道斷面參數

25、數據的圖。上圖為SD1程序中Z4=2時隧道斷面參數數據的圖。1、附帶坐標計算面積小程序 程序名：XY-S0Q:Norm 2:1I:?N:X1?X：Y1?Y：XA：YB:XE:YF:Do:“XN?X：YN?Y：Q+(XF-YE)2Q:XE:YF:I+1I:Lpwhile IN：Q+(AF-BE)2S:MIAN JI= ：Abs(S) (運行后N？，輸入點數，然后輸入第一點坐標，再著輸入2點一直輸入N點后就出來面積)計算器總體運行及結果說明：做好數據庫后，運行0程序，按相應數子鍵，對應相應主程序（按數子鍵時請按住約半秒）按1鍵后：（橋梁涵洞坐標計算放樣程序）輸入儀器測站點坐標：2600535.65

26、+514035.651i EXE輸入選擇線路：1 EXE輸入偏角：（如不是涵洞計算可直接只輸一個角，默認為90度）是正交 直接按EXE輸入樁號及距離：200-20i(前面為樁號后面為距中距離，左負右正，中樁后面不需輸)輸后按EXE計算結果顯示：X、Y-坐標，FWJ-測站點至計算點方位角（十進制顯示：42.4235即為42度42分35秒）S-測站點至計算點距離按EXE輸-2，返回再次輸入測站坐標，選擇線路輸入角度為：75+66.888i EXE偏角中涵洞放樣中輸入方法：如圖：放樣以下圖中涵洞基礎右側角A點位置。輸入樁號和距離：135+32.161i EXE輸入涵洞斜寬：10.82COS(90-6

27、6.888) EXE結果數據同前.EXE 再次輸入樁號進入下點放樣計算.按EXE 輸-1，按EXE，EXE選擇按2后：（坐標反算樁號距及設計高程）選擇線路號：如輸入1 EXE2600625,514082輸入大概樁號（第一運行輸入）：50 EXE輸入測量坐標：2600571.4+514052.68i結果顯示：KM-樁號，D-距中距離（右正，左負），H-設計標高EXE 再次輸入測量坐標進入下點反算0程序中選擇按3（設計標高及橫坡計算）輸入選擇線路號：輸入2EXE輸入設計路面至計算面的高度：輸入1.5 EXE輸入樁號和距離：輸入100-25i(樁號100，左側25m)EXE結果顯示：H-計算高程，I

28、-橫坡EXE再次輸入樁號：輸240（中樁后面不用輸結果顯示：H計算面高程序，I-路基縱坡EXE0程序中選擇按4（設計半幅寬度計算）輸入樁號：輸入240（只需輸入樁號就可以）EXE結果顯示：LGD-左幅寬度；RGD-右幅寬度EXE0程序中選擇按5（路基邊坡放樣程序）選擇線路后輸入填方放寬值：輸入0.5(默認為0.5就按EXE就行，如不加寬就輸0)EXE輸入大概樁號：輸入50（第一次放樣輸入）EXE輸入測量坐標：2600569.371+514066.027i EXE輸入測量地面標高：輸入64.95 EXE結果顯示：LX-平移值，負值從中向邊移，正值從邊向中移。KM-測點樁號，D-測點距中樁距離。TW-填挖值，負為挖方，正為填方，第一個值為至設計標高，第二個值為扣除路面結構層厚度0.9m，即路床頂。0程序中選擇按6（路基定值距離放樣程序）前面同理輸入測站坐標 EXE選擇線路1 EXEKM=為輸入放樣間距 EXE輸入樁號及