計算器公路測量程序設計會員收費版

1、FX5800計算器測量程序集2.4 版可以根據(jù)自己標段情況用相關主程序及子程序，再在0程序中匯總1XY、A、AB、HX、JS、DX、QX、F、XY、X1)；2ZD、A、B、AB、HX、QX、F、ZD、X1)3GC、H、I、QX、S1、I1（4GD、C、QX、G1）5BP、A、B、AB、HX、H、I、C、JS、DX、QX、F、ZD、X1、S1、I1、G1、W1）6FM、A、AB、HX、H、I、JS、DX、QX、F、XY、X1、S1、I1)7ZP、A、AB、HX、C、JS、DX、QX、F、XY、X1、G1)8JS、JS、DSA、B、AB、HX、H、I、QX、S、SD、F、ZD、X1、S1、I1、S

2、D1）0（數(shù)子0）ClrMat:ClrVar:12DimZ：Norm 2:Do:(XY=1，ZD=2 ，GC=3，GD=4， BP=5，F(xiàn)M=6，ZP=7，JS=8，SD=9)=>QING AN 1-9：GetkeyZ3:While Z3=35:Prog1XY:WhileEnd:While Z3=36:Prog2ZD：WhileEnd: While Z3=37:Prog3GC：WhileEnd: While Z3=21:Prog4GD：WhileEnd: While Z3=22:Prog5BP：WhileEnd: While Z3=23:Prog6FM：WhileEnd: While Z

