卡西欧5800可编程计算器在高速公路施工测量上的应用
卡西欧5800基本测量程序(完整版)
卡西欧5800基本测量程序(完整版)卡西欧5800 程序(完整版)说明：本程序适用于公路、桥梁、隧道测量。
本程序简单、方便、快捷、拓展功能宽，使用时只需按曲线要素表输入一次就可以计算整条线路（包括高程、超高段横坡），能正、反算，在已知坐标下可以反算出该点桩号及相对宽度，拓展功能有，放边、仰坡、隧道断面测量、开挖轮廓线等。
主程序:MAIN＂ZH（θ） F（１）＂?M↓ (0为正算、1为反算)If M=θ:Then ＂ZHUANG HAO＂?A：＂KUAN DU＂?W:Else＂Ｘ＝＂?H：＂Ｙ＝＂?W:＂Ｚ＝＂？Ｑ：IfEnd↓(第一个交点参数)(交点桩号)…→P:(切线长度)…→T:(曲线总长)…→S:(圆半径)…→R=:(缓和曲线长)…→L:(第一方位角)…→U:(第二方位角)…→V:(交点X坐标)…→N:(交点Y坐标)…→E:(第一直线长、无为0)…→D:(第一坡度)…→Z〔8〕:(第二坡度)…→ Z〔9〕: (缓和曲线超高段长度)…→Z〔10〕:(曲线偏向,右偏为+1,左偏为-1)…→K ↓If M=θ:Then If A<P-T:Then goto 1 :IfEnd:IfEnd↓Prog＂ZFXZ＂↓If K=θ:Then goto 2 :IfEnd↓………… (中间交点参数)Prog＂ZFXZ＂↓If K=θ:Then goto 2 :IfEnd↓………… (最后一个交点参数)If M=θ:Then If A>P-T+S+D:Then Goto 1 :IfEnd:IfEnd↓Prog＂ZFXZ＂↓If K=θ:Then goto 2 :IfEnd↓Lb1 1：＂NO TASK＂↓Lb1 2：If M=1:Then If A=1:Then ＂ZHUANG HAO＂:Z◢＂SJ KUAN DU＂:B◢IfEnd:IfEnd↓＂-------END-------＂KUAN DU （拓展功能程序，用于反算）1→Ｍ:Prog＂MAIN＂↓Z→A:W→E:θ→W↓Prog＂GAO CHENG＂↓E→W↓Q-F→P↓If P≤……(从小至大):Then ……→D:Goto 1:IfEnd↓……(同上)Lb1 1↓＂……＂:D◢(同上) ◢＂----------END---------＂YUANK(B÷(2R))→F↓2R Sin(K F r)→C ↓J+F r→J ↓Prog＂XZBH＂HHQXB-B^5÷(9θ(RL)2)→C ↓KB2÷(6RL)→F ↓J+ F r→J↓Prog＂XZBH＂PYJSIf O=θ:Then＂YUAN＂:J+F r→J:IfEnd↓If O=1:Then＂HHQX＂:J+2F r→J:IfEnd↓If O=2:Then＂LINE＂:J+18θ→J:IfEnd↓W→C↓If A>P-T+S-L:Then J-9θ→J:Else J+9θ→J:IfEnd↓Prog＂XZBH＂↓"X=":X◢"Y=":Y◢QXCS(有改)Prog＂QDZB＂↓If A≤P-T+L:Then A-P+T→B:U→J:1→O: Prog＂HHQX＂: Goto 1 :IfEnd↓If A≤P-T+S-L:Then A-P+T-L→B:θ→0:L-L^3÷(90R2)→C:KL÷(6R)→F:U+F r→J: Prog＂XZBH＂:U+3F r→J: Prog＂YUAN＂: Goto1:IfEnd↓If A≤P-T+S:Then P-T+S-A→B:1→O:-K→K:V+180→J: Prog＂HHQX＂: Goto 1 :IfEnd↓If A≤P-T+S+D:Then 2→O:A-P+T-S→C: Prog＂XZBH＂:IfEnd↓Lb1 1：↓Prog＂PYJS＂↓Prog＂GA0 CHENG＂QDZBN→X:E→Y:T→C↓If A>P-T+S-L:Then V→J: Else U+18θ→J:IfEnd↓Prog＂XZBH＂↓X→Z〔5〕:Y→Z〔6〕JDTZIf Z〔1〕< θ:Then Z〔1〕+ 36θ→Z[1]:IfEnd↓If Z〔1〕≥ 36θ:Then Z〔1〕- 36θ→Z[1]:IfEnd↓If Z〔2〕< θ:Then Z〔2〕+ 36θ→Z[2]:IfEnd↓If Z〔2〕≥ 36θ:Then Z〔2〕- 36θ→Z[2]:IfEnd↓FWJθ→I:θ→J↓Pol(H-G,W-Z) ↓J<θ⇒J+36θ→J↓J→FDOTLINEPol(H-X,W-Y):I→N↓Pol(G-H,Z-W):I→E ↓Pol(X-G,Y-Z):I→D↓(N+E+D)÷2→I↓√(I(I-N)(I-E)(I-D))→I ↓2I÷D→I ↓ZSPDIf A≤P-T+S+D:Then Prog＂QXCS＂:θ→K:IfEnd ↓FSPDIf K=-1:Then If Z〔1〕< Z〔2〕:Then If F≤Z〔1〕:Then Goto 1 :IfEnd:If F≥Z〔2〕:Then Goto 1 :IfEnd:Else If F≤Z〔1〕:Then F≥Z〔2〕:Then Goto 1 :IfEnd:IfEnd:IfEnd:IfEnd↓If K=1:Then If Z〔1〕> Z〔2〕:Then If F≥Z〔1〕:Then Goto 1 :IfEnd :If F≤Z〔2〕:Then Goto 1 :IfEnd:Else If F≥Z〔1〕:Then If F≤Z[2]:Then Goto 1 :IfEnd:IfEnd:IfEnd:IfEnd↓θ→A: Goto 2↓Lb1 1↓If O=θ:Then Prog＂FSYUAN＂:IfEnd↓If O=1:Then Prog＂FSHHQX＂:IfEnd↓1→A↓Lb1 2FSTJU-90K→Z[1]↓V-90K→Z[2]↓Prog＂JDTZ＂↓P-T→A↓-1→O↓Prog＂JDZB＂↓Prog＂FSPD＂↓If A=θ:Then Goto 1 :IfEnd↓（有改）Z[1]→Z[1]: Z[1]+K(L÷(2R))r→Z[2]:1→O↓Prog＂JDTZ＂↓Prog＂JDZB＂↓Prog＂FSPD＂↓If A=1:Then θ→K: Goto 2 :IfEnd↓Z[5]→X:Z[6]→Y:(KL)÷(6R)→F:L-L^3÷(90R2)→C:U+F r→J↓Prog＂XZBH＂↓U+3F r+90K→J:R→C↓Prog＂XZBH＂↓X→G:Y→Z↓Prog＂FWJ＂↓Z[2]→Z[1]:Z[1]+K((S-2L)÷R)r→Z[2]:θ→0↓Prog＂JDTZ＂↓Prog＂FSPD＂↓If A=1:Then θ→K:Goto 2:IfEnd↓-K→K:V+9θK→Z[1]:Z[1]+K(L÷(2R))r→Z[2]:1→O↓Prog＂JDTZ＂↓P-T+S→A↓Prog＂JDZB＂↓Prog＂FSPD＂↓If A=1:Then θ→K:Goto 2:IfEnd↓Lb1 1↓If D>θ:Then P-T+S→A:Prog＂FSLINE＂:If A=1:Then θ→K:IfEnd:IfEnd↓Lb1 2FSYUAN＂YUAN＂↓36θ+K(F-Z[1])→F ↓F≥36θ⇒F-36θ→F⊿↓P-T+L+πRF÷18θ→Z:If K=1:Then R-I→B: Else I-R→B:IfEnd↓FSHHQX＂HHQX＂↓Z[5]→X:Z[6]→Y ↓Z[1]+18θ→J:R→C↓Prog＂XZBH＂↓X→G:Y→Z↓Z[5]→X:Z[6]→Y ↓Prog＂DOTLINE＂↓If I<1:Then θ→B:Goto 3: Else I→B: Prog＂FSHHQX1＂:I→Z[7]:B+I÷10→B: Prog＂FSHHQX1＂:If I>Z[7] :Then Goto 1: Else:Goto 2:IfEnd:IfEnd↓Lb1 1↓B-I÷2→B: Prog＂FSHHQX1＂↓If I<1:Then -I→I:Goto 3: Else Goto 1:IfEnd↓Lb1 2↓B+I÷2→B: Prog＂FSHHQX1＂↓If I<1:Then Goto 3: Else Goto 2:IfEnd↓（有改）Lb1 3↓If A>P-T+L:Then P-T+S-B-I→Z: Else P-T+B+I→Z:IfEnd↓If K=1:Then If A<P-T+S-L:Then D-E→B: Else E-D→B:IfEnd:IfEnd ↓If K=-1:Then If A<P-T+S-L:Then E-D→B: Else D-E→B:IfEnd:IfEndFSHHQX1Z[5]→X:Z[6]→Y:Z[1]+9θK→J↓Prog＂HHQX＂↓X→Z[3]:Y→Z[4]↓R→C:J+2F r+9θK→J↓Prog＂XZBH＂↓X→G:Y→Z↓Z[3]→X:Z[4]→Y ↓Prog＂DOTLINE＂Prog＂QDZB＂↓Z[5]→Z[3]:Z[6]→Z[4] ↓If O=-1:Then P-T+S→A: Prog＂QDZB＂:Z[3]→Z[5]:Z[4]→Z[6]: Else Z[1]+9θK+K(L÷(6R))r→J:L-L^3÷(9θR2)→C: Prog＂XZBH＂:IfEnd ↓(Z[6]-Y+Xtan(Z[2])-Z[5]tan(Z[1]))÷(tan(Z[2])-tan(Z[1]))→G ↓tanZ[2](G-X)+Y→Z↓Prog＂FWJ＂ZFXZIf M=θ:Then Prog＂ZSPD＂: Else Prog＂FSTJ＂:IfEndFSLINEProg＂QDZB＂↓X→G:Y→Z:J→N↓Prog＂FWJ＂↓N→J:F-J→F↓Icos(F)→G↓If G≤D:Then If A>P-T+S-L:Then P-T+S+G→Z:Isin(F)→B:Else P-T-G→Z:-Isin(F)→B:IfEnd :1→A:2→O: Else θ→A:IfEndX+Ccos(J)→X↓Y+Csin(J)→YHENG POIf A≤P-T+L-Z[10] :Then Z[8]→V:Goto 1:IfEnd↓If A≤P-T+L:Then (Z[9]-Z[8])÷Z[10]→E:Z[8]+(A-P+T-L+Z[10])E→V: Goto 1:IfEnd↓If A≤P-T+S-L:Then Z[9]→V:Goto 1:IfEnd↓If A≤P-T+S-L+Z[10]:Then (Z[8]-Z[9])÷Z[10]→E:Z[9]+(A-P+T-S+L)E→V: Goto 1:IfEnd↓Z[8]→V ↓Lb1 1GAO CHENG……(交点桩号)→O:……(交点高程)→D:……(小桩号坡度)→N:……(切线长度)→G:……(圆曲线半径)→R ↓If A≤O-G:Then θ→K: Goto 1:IfEnd↓If A≤O+G:Then 1→K: Goto 1:IfEnd↓(K=0为直线、K=1为凸圆、K=-1为凹圆)……（同上）Lb1 1:Prog＂HENG PO＂↓K（A-O+G）2÷(2R)→P ↓D+N(A-O)-P+WV→F↓"DM":F◢FWJJS (测回法测坐标)A＂XA＂: B＂YA＂:C＂XB＂: D＂YB＂: K＂CHANG DU＂: G＂JIAO DU＂↓I=0:J=0:Pol(C-A,D-B):J<0⇒J=J+360⊿↓E=J+G↓J＂FWJ＂◢X＂X＂=A+KcosE◢Y＂Y＂=B+KsinE◢＂-------END-------＂说明:＂JIAO DU＂顺时钟为正、逆时针为负，＂XA＂、＂YA＂为测站点坐标、＂XB＂、＂YB＂为后视点坐标，＂X＂、＂Y＂为前视即待测点坐标，＂CHANG DU＂为测站点到待测点距离。
Fx-5800P可编程计算器在连通隧洞施工测量中的应用
１ 工程 概 况
我 国某地 连通 隧 洞 总长 ４６ ０ｍ， ６ 内径 ３ ６ｍ， ． 由直 线 和圆弧 线组 成 ， 平 面布 置详 见 图 １至 图 ３ 其 。 在 连通 隧洞施 工放 样 时 ， 大 量 的 测 量数 据 需 要 在 有 施工 现场 计算 ， 需要 掌 握 连 通 隧 洞施 工测 量 数 据 的 计算 方法 。
ｔ ｏ ｇ ｔａ ｄ ｓ ｅ ｉ ｃｐ ｏ ｅ ｕ ｅ ｆｐ ｅ ａｉ ｇ ｃ ｎ ｅ ｔ ｇ ｔ ｎ ｅ ｏ ａｉ ｇ ｐ ｏ ｒｍ ｅｔ ｉ ｌｃ ｙ ｕ ｉ — ｈ ｕ ｈ ｎ ｐ ｃｆ ｒ ｃ ｄ ｒ ｓｏ ｒ ｐ ｒｎ ｏ ｎ ｃｉ ｕ ｎ ｌ ｃ ｔ ｒ ｇ ａ ｉ ａｃ ｒａｎ ｐａ ｅｂ ｔｌ ｉ ｎ ｌ ｎ ｎ ｉ
李爱军
（ 圳 市深 水 水 务 咨 询 有 限 公 司 ， 东 深 圳 ５ ８ ０ ） 深 广 １０ ３
摘 要 ： 介绍 卡西 欧 ｆ－８ ０ ｘ５ ０ Ｐ可 编程计算器 的特点 ， 叙述利用卡西欧 ｆ－８０ ｘ５ ０ Ｐ可编程计算 器编制某 连通 隧洞施 工测
量放样程序 的思路和具体步骤 ； 出初 次使用 ｆ－８ ０ 指 ｘ５０ Ｐ可编程计算器应注意的事项 。 关键词 ： 编程计算器 ； －８ ０ 施工测量 ； ｆ ５０ Ｐ； ｘ 程序 中图分类号 ： ２ ８ Ｐ ５ 文献标 志码 ： Ｂ 文章编号 ：０ ６７ ４ （０ １ ０ —０ ００ １０ —９ ９ ２ １ ）４０ ７—４
换 计算 工具 。
ｆ－ ８ ０ ｘ ５ ０ Ｐ计 算器 是 ｆ－８ ０ ｘ４ ５ Ｐ的升级 产 品 ， 虽然
标 ， 就是 桩 号和边 距 。 也
收 稿 日期 ：０ ０１ —３ ２ １—２１ 作 者 简 介 ： 爱 军 （９ ５ ）男 ， 程 师 李 １７ 一 ， 工
CASIO5800计算器公路竖曲线全线高程计算程序-15页word资料
CASIO5800计算器公路竖曲线全线高程计算程序“SQXJSCX”↙Lb1 1↙CLs:Fix 3↙“K=”?k◢(计算点里程输入)If k<67549.755 AND K≥66894.3 :Then-0.00052→A : 0→B : 67394.3→S: 67.37→G : 600000→R : Goto 2 : IfEnd↙If k<68708.391 AND K≥67549.755 :Then-0.0048→A : -0.00052→B :68494.3→S :66.8→G : 100000→R : Goto 2 : IfEnd↙If k<本段竖曲线终点里程AND K≥前一竖曲线终点里程:Then -0.0048→前坡（大里程向）A : -0.00052→后坡（小里程向）B : 68494.3→竖曲线交点里程S :66.8→交点高程G : 100000→曲率半径R : Goto 2 : IfEnd↙………依次类推，计算原始数据完成输入，坡度换算成小数。
Lb1 2↙S-K→L ：A-B→W : Abs（R*W/2）→T : S-T→C : S+T→D ↙If K≤C : Then G-L*B →H : Goto 5 : Else If K≤S : Then Goto3 : Else If K≤D : Then Goto4 : IfEnd : IfEnd : IfEnd↙Lb1 3↙If W>0 : Then G+(C-K)^ 2/2/R-L*B→H: Goto 5 : Else If W<0 : Then G-(C-K)^2/2/R-L*B→H: Goto 5 : IfEnd : IfEnd↙Lb1 4↙If W>0 : Then G+(K-D) ^2/2/R-L*A→H: Goto 5 : Else If W<0 : Then G-(K-D)^2/2/R-L*A→H: Goto 5 : IfEnd : IfEnd↙1 5↙H-0.304→H↙(0.304为中心~路肩高差)“H=”：H◢Goto 1↙Norm 1:50→C:12345→J"RESET PW"?I:I=J=>500→DimZ为数据库增加额外变量500个，在SET、SETPFDYS程序根据实际再增减变量50→Z[C+22]"PASSWORDS"?I:I→Z[C+39]重设要素保护密码Cls:StopFileName:DATLOCK 要素保护密码确定认程序Cls:Norm 1:50→C"PASSWORDS"?J:Cls:J≠Z[C+39]=>Stop 2008-08-07修改FileName:SHELL(外壳程序)50→C;在扩充变量预留前50个给别的程序用。
CASIOfx-5800P编程计算器在建筑工程放样中的运用
CASIO fx-5800P编程计算器在建筑工程放样中的运用摘要：CASIO fx-5800P计算器的编程功能为施工放样提供了方便、快捷、灵活的计算方式。
仅仅需要两个控制点、任何一根轴线上的两个点坐标及图纸轴线的相对关系。
就能快速的完成作业关键词：CASIO fx-5800P；建筑工程；放样；程序一、概述自从全站仪出现以后，测绘行业得到了飞速的发展。
无论是测量精度还是工作效率都得到了很大的提高。
虽然全站仪采用极坐标法放样已经很方便了，但是灵活度还是不够。
施工现场随时有设备及材料的堆放，容易导致通视受限的影响。
此时选用自由设站加CASIO fx-5800P的程序的方法就可以提高工作效率、节约人力、物力。
笔者以三峡巴基斯坦第一风力发电站项目的实例说明CASIO fx-5800P编程计算器在建筑工程放样中的运用。
二、主要程序名称及编码1、坐标反算（FS）程序编码：Fix 4:“XA=”?→A:“YA=”?→B:Lbl 1：“XB=”?→C:“YB=”?→D:1.A→E:D-B→F:√(E²+F²)→S:Tan-1(F/E)→RI F E<0: THEN R+180→R:Goto 2:IFEND:F<0 R+360→R←Lbl 2：“S=”:S◢“R=”:R►DMS◢Goto 1程序运行说明：在全站仪设站的过程中需要用“坐标反算”程序校核平距及方位角，确定设站的准确性。
输入已知点A(XA,YA),B(XB,YB)坐标，计算出A至B的方位角及距离。
1.测边交会法计算测站坐标（CBJH）程序编码：Fix 4:“XA=”?→A:“YA=”?→B:“XB=”?→C:“YB=”?→D:“SA=”?→P:“SB=”?→Q:C-A→G:D-B→H:√(G²+H²)→I:(P²+I²-Q²)/2/I→E:√(P²-E²)→F:H/I→M:G/I→N“X=”:A+EN+FM◢“Y=”:B+EM-FN◢“END”程序运行说明：全站仪自由设站的过程中，若仪器无内置程序，则需要用“边角交会法计算测站坐标”程序计算出仪器站点坐标。
【2019年整理】幽灵版CASIO5800公路施工程序集使用说明
幽灵版CASIO5800公路施工程序集使用说明1．程序总序本程序采用交点法与线元法有机结合，能够灵活自如的根据自己的标段特点，想用交点法就用交点法，想用线元法就用线元法。
真正的实现随心所欲的数据编程，本程序默认线路为三条，第1,2条线路采用交点法，第3条线路采用线元法，使你可以同时计算三个工地的数据情况，还可以根据自己的喜好和要求，无限的加载线路条数。
2．程序详情主程序分3个分别为00ZZ,01ZZ,02ZZ,支持的功能如下：1.支持三维坐标正算输出。
2.支持三维反算输出3.高程输出，一次性显示左横坡，右横坡，纵坡和算点高程。
4.左右路基宽度一次性输出。
5.边坡放样支持挖方五级边坡及以上，填方三级边坡及以上。
6.定值路基放样填挖值。
7.极坐标计算距离方位角8.隧道放样可计算任何复杂隧道圆心，采用圆曲线和直线有机串列。
9.支持单交点正反算与单交点高程计算。
10.支持导线计算，可以平差闭合附和导线，无定向导线和支导线。
11.涵洞计算放样，一次数据输入，涵洞四角点自动输出。
12.桥梁平分中矢法。
可以计算斜交桥梁的构造物坐标。
13.支持桥梁斜交高程计算。
14.附带一款抓捕双色球的自动分析程序，丰富大家的工作之余生活。
15.附带多边形面积计算程序。
16.两点后方交会程序。
17.土方路基横断面放量计算。
18.导线水准高程平差。
19.水准测量计算小程序。
20.支持桩号步长叠加功能。
总之，程序功能非常强大，期待更多程序功能望各位测友自行发掘。
2．计算实例1. 选择00ZZ主程序EXE 进入界面1.选择1XYZ 按1（5s）进入EXECZX? 39477.185 EXECZY? 4944.518 EXEQX;X=1，X=2，RAMP=3? 2 EXEKP=>TEP? 20 EXEKM? 2500 EXED? 10 EXEEXEZFWJ=65º28’26”X=39495.848Y=4973.375H=15.513EXEAI=57.0624DI=34.366接下来选择线元法线路3算个例子如下：1.选择1XYZ 按1（5s）进入EXECZX? （测站X）570.703 EXECZY? （测站Y）4085.244 EXEQX;X=1，X=2，RAMP=3? 3 EXEKP=>TEP? 20 EXEKM? 130 EXED? ﹣10.75 EXEEXEZFWJ=56º23’46.16”X=625.064Y=4048.126H=40.385EXEAI=325.4027DI=65.824计算出该点的三维坐标X,Y,H,和极坐标放样数据AI为十进制小数模式(57度06分24秒)，DI为极坐标距离。
卡西欧5800公路坐标正反算程序
卡西欧5800公路坐标正反算程序卡西欧5800公路坐标正反算程序是一种用于测量和计算公路坐标的工具。
它基于卡西欧5800全站仪的技术和功能，能够准确地测量和计算公路的坐标信息。
下面我将详细介绍卡西欧5800公路坐标正反算程序的工作原理和使用方法。
一、工作原理：卡西欧5800全站仪是一种高精度的测量仪器，它能够通过测量角度和距离来确定地点的坐标。
在公路测量中，我们通常会在公路上设置一系列的控制点，然后使用全站仪测量这些控制点的坐标。
通过这些测量数据，我们可以计算出公路上其他点的坐标。
卡西欧5800公路坐标正反算程序基于这些测量数据，通过一系列的计算和算法，能够准确地计算出公路上其他点的坐标。
具体的计算方法包括正算和反算。
正算是指已知控制点的坐标，通过测量数据和算法计算出其他点的坐标。
反算是指已知某个点的坐标，通过测量数据和算法计算出该点在公路上的位置。
二、使用方法：1. 设置控制点：首先，在公路上选择一些具有代表性的控制点，并使用全站仪进行测量。
在测量过程中，需要确保全站仪的水平和垂直仪器准确，以获得准确的测量数据。
2. 导入测量数据：将测量数据导入卡西欧5800公路坐标正反算程序。
该程序通常会提供一个界面，用于导入和管理测量数据。
3. 正算：如果需要计算公路上其他点的坐标，可以选择正算功能。
在正算功能中，需要输入已知控制点的坐标和测量数据。
程序将根据这些数据进行计算，并给出其他点的坐标。
4. 反算：如果需要计算某个点在公路上的位置，可以选择反算功能。
在反算功能中，需要输入已知点的坐标和测量数据。
程序将根据这些数据进行计算，并给出该点在公路上的位置。
5. 结果输出：计算完成后，卡西欧5800公路坐标正反算程序将给出计算结果。
结果通常以表格或图形的形式呈现，以便用户查看和使用。
三、注意事项：1. 测量准确性：为了获得准确的测量结果，使用卡西欧5800全站仪时需要注意测量准确性。
在测量过程中，需要保持仪器的稳定和准确，并避免测量误差。
CASIOfx-5800P可编程计算器在控制测量中的应用
126云南水力发电YUNNAN WATER POWER第34卷第2期C A S I O f x-5800P可编程计算器在控制测量中的应用张逸仙(云南省红河州水利水电勘察设计研究院，云南蒙自661199)摘要：介绍CASIOfx-5800P可编程计算器在控制测量中附合导线的计算。
附合导线以CASIOfx-5800P计算附合导线的计算过程编成程序代码，可以简化其计算过程，提高工作效率。
通过实例操作证明该程序方法真正起到了快捷、高效、准确作用，即加快野外工作进度，又减少数据的误差。
关键词：附合导线；CASIOfx-5800P;近似平差；严密平差；程序代码中图分类号：TB22 文献标识码：B文章编号：1006_3951(2018)02_0126_03DOI：10.3969/j.issn.1006-3951.2018.02.032〇引言进入21世纪以来，我国水利工程建设进入了 前所未有的高潮时期。
在水利工程建设中必需大 量的水利工程测量，其中控制测量又是重点与难 点。
水利工程一般选址于深山沟壑之中，地形较 复杂且呈条带形状，故目前在水利工程测量中，导线测量是一种常见的控制测量方法[1]。
导线测 量由于只要求相邻导线点通视，布设灵活，特别适用于水利工程、铁路、公路之狭长形控制测；或补闭合导线及局部三角网之不足以及地形复杂的地区。
随着高精度全站仪的普及，导线测 量的应用将更为广泛。
卡西欧系列计算器的出现，使得导线测量的计算更加灵活、快捷和方 便。
将对卡西欧C A SIO fx-5800P可编程计算器快捷的计算方法进行分析与介绍[2]，着重介绍 C ASIO fx-5800P可编程计算器在控制测量中附i8n+i图1附合导线图合导线的计算。
目前在水利工程测量中，附合导线被广泛采 用。
由1高级控制点（如已知三角点或高等级的 导线点）出发，经过若干导线点，连接到另一高 级控制点，这样的导线称为附合导线[3’4]。
见图1所示：为单一附合导线的标准形式，这在实际控 制测量中经常用到。
卡西欧5800测量实用程序（含直线、圆曲线、大地转施工程序）
卡西欧5800测量实用程序（含直线、圆曲线、大地转施工程序）卡西欧5800测量实用程序(含直线、圆曲线、大地转施工程序)一、直线计算程序0→I:0→J:”X0”?D:”Y0”?E:”X1”?B:”Y1”?C:Pol(B-D,C-E):J →A:If A<0:Then A+360→A:Else A→A:IfEnd:Lbl 0:?O:?S:If O≠0:Then Goto 1:IfEnd:D+Scos(A) →X:”X=”:X ◢E+Ssin(A) →Y:”Y=”:Y ◢Goto 0:Lbl 1:D+Scos(A)+Ocos(A+90) →X:”X=”:X ◢E+Ssin(A)+Osin(A+90) →Y:”Y=”:Y ◢Goto 0说明：输入程序时注意区别字母O 与数字0程序运行时符号说明X0? Y0? 分别输入直线起点的XY 坐标值X1? Y1? 分别输入直线终点的XY 坐标值O? 输入边桩与中桩的距离( 左边桩为负值, 右边桩为正值), 如计算中桩坐标输入0S? 输入所求点到直线起点的距离二、圆曲线计算程序0→I:0→J: ”X0”?C:”Y0”?D:”X1”?E:”Y1”?F:?R:”L:-1 R:1”?N:”ZY”?W:Lbl 0:”LN”?T:T-W→O:Pol(E-C,F-D):I→S:J→A: If A<0:Then A+360→A:Else A →A:IfEnd:sin-1(S÷(2R)) →K:2∏RK÷180→L:180O÷(2∏R) →G:(2R)sin(G) →H:C+Hcos(A-KN+GN) →X:”X=”:X ◢D+Hsin(A-KN+GN) →Y:”Y=”:Y ◢R-0.5√(4R2-H2) →Q:”Q=”:Q ◢“S=”?V:If V=0:Then Goto 0:IfEnd:”L:-90 R:90”?U:X+Vcos(A-KN+2GN+U) →X:”X=”:X ◢Y+Vsin(A-KN+2GN+U) →Y:”Y=”:Y ◢Goto 0说明：输入程序时注意区别字母O 与数字0程序运行时符号说明X0? Y0? 分别输入直线起点的XY 坐标值X1? Y1? 分别输入直线终点的XY 坐标值R? 输入圆曲线半径L:-1 R:1? 圆曲线向左转弯时输入-1, 向右转弯时输入1ZY? 输入起点桩号LN? 输入所求点桩号( 按下exe 键后显示中桩坐标)S? 输入所要求的边桩与中桩的距离L:-90 R:90 要求左边边桩输入-90, 右边边桩输入90( 按下exe 键后显示边桩坐标)三、大地转施工“QK=”？Z:“QX=”？A:“QY=”?B:“ZX=”？O :“ZY=”？Q ↙Pol( O -A,Q-B) ↙J<0=>J+360→J ↙J>360=>J-360→J ↙J→F:“JF=”：F ◆DMS ◢Lb1 0 ↙X:?Y ↙Pol （X-A,Y-B):I→D ↙J<0=>J+360→J ↙J>360=>J-360→J ↙J-F→T:T→G ↙T<0=>T+360→G ↙T>360=>T-360→G ↙Z+Dcos （G)→K:“K=”：K ◢Dsin （G)→C:“C=”：C ◢GoTo 0 ↙说明：QK-- 输入线路起始点里程QX-- 输入线路起始点中桩X 坐标QY-- 输入线路起始点中桩Y 坐标ZX-- 输入线路前进方向中桩X 坐标ZY-- 输入线路前进方向中桩Y 坐标JF=-- 显示线路测量坐标方位角X-- 输入线路附近任意点测量X 坐标Y-- 输入线路附近任意点测量Y 坐标K-- 显示计算结果：里程桩号，即工程X 坐标C-- 显示计算结果：左右偏距，即工程Y 坐标, 中桩=0 ，左偏= 负值，右偏= 正值。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
可编程计算器卡西欧CASIO fx-5800p 在高等级公路测量上的应用 吴建辉 （东盟营造工程有限公司 西安市 710075）
摘 要；本文用复化辛普森公式导出的计算坐标的通用公式，利用CASIO fx-5800p计算器编程计算中、边桩坐标。 关键词：复化辛普森公式 CASIOfx-5800p计算器 编程计算坐标
1 前言 2008年4月，卡西欧公司宣布工程编程计算器CASIO fx-4800p和CASIO fx -4850p全部停产,目前市场上只有CASIO fx-5800p一款工程编程计算器有售，如何快速的学会使用CASIO fx-5800p编程计算坐标，是广大测量工作者面临的实际问题。 2 程序编制的思路 为便于测量工作者使用fx-5800p计算器，卡西欧公司在购买计算器的同时免费赠送了随机程序，包括坐标的计算以及高程的计算等，其中“CAS58-5-1”为缓和曲线坐标计算程序；“CAS58-5-2”为圆曲线坐标计算程序；“CAS58-5-3”为直线坐标计算程序。 上述三个程序计算坐标时，先按模式“MODE 4”进入双变量统计“REG”输入界面，输入要计算的线形起点桩号、起点坐标、终点桩号、终点坐标，再按“MODE 1”退回开机界面，如果计算的线形是直线，按“FILE” 键选择进入程序“CAS58-5-3”输入求点桩号进行计算；如果计算的线形是圆曲线，按“FILE”键选择进入程序“CAS58-5-2”输入圆曲线半径、起点方位角、终点方位角，输入求点桩号进行计算；如果计算的线形是缓和曲线，按“FILE”键选择进入程序“CAS58-5-1”输入起点半径、终点半径、缓和曲线参数A、起点方位角、终点方位角，输入求点桩号进行计算。 从以上可以看出上述三个程序功能全面，但是操作复杂，每次计算必须输入线形要素才能计算，本文在复化辛普森公式的基础上，进行了适当的优化，结合CASIO fx-5800p的程序命令，编制出适合于全线坐标计算的程序。 3 程序特点： 该程序只需一次建立数据库， 即可计算数据库范围内任意中桩、边桩坐标。 程序适用于直线、圆曲线、缓和曲线等公路工程上常见的平面线形,均能在同一个程序内计算。 4 程序实例 现以宁波象山港公路大桥及接线工程第12合同段主线K44+461.497至K46+594.856段为例，要求计算K44+500、K45+000、K45+500、K46+000、K46+500中桩及左右各13米的边桩坐标。 设计图纸提供线形要素如下： YZ点: K44+461.497 （直线） X=3264653.413 Y=498181.214 计算方位角210°09′15″ ZH点：K45+564.277 （前缓和曲线） X=3263699.863 Y=497627.258 计算方位角210°09′15″ 缓和曲线参数 678.233 缓和曲线长度Ls1= 230(米) HY点：K45+794.277（圆曲线） X=3263699.863 Y=497627.258 圆曲线半径左偏R=-2000 圆曲线长度Ly=570.579米 YH点：K46+364.856（后缓和曲线） X=3262960.169 Y=497333.382 缓和曲线参数 678.233 缓和曲线长度Ls2= 230(米) HZ点：K46+594.856（直线） X=3262960.169 Y=497333.382计算方位角187°13′09″ 设计图纸没有提供HY点、YH点的计算方位角，根据图纸提供的要素计算这两点的坐标计算方位角， HY点：K45+794.277 计算方位角等于 210°09′15″+90* Ls12/∏/R/ Ls1 = 210°09′15″+90*2302/∏/（-2000）/230 = 206°51′34.77″ YH点：K46+364.856 计算方位角等于 206°51′34.77″+180* Ly/ ∏/R = 206°51′34.77″+180* 570.579/ ∏/(-2000) = 190°30′49.59″ 用CASIO fx-5800p计算器编程 操作步骤如下： 按“AC\ON”键 开机 按“MODE” 键 进入模式选择 再按“5” 键 进入程序编辑 再按“1” 键 进入新建程序 按“SHIFT”再按“ALPHA”键 进入大写字母锁定 按Z、B、J、S键 输入程序名 ZBJS(坐标计算) 按“EXE” 再按“1” 键 进入程序内容编辑界面 输入如下： Lb1 1↙ Fix 3↙ ？K↙ If K＜44461.497：Then “Stop” ▲IfEnd↙ If K≧44461.497 And K＜45564.277:Then 44461.497→A：45564.277→B:3264653.413→M:498181.214→N:210°09′15″→F: 0→D:0→E:Goto 2:IfEnd↙ If K≧45564.277 And K＜45794.277:Then 45564.277→A：45794.277→B:3263699.863→M:497627.258→N:210°09′15″→F: 0→D:1/(-2000)→E:Goto 2:IfEnd↙ If K≧45794.277 And K＜46364.856:Then 45794.277→A：46364.856→B:3263498.839→M:497515.572→N: 206°51′34.77″→F: 1/(-2000)→D: 1/(-2000)→E:Goto 2:IfEnd↙ If K≧46364.856 And K＜46594.856:Then 46364.856→A：46594.856→B:3262960.169→M:497333.382→N: 190°30′49.59″→F: 1/(-2000)→D:0→E:Goto 2:IfEnd↙ If K＞46594.856: Then “Stop” ▲IfEnd↙ Lb1 2↙ (E－D)/(Abs(B－A))→P ↙ Abs(K－A)→Q ↙ P×Q→I↙ F+(I+2D)Q×90/π→J↙ F+(I/4+2D)Q×45/(2π) →G↙ F+(3I/4+2D)Q×135/(2π) →H↙ F+(I/2+2D)Q×45/π→S↙ “X=” ↙ M+Q/12×(cos（F）+4(cos（G）+cos（H）)+2cos（S）+cos（J）) →X▲ “Y=” ↙ N+Q/12×(sin（F）+4(sin（G）+sin（H）)+2sin（S）+sin（J）) →Y▲ ？W:？L:？R↙ “ZX=” ↙ X+Lcos(J-180+W) →Z▲ “ZY=” ↙ Y+Lsin(J-180+W) →C▲ “YX=” ↙ X+Rcos(J+W) →U▲ “YY=” ↙ Y+Rsin(J+W) →V▲ Goto 1↙ 程序输入完成，按“MODE 1”退回开机界面。 5 程序中使用CASIO fx-5800p的编程命令说明 Lb1 n 转移开始语句 Goto n 指定跳转到Lb1 n，程序将处理从下一行开始的命令 Fix 3 锁定3位小数 ？ 变数 => 推出 “Stop” 程序停止 （注意要带引号） And 和 If -Then-IfEnd 如果—-则有---语句结束 → 赋值 表达式→变量 : 间隔，并列 ▲ 输出显示 sin（）、cos（） CASIO fx-5800p的所有函数均为带括号函数 ↙ 回车 为便于理解，上述命令部分解释没有同CASIO fx-5800p说明书上完全一致， 准确的命令解释请参照CASIO fx-5800p说明书。 6 程序中字母含义说明 A 起点桩号 B 终点桩号 M 起点X坐标 N 起点Y坐标 F 起点的计算方位角 D 起点曲率（等于1除以半径，直线半径无穷大，曲率用0表示） E 终点曲率 K 求点桩号 “X=” 求点桩号的中桩X坐标 “Y=” 求点桩号的中桩Y坐标 W 右偏角（正交为90） L 左边桩距中距离 R 右边桩距中距离 “ZX=” 求点左边桩X坐标 “ZY=” 求点左边桩Y坐标 “YX=” 求点右边桩X坐标 “YY=” 求点右边桩Y坐标 7 计算过程演示如下： 按“AC\ON”键 开机 按“FILE”键 进入程序文件列表 按上下光标键 找到“ZBJS” 按“EXE”键 屏幕显示 K？ 输入求点桩号44500 屏幕显示 44500 按“EXE”键两次 屏幕显示 求点的中桩坐标X、Y分别为： X= 3264620.120 Y= 498161.873 按“EXE’键 屏幕显示 W? 输入右偏角 90 屏幕显示 90 按“EXE’键 屏幕显示 L? 输入左边桩距离13 屏幕显示 13 按“EXE’键 屏幕显示 R? 输入右边桩距离13 屏幕显示 13 按“EXE”键两次 屏幕显示 求点左边桩X、Y的坐标分别为： ZX= 3264613.590
ZY= 498173.114 按“EXE”键两次 屏幕显示 求点右边桩X、Y的坐标分别为 YX= 3264626.651 YY= 498150.632 按“EXE”键 屏幕显示 K？ 重复以上步骤，可以计算出其余求点的坐标，见表1。
表1
桩号 中桩 左边桩13米 右边桩13米 X(m) Y(m) X(m) Y(m) X(m) Y(m) K44+500 3264620.120 498161.873 3264613.590 498173.114 3264626.651 498150.632 K45+000 3264187.782 497910.709 3264181.252 497921.949 3264194.312 497899.468 K45+500 3263755.443 497659.544 3263748.913 497670.785 3263761.974 497648.304 K46+000 3263310.858 497432.219 3263306.206 497444.359 3263315.509 497420.080 K46+500 3262826.686 497312.343 3262824.926 497325.223 3262828.446 497299.462 8 结语 利用上例验算的计算结果可以说明，该程序对于直线、圆曲线、缓和曲线的坐标计算均实用，在全站仪测量放样中用CASIO fx-5800p计算器编程后，只需输入求点的桩号、距离就可以计算放样坐标，可以提高广大测量工作者的工作效率。
参 考 文 献 1 李孟山，李少元，计算公路匝道点位坐标的复化辛普森公式，测绘通报，2000 2 覃辉，CASIO fx-5800p与CASIO fx-4800p/CASIO fx-4850p程序语言的对比及特点说明 3 卡西欧CASIO fx-5800p计算器说明书