3、3=31:Prog7ZP：WhileEnd: While Z3=32:Prog8JS：WhileEnd: While Z3=33:Prog9SD：WhileEnd:LpWhile Z325:”XIE XIE SHI YONG”:0011SC1XY2XY-S2ZD、3GC、4GD、5BP、6FM、7ZP、8JS、9SD、A、AB、B、B6B7B8B9C、DX、DX0、F、G1、H、HX、I、I1、JS、MQX、S、S1、SD0、SD1、T、W1、X1、XY、XYHZD程序內(nèi)容無電子版。全在計算中，本人出售單機卡西歐計算器5800，或者帶2.4程序計算器(凡購買帶程序計算器者即為會員，享有以后所有

4、版本的使用)詳情凳陸淘寶網(wǎng)店：（或加QQ詳談，加QQ注明:淘寶。以下子程序除T程序外，其余子程序根據(jù)自己標段設計數(shù)據(jù)修改)TNorm 2: QKM？Z：XQ？U：YQ？V：LS1？M：LS2？O：A1？A：A2？B：FWJ？G：ZJ？P：？R：P÷Abs(PQ:A2÷RH:H<M=>MH:H-MS:B2÷RN:N-OC:O>N=>ON:H=0=>×10-9H:HX:90S2÷(RHK:G-QKG:N=0=>×10-9N: 90C2÷(RND:P+QK+QDP:ProgAB:Abs(PE:(

5、R+C)tan(E÷2)-(C-A)÷sin(E)+DT:(R+A)tan(E÷2)-(C-A)÷sin(E)+BF:XH:Z-S+TO:ProgHX:U-(A-T)cos(G)+QBsin(GU:V-(A-T)sin(G)-QBcos(GV:Fix 3: JDKM=:Locate 6,4,O: JDX=:Locate 6,4,U: JDY=:Locate 6,4,VFWJ=:GDMSZJ=：PDMSLS1=: Locate 6,4,H: LS2=: Locate 6,4,N: T1=: Locate 6,4,T: T2=: Locate 6,4,FR=

6、:R以下全為數(shù)據(jù)子程序，根據(jù)自己標段設計數(shù)據(jù)修改部分數(shù)據(jù)。X1Z4=0=Return:Z4=1=Goto 1:Z4=2=Goto 2:LbI 1:If Z:Then iR:iU:iG:iH:iT: ProgF:Return:IfEndLbI 2:If Z:Then iR:iU:iG:iH:iT:ProgF: Return:IfEndIf Z:Then iR:iU:iG:iH:iT:Prog”F”:Return:IfEndZ4=0=Return:Z4=1=Goto 1:Z4=2=Goto 2:LbI 1:If Z:Then 0OU:5144063.566V:299。4339”G:40.857H:

7、97.25P: 60R:1Q:Return:IfEndIf Z:Then 40.857OU:514034.668V:331。1615.1”G:118.562H:60P: 60R:1Q:Return:IfEndIf Z:Then 159.419OU:514081.521V:84。2922.4”G:81.667H:60P: 1×1045R:1Q:Return:IfEndLbI 2: If Z:Then 0OU:514488.986V:58。4917.2”G:93.889H: 1×1045P:180R:1Q:Return:IfEndIf Z:Then 93.889OU:51457

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

9、2: LbI 1:If Z:Then R：iC:iI: Return:IfEnd:LbI 2:If Z:Then R:iC:iI:Return:IfEnd:If Z:Then R:iC:iI:Return:IfEnd:I10K:1W: Z4=1=Goto 1:Z4=2=Goto 2:LbI 1:If Z:Then S:iM: Return:IfEnd:If Z:Then iS:C:iM:iN: Return:IfEnd:If Z:Then S:iM: Return:IfEnd:LbI 2:If Z77.872:Then 0S:2-2iM:Return:IfEnd:If Z93.889:Then

10、 16.017+16.017iS:77.872C:2-2iM:5-5iN:Return:IfEnd:If Z198.567: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:iN:Return:IfEndG1Z4=1=Goto 1:Z4=2=Goto 2：LbI 1:If Z40.857:Then 40.857i

11、S: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 Z241.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:

12、If Z466.227:Then 0S:3.5+5.75iA:Return:IfEndSD1If 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”Z19:4.355-180iZ20:Return:IfEnd:V路中線標高至設計隧道中線底高差+底部圓心水

13、平偏移距離（向左偏為負，向右偏為正）W110E:10F:2.6M:2N:2U:1.5I:1.75J:8W:2V:Z4=1=Goto 1:Z4=2=Goto 2：LbI 1: If D<0: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: Return:Else Goto L: IfEndLbI 2:If D<0:Then Goto L:Else Goto R:IfEnd:LbI L:0.75A:0.75B:0.75C:Return:LbI R:

14、If Z445:Then Goto L:Else If Z506.9:Then 0.25×(Z-445)÷21.2Q:.75+QA:AB:AC:Return:IfEnd×10-9 ×1045 =-336.478+60i中i是復數(shù)中虛數(shù)符號,在計算器從上向下第三排鍵，第一個。0.65m.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) 計算器總體運

15、行及結果說明輸入樁號和距離：輸入100-25i(樁號100，左側25m)EXE結果顯示：H-計算高程，I-橫坡EXE再次輸入樁號：輸240（中樁后面不用輸結果顯示：H計算面高程序，I-路基縱坡EXE輸入樁號：輸入240（只需輸入樁號就可以）EXE結果顯示：LGD-左幅寬度；RGD-右幅寬度EXE選擇線路后輸入填方放寬值：輸入0.5(默認為0.5就按EXE就行，如不加寬就輸0)EXE輸入大概樁號：輸入50（第一次放樣輸入）EXE輸入測量坐標：2600569.371+514066.027i EXE輸入測量地面標高：輸入64.95 EXE結果顯示：LX值為平移值，負值為從中樁向邊樁外移，正值為從邊向

16、中平移。KM-測量點樁號，D值測量點距中樁距離。TW-填挖值。第一個值為地面標高至設計標高的高度，第二個值為已考慮了路面結構層厚度0.9m（一般所說的至96區(qū)頂高）,在5BP放樣程序中最后，值負為挖方，正為填方。前面同理輸入測站坐標-EXE選擇線路1-EXEKM=為輸入漸變放樣距離，如輸入20（后面樁號都會自動加上20m）EXE輸入樁號及距中距離EXE顯示放樣點坐標、測站點至放樣點方位角值及距離EXE放樣完后，測量地面標高，輸入計算，輸入45.32EXE顯示TW值，為填挖值，已扣路面結構層厚度（程序默認為0.9）同時后面樁號相對上樁號加上20m前面同理輸入測站坐標 EXE選擇線路 EXEZKM

17、+-Mdi?為輸入錐頂樁號及錐坡路基邊側地面標高（標高為輸入正負，正為右側錐坡，負為左側錐坡）如：輸入樁號為120，左側的錐坡地面標高：28.6MR?輸入錐前地面標高，即靠橋臺前標高（正值）,+放寬值（默認放寬0.5m）EXES0:SZH+,DZH-?顯示出放樣邊長最大值，及輸入放樣值，小樁號臺錐坡輸入正值，大樁號臺錐坡輸入負值，（小大樁號臺，如一橋三跨，0#臺就為小樁號臺，3#臺就為大樁號臺）輸入8 EXE顯示結果值同前面1主程序6主程序值結果意思。放樣完，輸入測量地面標高 EXE計算出填挖值，同時進行下個邊長放樣，（邊長是以錐樁號向前或向后的路線方向的長度）開始選擇隧道線路號（或左線、右線

18、）此程序假定C線為左側隧道，I線為右側隧道）CQHD？輸入襯砌厚度（程序做的內(nèi)凈空值）如輸入0.65m輸入大概樁號：（第一次放樣輸入，如輸入50EXE輸入隧道內(nèi)測量的坐標值，EXE輸入隧道內(nèi)測量的實測標高值。如輸入47.645 EXE結果顯示：LX-為超欠挖值，正值為超挖，負值為欠挖。KM-D-為測量點樁號距離，H0-為測量點至隧道路面頂高度EXE再次輸入測量坐標進行下次超欠挖值計算。以下為01程序此為附的一套測量資料程序，做的為廣東省施工檢表6-9表?，F(xiàn)以計算表6示例：選擇按住數(shù)子1輸入計算允許最小和最大誤差單位為mm,如輸入：5-5i.則為正負5mmEXE選擇計算的的線路號輸入樁號及距中樁

19、距離（如輸入180則為樁號180的中樁）X、Y為設計坐標、XO、YO則為在允許偏差范圍內(nèi)自動生成的坐標。EXE0X、0Y-值為XY差值，單位為mm,0XY為偏差標準差。EXE以下附表：平面位置檢查記錄表施檢表（6） 編號： 第 頁 共 頁項目名稱廣州至河源高速公路惠州段施工單位廣州市公路工程公司合同段第11合同段樁號或范圍監(jiān)理單位廣東翔飛公路工程監(jiān)理有限公司公路等級高速樁號設 計 值實 測 值偏 差備 注XYXYxyX2+Y2自檢意見監(jiān)理意見測量計算復核技術主辦項目主管測量日期施工放線測量記錄表施檢表（7） 編號： 第 頁 共 頁 項目名稱廣州至河源高速公路惠州段施工單位廣州市公路工程公司監(jiān)理單位廣東翔飛公路工程監(jiān)理有限公司合同段第11合同段公路等級高速測點范圍儀器型號GTS-322W測點或樁號設計坐標實測坐標計算距離（m）計算