最新5800公路测量程序使用说明汇总
卡西欧5800基本测量程序(完整版)
卡西欧5800 程序(完整版)说明:本程序适用于公路、桥梁、隧道测量。
本程序简单、方便、快捷、拓展功能宽,使用时只需按曲线要素表输入一次就可以计算整条线路(包括高程、超高段横坡),能正、反算,在已知坐标下可以反算出该点桩号及相对宽度,拓展功能有,放边、仰坡、隧道断面测量、开挖轮廓线等。
主程序:MAIN"ZH(θ) F(1)"?M↓ (0为正算、1为反算)If M=θ:Then "ZHUANG HAO"?A:"KUAN DU"?W:Else"X="?H:"Y="?W:"Z="?Q: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→M: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"为测站点到待测点距离。
5800road
5800公路测量程序使用说明一、程序使用流程本程序数据和主程序是分开的,编程时将不同的工程数据存放到不同的数据文件里,如A匝道,文件名为A,将匝道A所有的曲线线元参数输入A文件里。
运行时只要运行文件名A的程序就可以了,具体运行流程见下图:二、数据文件的编写(一)交点法数据文件编辑交点法编写数据文件必须是对称型的,即直线段→缓和曲线段→圆曲线段→缓和曲线段→直线段,(如果任意一端没有直线段,则把直线段长度看做是0),另外圆曲线两侧缓和曲线的旋转常数必须相等,并且和直线段连接处的半径必须是无穷大。
交点法数据文件编写一般是根据设计图纸提供的平面曲线参数一览表提供的参数来编写,每个弯道包括:弯道起点方位角(C),交点X坐标(D),交点Y坐标(E),缓和曲线长度(F,当没有设缓和曲线时,F=0),交点转交(G,向左转弯,G为负值,向右转弯,G取正值),交点桩号(H),弯道圆曲线半径(R)。
下图是一段市政道路设计参数数据。
根据上图提供的数据,可以编辑成如下的数据文件:文件名:CHLNR3→DimZ “X0”?A:”Y0”?B:“Ln”?L:Abs(L)-Int(Abs(1000L))/1000→Z[3]:Lbl 0:If Z[3]≠0.0001: Then ?L: Else “Xp”?X:”Yp”?Y:X→Z[1]:Y →Z[2]:IfEnd:Lbl 1:If L>0 :Then 98°39°35.12°→C:4474.384→D:2 415.861→E:140→F:31°17°23°→G:410.007→H:600→R:IfEnd: If L> 1060 Then 129°56°58.19°→C:4206.421→D:3093.946→E:70→F:-33°5 0°48°→G:1285.437→H:600→R:IfEnd:Prog”XLJS”:If Z[3]≠0.0001:T hen Goto 0:Else (Z[1]-X)cos(O)+(Z[2]-Y)sin(O)→N:L+N→L:-(Z [1]-X)sin(O)+(Z[2]-Y)cos(O)→K:If Abs(N)≥0.001:Then Goto 1:E lse “L=“:L◢“K=”:K◢IfEnd:Goto 0: IfEnd在面程式中,有两个条件转移语句即If L>0:Then 98°39°35.12°→C:4774.384→D: 2415.861→E:140→F:31°17°23°→G:410.007→H:600→R:IfEnd If L>1060:Then 129°56°58.19°→C:4406.421→D: 3093.946→E:70→F:-33°50°48°→G:1285.437→H:600→R:IfEnd……如果还有其他弯道,可以继续完后加。
CASIO fx—5800计算器 工程测量与公路测量程序
CASIO fx—5800计算器工程测量与公路测量程序1、坐标正算〝X0=〞?X:〝Y0=〞?Y:〝I=〞?I:〝J=〞?JX+ICos(J)→U:Y+ISin(J)→V〝X=〞:U (待求点的X坐标)〝Y=〞:V (待求点的Y坐标)说明:X0 Y0:已知点坐标I:两点的距离J:方位角2、坐标反算Lbl 0〝X1=〞?X:〝Y1=〞?Y:〝X2=〞?U:〝Y2=〞?VPol(U-X,V-Y):J<0 J+360→J〝I=〞:I〝J=〞:J DMSGOTO 0说明:X1Y1:第一点的坐标,X2Y2第二点的坐标,I:两点的距离,J:方位角3、圆曲线〝X0=〞?X: 〝Y0=〞?Y:〝FWJ=〞?D:〝QDHAO=〞?G: 〝ZDHAO=〞?C: 〝R=〞?R Lbl 1〝DQHAO=〞?LL<G Or L﹥C GOTO 2〝PY=〞?K180(L-G)÷(πR) →E2RSin(0.5E) →FReC(Abs(F),D+0.5E):Cls〝X=〞:X+I+KCos(D+E+90) →A〝Y=〞:Y+J+KSin(D+E+90) →BD+E→o:o<0 360+o→0o〝FWJ=〞:o DMSGoto 1Lbl 2〝END〞说明:X0Y0:起始点的坐标,FWJ:起始点的方位角,QDHAO:起点里程,ZDHAO 终点里程,R:半径,DQHAO:待求点里程,PY:偏移量4、竖曲线〝QZHAO =〞?J: 〝H+B〞=?B:〝I1=〞?C:〝I2=〞?D:〝R=〞?R:〝T=〞?T: ((D-C)÷100) ÷Abs((D-C) ÷100)→A:Abs(0.5R(D-C) ÷100)→S〝T〞:SJ-T→XJ+T→YLbl 0〝DQ=〞?LIf L<X:Then Goto 1:Else If L﹥Y:Then Goto 1:If End:If End〝GC=〞:B+C(L-J) ÷100+A(L-J+T) ÷(2R) →HGoto 0Lbl 1〝END〞说明:QZHAO:曲中点里程,H+B:曲中点高程,I1:第一坡度,I2:第二坡度,R:半径,T:切线长,DQ:待求点里程。
5800RTK简明操作手册
第一部分RTK操作流程第一步:内业准备。
一、新建任务二、键入已知点第二步:基准站的连接、启动一、基准站的连接二、基准站的配置三、基准站的启动第三步:移动站的连接一、移动站的连接二、移动站的配置第四步:点校正第五步:测量或放样第二部分动态数据处理RTK野外数据采集存储在手薄里面,内业处理时只需把手薄的文件传输到计算机。
手薄文件传输到计算机后,是*.dc文件格式,导入计算机时应该选择导入*.dc 文件格式。
由于RTK野外采集时已经解算出点的坐标,计算机处理时只需导入此*.dc 文件格式。
选择你需要的导出格式就可以,不需要进行基线解算和网平差。
如果自定义项目中没有你需要的数据格式,参考下面的操作流程,自定义导出数据格式。
RTK数据处理流程如下:↓↓↓7.1如何新建自定义数据格式:7.1.1:TGO软件中选择你要导出的全部点(Ctrl+A)。
7.1.2 选择‘导出’菜单。
如果CAD或GIS方面的数据格式,可以直接选择*.dwg或*.dxf格式,点击右边‘选项’,选择CAD的版本。
如果不是CAD或GIS方面的数据格式,则选择‘自定义’格式。
如下图:这里有一些设计好的输出格式,你可以对现有的选项进行编辑,还可以新建你需要的数据格式。
例如你现在使用的是南方测绘Cass5.0成图软件,而Cass5.0读入点的位置信息是以以下排列的*.dat文件。
(点名称,代码,东坐标,北坐标,高程),其中,如果外业没有加入代码,也必须留下代码的位置。
点击‘新建格式’,弹出以下对话框。
‘名称’用户可以自定义,‘空字串’、‘描述’可以空着!缺省扩展名(X):dat。
(此处如果你想要电子表格形式,则填写:CSV。
此形式是以逗号隔开的电子表格形式。
如果你需要纯文本形式,则填写:txt)。
‘格式标题’、‘格式注脚’均可以空白。
在‘格式体’内填写:点名称,代码,东坐标,北坐标,高程具体做法是:1.光标移至‘格式体’区。
2.点击右键→域→名称→要素代码→东坐标→北坐标→高程注意:各要素间用逗号隔开。
卡西欧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 ,左偏= 负值,右偏= 正值。
5800使用程序说明
Fx-5800程序使用说明本程序为本人自编含正反算、高程、超高、加宽及水准测量一体;可进行路基填挖坡角、高程放样;还可以换算路面各种结构成进行放样。
特别是反算可以对任意点进行反算坐标、高程并计算得出坡角,在实际应用中(1人看全站仪,1人拿棱镜,1人打桩)速度达可以让拿棱镜和打桩人员跑起来工作)。
其实有了本程序,测量是一件很轻松的工作,如果你还在用传统的程序测量方法,还在为计算标高、换算坡角等天天晚上加班计算后第二天还要移桩,真应该认真看看本程序,它可以让你的测量速度快最少一至两倍以上。
一份好的程序必须结合设计施工图进行编程可以让测量达到最快速度,如果有谁想要代编程序请联系:QQ:9286330;以下为某二级公路放样程序使用说明:一、运行A—XY程序:1、 X1?………………….输入测站点X位标;2、 Y1?………………….输入测站点Y位标;3、 X2?………………….输入后视点X位标;4、 Y2?………………….输入后视点Y位标;5、 Z2?………………….(1)输入测站点Z位标;或(2)输入后视点Z位标6、A=…………………….显示全站仪对后视的方位角(此时可将全站仪转到5800上显示的方位角并固定好水平位置,按仪器锁定方位角,然后将仪器对准后视点(为了保证更好精度,对准棱镜杆与后视控制点交叉处也可),放开锁定方位角即可进行测量)7、S=…………………….显示全站仪与后视点水平距离;8、 HS?………………….输入高差:(1)、若Z2?时输入测站点Z,则输入数据0;(2)、若Z2?时输入后视点Z,则输入全站仪对后视的高差数据;9、 LJG?……………….. 输入仪器高或棱镜高:(1)、若Z2?时输入测站点Z,则输入仪器仪高;(2)、若Z2?时输入后视点Z,则输入棱镜高;注意:5、8、9三步的关联,否则实测高程计算不对10、 LM?…………………输入路线号(如有匝道等多条线路时选择数据,若只有一条路则按“EXE”进入下一步,即选默认路线)11、 K?…………………输入预测点大概桩号(如测站测K25+200~K25+800,则可输入其桩号之间的数,如K25+300即输入25300即可,此桩号仅用于当数据多时加快后面的计算器运行速度)二、运行A—FY程序(当运行A—XY程序时自动运行,若不换测站点时才能直接运行本程序,即不用输入第一步数据,但换站时必需运行A—XY程序)(一)、正算放样(即根据已知桩号和边桩距离放样)1、 KX1:AK2:XK3:XY4:SP5:Stop6?…..输入进行测量的方法(输入:1)2、Q?………………….输入测量边桩与路线夹角(默认为90度);3、K?………………….输入放样点桩号;4、B?………………….输入放样点(左、右边桩)距中线距离(左边桩为负数,右边桩为正数,中桩为“0”);5、A=…………………….显示全站仪与放样点的方位角(此时可将全站仪转到5800上显示的方位角进行对放样点方向);6、S=…………………….显示全站仪与放样点水平距离HD;7、CS?………………….输入放样点与测站点的高差VD;8、LJG?………...…….. 输入放样点的棱镜高;9、PQ B=…………… ...显示实测点根据高程计算后需向路内(或外)移动“水平”距离(注:向中线为负值,向路外侧为正值,若为原地面放样还应按此值估算因地面坡度增加的水平距离进行加减);若需移位大应按第13步重测放出真正的填(挖)坡角;10、显示:a、填方:T=(放样点至路床顶填土高度)、T0=(放样点至路面填土高度)、SC B=(按测点高程计算出的距中边距B,左边桩为负数,右边桩为正数);b、挖方:W=(放样点至路床顶挖土深度)、W0=(放样点至路面挖土深度)、SC B=(按测点高程计算出的距中理论边距B,即坡角边距);11、显示:实测点X、Y坐标;12、显示:H=(实测点高程)、H0=(设计高程)(中桩为中线高程,边桩为路肩设计高程)、JK=(设计加宽值)13、重复反回第1步进行重新放样;(若对同一桩号按第9步数据计算需移位较大时,必需对同一桩号按数据移位后重测复核至找到坡角为此,一般重测一次即可)(注:重测复核时,在输入B值时会显示出SC B=(按刚测完点移位后的理论宽度)方便输入预测点B值,若地面不平就用SC B值加(减)上地面坡度造成的水平距离增加)(二)、反算放样一:(即根据在任意点先测出方位角、距离、高差反算出:路线桩号及填、挖土边桩坡角进行放样)1、 KX1:AK2:XK3:XY4:SP5:Stop6?…..输入进行测量的方法(输入:2)2、Q?………………….输入测量边桩与路线夹角(默认为90度);3、A3?…………………输入全站仪与放样点的方位角(即全站仪上方位角读数);4、S3?………………….输入全站仪与放样点水平距离HD;5、CS?………………….输入放样点与测站点的高差VD;7、LJG?………...…….. 输入放样点的棱镜高;8、PQ B=…………… ...显示实测点根据高程计算后需向路内(或外)移动“水平”距离(注:向中线为负值,向路外侧为正值,若为原地面放样还应按此值估算因地面坡度增加的水平距离进行加减);若需移位大应按第3步重测放出真正的填(挖)坡角;9、显示:K=…………….显示放样点桩号;B=…………….显示放样点(左、右边桩)距中线距离(左边桩为负数,右边桩为正数,中桩为“0”);10、显示:a、填方:T=(放样点至路床顶填土高度)、T0=(放样点至路面填土高度)、SC B=(按测点高程计算出的距中边距B,左边桩为负数,右边桩为正数);b、挖方:W=(放样点至路床顶挖土深度)、W0=(放样点至路面挖土深度)、SC B=(按测点高程计算出的距中理论边距B,即坡角边距);11、显示:实测点X、Y坐标;12、显示:H=(实测点高程)、H0=(设计高程)(中桩为中线高程,边桩为路肩设计高程)、JK=(设计加宽值)13、重复反回第1步进行重新放样;(若对同一桩号按第8步数据计算需移位较大时,必需对同一桩号按数据移位后重测复核至找到坡角为此,一般重测一次即可)(注:重测复核时,在输入B值时会显示出SC B=(按刚测完点移位后的理论宽度)方便输入预测点B值,若地面不平就用SC B值加(减)上地面坡度造成的水平距离增加)(三)、反算放样二:(即根据在任意点先测出XY坐标、高差反算出:路线桩号及填、挖土边桩坡角进行放样)1、 KX1:AK2:XK3:XY4:SP5:Stop6?…..输入进行测量的方法(输入:3)2、Q?………………….输入测量边桩与路线夹角(默认为90度);3、X3?…………………输入全站仪上X坐标;;4、Y3?………………...输入全站仪上Y坐标;5~13步说明与(二)相同:(四)、已知设计坐标进行放样(如桥梁已知坐标放样等):1、KX1:AK2:XK3:XY4:SP5:Stop6?…..输入进行测量的方法(输入:4)2、使用说明与第(三)条只差在多显示方位角A、距离S进行放样,其它计算数据仅作参考对照用。
卡西欧5800测量坐标计算程序
一.使用说明:1.规定:(1)以道路中线的前进方向区分线路的左右偏转方向,线路左偏Q=-1,线路右偏Q=1,直线Q=0。
(2)当所求点位于线路中线时,Z=0;当位于左侧时,Z取负值;当位于右侧时,Z取正值。
(3)当线元为直线时,其起终点的曲率半径为无穷大,取10的45次方代替。
(4)当线元为圆曲线时,起终点曲率半径为圆曲线半径。
(5)当线元为缓和曲线时,起终点曲率半径与直线相接取10的45次方代替,与圆曲线相接取圆曲线半径。
2.输入与显示说明:(1)输入部分:N?:选择计算方式,输入1表示由里程边距计算坐标,输入2表示由坐标计算里程边距。
X0?线元起点X坐标。
Y0?线元起点Y坐标。
S0?线元起点里程。
F0?线元起点切线方位角。
LS?线元长度。
R0?线元起点曲率半径。
RN?线元终点曲率半径。
Q?线元左右偏标志(左偏=-1,右偏=1,直线=0)S?正算时所求点里程。
Z?正算时所求点距中线边距。
位于线路左侧输入负值,在右侧输入正值。
AR?斜交角度。
(为线路右角,在0-180度之间)X?反算时所求点X坐标。
Y?反算时所求点Y坐标。
(2)显示部分:XS=计算结果,所求点X坐标。
YS=计算结果,所求点Y坐标。
FS=计算结果,所求点切线方位角。
S=计算结果,反算时所求点里程Z=计算结果,反算时所求点边距。
二.程序清单1(用于任意曲线元的坐标计算)1.主程序(TYQXJS)″1.SZ=>XY″:″2.XY=>SZ″:?N:″X0″?U:″Y0″?V:″S0″?O: ″F0″?G:″LS″?H:″R0″?P:″RN″?R:?Q:1÷P→C:(P-R) ÷(2HPR) →D:180÷π→E:If N=1: THEN Goto 1:Else Goto 2:IfEnd:Lbl 1:?S:”D(Z-,Y+)=”?Z:90→T:”O=”?T:Abs(S-O) →W:Prog ″SUB1″:″XS″:X◢″YS″:Y◢″FS″:F◢Goto 1:Lbl 2:?X:?Y:I→X:J→Y:Prog ″SUB2″:″S″:O+W→S:◢″Z″:Z◢Goto 22.正算子程序(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(C+WD) →F:X+Zcos(F+T) →X:Y+Zsin(F+T) →Y3.反算子程序(SUB2)G-90→T:Abs((Y-V)cos(T)-(X-U)sin(T)) →W:0→Z:Lbl 0:Prog ″SUB1″:T+QEW(C+WD) →L:(J-Y)cos(L)-(I-X)sin(L)→Z:IF Abs(Z)<1E-6 :Then Goto 1:Else W+Z→W:Goto 0 : IfEnd:Lbl 1:0→Z:Prog ″SUB1″:(J-Y)÷sin(F)→Z 三.用于提前将曲线元要素输入子程序,计算时只输入里程桩号与边距。
CASIO 5800道路坐标计算器程序
CASIO 5800计算器程序一、程序功能:本程序由一个主程序(AK)及两个子程序:坐标正算程序(SUB1)、坐标反算程序(SUB2)平曲线数据库(PQX)构成,可以根据曲线段的组成部分:直线、圆曲线、缓和曲线(完整或非完整型)的线元要素(起点坐标、止点坐标、起点切线方位角、线元长度、起点曲率半径、止点曲率半径、里程、边距或坐标),对该曲线段范围内任意里程中边桩坐标进行正反算。
二、源程序:1、主程序(AK)A排在前面,方便运行程序,不用往下翻页了。
Deg:“0→ZX,1→A,2→B”?Z :“1→JDF,2→XYF”?E:“X(CZ)”?A:“Y”?B 说明:设置角度模式,选择线路0为主线,1为A匝道。
可以自己再增加。
选择计算方法,交点法还是线元法计算坐标,1为交点法,2为线元法。
输入测站坐标,如不需要计算极坐标,即放样的时候需要输入坐标到仪器里面去,则X(CZ)输0,Y不用管可以为任何值,建议把测站坐标输进去,省了放一个点输一次坐标数据到仪器里面去。
只有一条线路可以不需要黄色部分。
“1.Ki→XY,2.XY→Ki”?N:Lbl 0:“Ki”?K:Prog“PQX”IfE=1:Then Prog“JD”:IfEndN=1=>Goto 1:N=2=>Goto 2Lbl 1?LK-O→W:Prog“SUB1”说明:1为正算,即知道桩号和偏距(注意只能计算边桩,不能计算斜交的点,构造物可以通过后面的ZHIXIAN程序计算),2为反算,即知道坐标,求桩号和偏距。
Ki为桩号,正算直接输,反算需要输入附近桩号,第一次计算最好输好桩号之后,把反算出来的桩号再输进去,重新反算下,如果和第一次反算的桩号一样,那就说明反算的桩号正确。
调用平曲线数据库,输入偏距L(偏距左输负数,右输正数),如果选择的是交点法计算,那需要输入是数据库是交点数据,调用正算子程序SUB1。
If A≠0:Then Pol(X-A,Y-B):“JULI=”:I◢J<0=>J+360→J:“FWJ=”:J ▶DMS◢Else “Xi=”:X◢“Yi=”:Y◢“FWJ=”:F ▶DMS◢If End :Goto0说明:正算,如果前面X(CZ)输0,则直接显示X、Y坐标和方位角,否则显示仪器到放样点的距离和方位角。
工程测量5800计算器教程
程序名:2GC LbI 0:Norm 2 “KM”?Z:?D:
Prog”H”:Fix 3:” H=”:Locate 6,4,H◢ “I=”: Locate 6,4,I◢ Goto 0
3.主程序3:极坐放样计算程序 (计算放样点至置仪点方位角及距离)
程序名:3JS X:Y:
1268.123→K(置仪点 X 坐标) 2243.545→L(置仪点 Y 坐标,都是手工输入,也可以建导线点数据库子程序,个人认为太麻 烦)
Y-L→E:X-K→F:Pol(F,E):IF J<0:Then J+360→J:Int(J)+0.01Int(60Frac(J))+0.006Frac(60Frac(J)) →J:(不习惯小 数点后四位为角度显示的,也可以用命令 J◢DMS◢来直接显示) Fix 4:” FWJ=”: Locate 6,4,J◢(不习惯小数点后四位为角度显示的,也可以用命令 J◢DMS◢来直接显示) Fix 3:” S=”:Locate 6,4,I◢
Z[1]=90(与路线右边夹角) Prog"THB":F=1=>Goto 1:F=2=>Goto 2 Lb1 1:Fix 3:" X=":Locate 6,4,X◢
" Y=":Locate 6,4,Y◢ Prog"3JS”:Goto 0: Lb1 2:Fix 3:" KM=":Locate 6,4,Z◢ " D=":Locate 6,4,D◢
(N+G×Z[15])→S:Goto z: LbI Z:Z[3]→D:Fix 2:Abs(D)-S→T:” L0=”:L Locate 6,4,T◢ " KM=":Locate 6,4,Z◢ " D=":Locate 6,4,D◢ “ TW=”: Locate 6,4,Z[5]◢
卡西欧5800计算器的详细编程
CASIO fx—5800计算器工程测量与公路测量程序1、坐标正算”X0=〃?X:”Y0=〃?Y:”I=〃?I:”J=〃?JX+ICos(J)→U:Y+ISin(J)→V”X=〃:U (待求点的X坐标)”Y=〃:V (待求点的Y坐标)说明:X0 Y0:已知点坐标I:两点的距离J:方位角2、坐标反算Lbl 0”X1=〃?X:”Y1=〃?Y:”X2=〃?U:”Y2=〃?VPol(U-X,V-Y):J<0 J+360→J”I=〃:I”J=〃:J DMSGOTO 0说明:X1Y1:第一点的坐标,X2Y2第二点的坐标,I:两点的距离,J:方位角3、圆曲线”X0=〃?X: ”Y0=〃?Y:”FWJ=〃?D:”QDHAO=〃?G: ”ZDHAO=〃?C: ”R=〃?R Lbl 1”DQHAO=〃?LL<G Or L>C GOTO 2”PY=〃?K180(L-G)÷(πR) →E2RSin(0.5E) →FReC(Abs(F),D+0.5E):Cls”X=〃:X+I+KCos(D+E+90) →A”Y=〃:Y+J+KSin(D+E+90) →BD+E→o:o<0 360+o→0o”FWJ=〃:o DMSGoto 1Lbl 2”END〃说明:X0Y0:起始点的坐标,FWJ:起始点的方位角,QDHAO:起点里程,ZDHAO终点里程,R:半径,DQHAO:待求点里程,PY:偏移量4、竖曲线”QZHAO =〃?J: ”H+B〃=?B:”I1=〃?C:”I2=〃?D:”R=〃?R:”T=〃?T:((D-C)÷100) ÷Abs((D-C) ÷100)→A:Abs(0.5R(D-C) ÷100)→S”T〃:SJ-T→XJ+T→YLbl 0”DQ=〃?LIf L<X:Then Goto 1:Else If L>Y:Then Goto 1:If End:If End”GC=〃:B+C(L-J) ÷100+A(L-J+T) ÷(2R) →HGoto 0Lbl 1”END〃说明:QZHAO:曲中点里程,H+B:曲中点高程,I1:第一坡度,I2:第二坡度,R:半径,T:切线长,DQ:待求点里程。
卡西欧5800公路坐标正反算程序
卡西欧5800公路坐标正反算程序(总19页)-CAL-FENGHAI.-(YICAI)-Company One1-CAL-本页仅作为文档封面,使用请直接删除目录一、坐标正算基本公式 (02)二、坐标反算原理 (04)三、高程数据库录入变换 (05)四、计算器程序 (07)01、ZBZS(坐标正算) (07)02、ZBFS(坐标反算) (08)03、GCJF(高程积分) (09)04、PJFY(坡脚放样) (10)05、JFCX(积分程序) (11)06、ZBFY(坐标放样) (11)07、DT(递推) (12)08、HP(横坡) (13)09、LK(路宽) (14)10、SJK1(平面数据库) (14)11、SJK2(纵面数据库) (14)12、SJK3(左路宽度数据库) (15)13、SJK4(右路宽度数据库) (15)14、SJK5(横坡数据库) (16)15、SJK6(下边坡数据库) (16)16、SJK7(左上边坡数据库) (17)17、SJK8(右上边坡数据库) (18)五、后记 (19)CASIO 5800计算器公路工程测量程序一、正算所涉及的计算公式 X R i d XαβBd Y d l d βI图表 1在图1中,A 点为回旋曲线起点,B 点为回旋曲线止点,I 点为所求坐标点。
设:A 点的X 坐标为X A ,Y 坐标为Y A ,A 点的切线方位角为α,A 点的曲率为ρA ,A 点的里程为L A ,B 点的曲率为ρB ,B 点的里程为L B ,I 点的曲率为ρI ,I 点的里程为L I 。
I 点的切线角为β。
由于回旋线上各点曲率半径R i 和该点至曲线起点的距离L 成反比。
故此任意点的曲率为;CL R i i ==1ρ (c 为常数) (1) 由式(1)可知,回旋曲线任意点的曲率按线性变化,由此回旋曲线上里程为L i 点的曲率为;AB A i A B A i L L L L --⨯-+=)(ρρρρ (2) 当曲线右偏时ρB 、ρA 取正值,反之取负值。
5800公路测量程序使用说明word资料26页
5800公路测量程序使用说明一、程序使用流程本程序数据和主程序是分开的,编程时将不同的工程数据存放到不同的数据文件里,如A匝道,文件名为A,将匝道A所有的曲线线元参数输入A文件里。
运行时只要运行文件名A的程序就可以了,具体运行流程见下图:二、数据文件的编写(一)交点法数据文件编辑交点法编写数据文件必须是对称型的,即直线段→缓和曲线段→圆曲线段→缓和曲线段→直线段,(如果任意一端没有直线段,则把直线段长度看做是0),另外圆曲线两侧缓和曲线的旋转常数必须相等,并且和直线段连接处的半径必须是无穷大。
交点法数据文件编写一般是根据设计图纸提供的平面曲线参数一览表提供的参数来编写,每个弯道包括:弯道起点方位角(C),交点X坐标(D),交点Y坐标(E),缓和曲线长度(F,当没有设缓和曲线时,F=0),交点转交(G,向左转弯,G为负值,向右转弯,G取正值),交点桩号(H),弯道圆曲线半径(R)。
下图是一段市政道路设计参数数据。
根据上图提供的数据,可以编辑成如下的数据文件:文件名:CHLNR3→DimZ “X0”?A:”Y0”?B:“Ln”?L:Abs(L)-Int(Abs(1000L))/1000→Z[3]:Lbl 0:If Z[3]≠0.0001: Then ?L: Els e “Xp”?X:”Yp”?Y:X→Z[1]:Y→Z[2]:IfEnd:Lbl 1:If L>0 :Then 98°39°35.12°→C:4474.384→D:2415 .861→E:140→F:31°17°23°→G:410.007→H:600→R:IfEnd: If L>1060 Then 129°56°58.19°→C: 4206.421→D:3093.946→E:70→F:-33°50°48°→G:1285.437→H:600→R:IfEnd:Prog”XLJS”:If Z[3]≠0. 0001:Then Goto 0:Else (Z[1]-X)cos(O)+(Z[2]-Y)sin(O)→N:L+N→L:-(Z[1]-X)sin(O)+(Z[2]-Y)cos(O)→K:If Abs(N)≥0.001:Then Goto 1:Else “L=“:L◢“K=”:K◢IfEnd:Goto 0: IfEnd在面程式中,有两个条件转移语句即If L>0:Then 98°39°35.12°→C:4774.384→D: 2415.861→E:140→F:31°17°23°→G:410.007→H:600→R:IfEndIf L>1060:Then 129°56°58.19°→C:4206.421→D: 3093.946→E:70→F:-33°50°48°→G:1285.437→H:600→R:IfEnd如果还有其他弯道,可以继续完后加。
路桥施工测量5800测量计算
路桥施工测量5800测量计算简介路桥施工测量5800是一款测量仪器,广泛应用于道路、桥梁等工程建设领域。
本文将详细介绍测量5800的测量原理、操作方法和计算过程。
测量原理测量5800使用的是全站仪测量原理。
全站仪是一种高精度测量仪器,利用三角测量原理进行测量。
在进行测量时,先确定基准点,然后测量目标点的水平角和垂直角,最后通过测量基准点和目标点之间的斜距确定目标点的坐标位置。
操作方法1.设立基准点在进行测量之前,需要先设立起始基准点。
一般会选择已知坐标的点作为起始基准点,并将该点的坐标输入到测量仪器中。
在后续的测量过程中,测量仪器会自动计算出目标点相对于基准点的坐标,从而实现高精度测量。
2.瞄准目标点将测量仪器放置于稳定的三脚架上,并打开仪器的电源。
然后根据所需测量的目标点,通过向上或者向下调整仪器朝向的方式瞄准目标点。
当测量仪器稳定后,可以通过仪器屏幕上的显示数据,确定目标点与基准点的距离和角度。
3.记录数据在测量过程中,需要记录下仪器测得的水平角、垂直角和斜距,以便后续进行计算。
同时也需要注意记录当前所在的位置,以便后续使用。
计算过程测量5800的计算过程相对比较复杂,需要对测量原理有深入的理解和掌握。
在计算过程中,需要注意以下几个关键点:1.坐标系选择在进行坐标计算时,需要先选择一个坐标系。
通常情况下,会选择本地坐标系或者全球坐标系。
在中国进行测量时,一般选择2000国家测量坐标系。
2.角度转换在测量过程中,水平角和垂直角一般以度数来计算。
而在后续的计算过程中,需要将角度转换为弧度才能进行计算。
3.坐标计算通过测量仪器测得的水平角、垂直角和斜距,可以通过三角函数计算出目标点相对于基准点的坐标位置。
坐标计算公式如下:x2 = x1 + L cosA cosVy2 = y1 + L cosA sinVz2 = z1 + L sinA其中,x1、y1、z1为基准点的坐标,L为目标点与基准点的距离,A为水平角,V为垂直角。
5800程序使用说明
现有三条线形:运行“XIAN YUAN FA”标题部分标题注释输入部分K(ZH)?起点里程0+EXE K(HZ)?终点里程(即线元起点里程+线元长度)150+EXE X(ZH)?起点坐标X 1000+EXE Y(ZH)?起点坐标Y 5000+EXE FWJ(ZH)?起点切线方位角86°32′45.06″+EXE起点半径(直线)1045+EXE 起点半径(圆曲线)-150+EXE 起点半径(缓和曲线)1045+EXE 起点半径(直线)1045+EXE 起点半径(圆曲线)-150+EXE程序名:XIAN YUAN FA程序题解:线元法。
可以对任何线元(直线、圆曲线、缓和曲线)5800程序使用说明程序使用过程:1、直线:起点坐标X=1000,Y=5000,起点切线方位角=86°32′45度=150;2、圆曲线:起点坐标X=1000,Y=5000,起点切线方位角=86°32′45.06″长度=150;半径=500,左偏;3、缓和曲线:起点坐标X=1000,Y=5000,起点切线方位角=86°32′45.0元长度=150,缓和曲线前半径=0,缓和曲线前半径=300,右偏。
R(ZH)?R(HZ)?起点半径(缓和曲线)300+EXE 1.ZS 2.FS1、正算2、反算1+EXE XC?测站点X坐标(可以输入0)0+EXE YC?测站点Y坐标(可以输入0)0+EXE K×+×××?待求点里程20+EXE RJ OR 0 TO K?转角,默认为90°;输入0时,返回待求点里程。
EXED?偏距(0为中桩、左-,右+)假如为左边桩,距中12.25M -12.25+EXEK×+×××=20里程20EXE Z=-12.25偏距(距中12.25M处左边桩)EXE X=1013.433K=20,D=-12.25处X坐标EXE Y=5019.226K=20,D=-12.25处Y坐标EXE FWJ=78°35′5.53″K=20,D=-12.25处切线方位角EXE按EXE返回继续运算改点的其他偏距,按0返回计算下一个桩号EXE 1.ZS 2.FS1、正算2、反算2+EXE X?待反算X坐标1013+EXE Y?待反算Y坐标5019+EXE注意:以下部分为直线算例R(HZ)?X=1013Y=5019K×+19.749Z=-11.832待反算X坐标待反算Y坐标反算出结果:里程、偏距按EXE返回继续反算其他点位EXE运行“ZHI XIAN”标题部分标题注释输入部分K(ZH)?起点里程0+EXE X(ZH)?起点坐标X 1000+EXE Y(ZH)?起点坐标Y 5000+EXE X(HZ)?终点坐标X 1000+EXE Y(HZ)?终点坐标Y 5500+EXE I=计算出两点间距离EXE FWJ= 90°0′0″计算出两点间方位角EXE程序题解:直线。
FX5800计算器测量程序集2.4_版使用说明综述
FX5800计算器测量程序集2.4 版使用说明一、程序功能主要功能:采用交点法方式计算多条线路坐标正反算,可算任意复杂线型及立交匝道,包括C型,S型、卵型、回头曲线等;极坐标放样,全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。
新版本优化:1、优化程序语句、2、以复数形式输入变量及数据库,取消原矩阵数据库;3、修改隧道超欠挖程序为通用形,不受圆心个数限制、4、新增测量资料表计算二、源程序(绿色为程序名;蓝色为输入计算器内容)紫色为新版改动处(可以根据自己标段情况用相关主程序及子程序,再在0程序中汇总)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、XY、X1、G1);8、极坐标计算程序(8JS、JS、DS);9、隧道超欠挖计算程序(A、B、AB、HX、H、I、QX、S、SD、F、ZD、X1、S1、I1、SD1)运行后按1~9数子约半秒,选择程序,返回时,在桩号输入-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、I1、JS、M(度分秒转十进制)、QX、S、S1、SD0、SD1、T、W1、X1、XY、(五点通线元法计算坐标)、ZD带有不完整缓和曲线的线元转交点数据程序(T)。
公路测量计算程序fx-5800P操作手册(无图片版)
fx-5800P矩阵编程计算器《公路测量计算程序操作手册》感谢您fx-5800P矩阵编程计算器公路测量计算程序!本次fx-5800P程序提供公路路线计算、高程计算、测量放样计算、交会计算等计算程序。
本程序特色为公路测量的全部数据(包括路线平面曲线,竖曲线,横坡度,路基宽度,路面结构层,水准点,导线点数据)储存在一台计算器上,紧密结合计算,实现外业或计算过程只要计算器一台,无需设计图纸。
愿它给您的工程测量工作带来更大的方便,有误或有改进的地方敬请向联系作者指出以便完善改进。
本程序只能在fx-5800P 中运行,不能在fx-4500PA、fx-4800P及fx-4850P中运行!主程序名都是以字符、“11…”“23…”开头命名的,其余字符开头的程序均为子序(见下表表备注栏),用户只能运行“11…”~“92…”主程序,不能直接运行子程序。
一、程序名及其功能列于表:二、各程序代码:1、程序11FY,计算输出路线放样坐标及方位角、距离。
"XZ" 显示XZ (提示为测站X坐标)Locate 8,2,Z[1] 显示Z[1]值(测站X坐标)"":"YZ":W▲换行后显示W值(测站Y坐标)Lbl 0Prog "13ZW" 调用13ZWPol(X-Z[1],Y-W)If J<0:then J+360→J:IfEnd 变量J的值在0~360度之间Prog"9" 变量J的转换成度分秒Locate 9,3, J 在9列3行显示J的值Fix 3Locate 1,1, "X" 显示计算结果Locate 1,2, "Y"Locate 1,3, "J···" 角度(度分秒)Locate 1,4, "D(m)"Locate 8,4, I""▲程序暂停,等待用户输入EXE后继续ClsProg"DLP"Goto 02、程序12CZZB,输入测站数据(XY),可输入已储存控制点编号"XZ"?W 提示XZ,输入测站X坐标If W<2000:Then Prog "62DS":Else W→Z[1] 2000表示编号少于2000,如大于2000则认为是X坐标值"YZ"?W"X":Z[1]▲"Y":W▲IfEnd3、程序13ZW,输入桩号,计算设计坐标10→DimZ 增加10个扩展变量L→Z[10] Z[10]为中间变量,以实现桩号自动递增或递减Prog "P""JJ"?M 提示JJ,输入与路线前进方向的右交角"DR+L-"?N 提示DR+L-,输入与中桩的距离,右正左负F+M→F 计算出中点至所要计算点的方位角Fix 3:X+Ncos(F) →XClsLocate 8,1,X 输出X坐标Y+Nsin(F) →YLocate 8,2,Y输出Y坐标4、程序HB-B^(5)÷(40A^(4))+B^(9)÷3456÷A^(8)→CB^(3)÷(6A2)-B^(7)÷336÷A^(6)+B^(10)÷42240÷A^(10)→DB2÷2÷A2÷π×180→E5、程序GS注:本程序可设定改线范围后,参照程序PP储存数据。
CASIO-5800计算器公路测量常用程序
CASIO-5800计算器公路测量常用程序一、程序功能本程序由6个主程序、5个次子程序及5个参数子程序组成。
主要用于公路测量中坐标正反算,设计任意点高程及横坡计算,桥涵放样,路基开挖口及填方坡脚线放样。
程序坐标计算适应于任何线型.二、源程序1.主程序1:一般放样反算程序(①正算坐标、放样点至置仪点方位角及距离;②反算桩号及距中距离)程序名:1ZD-XYLb1 0:Norm 2F=1:(正反算判别,F=1正算,F=2反算,也可以改F前加?,改F为变量)Z[1]=90(与路线右边夹角)Prog"THB":F=1=>Goto 1:F=2=>Goto 2Lb1 1:Fix 3:"X=":Locate 6,4,X◢"Y=":Locate 6,4,Y◢Prog"3JS”:Goto 0:Lb1 2:Fix 3:"KM=":Locate 6,4,Z◢"D=":Locate 6,4,D◢Goto 02.主程序2:高程序横坡程序(设计任意点高程及横坡)程序名:2GCLbI 0:Norm 2“KM”?Z:?D:Prog”H”:Fix 3:”H=”:Locate 6,4,H◢“I=”: Locate 6,4,I◢Goto 03.主程序3:极坐放样计算程序(计算放样点至置仪点方位角及距离)程序名:3JSX:Y:1268.123→K(置仪点X坐标)2243.545→L(置仪点Y坐标,都是手工输入,也可以建导线点数据库子程序,个人认为太麻烦)Y-L→E:X-K→F:Pol(F,E):IF J<0:ThenJ+360→J:Int(J)+0.01Int(60Frac(J))+0.006Frac(60Frac(J)) →J:(不习惯小数点后四位为角度显示的,也可以用命令J◢DMS◢来直接显示) Fix 4:” FWJ=”: Locate 6,4,J◢(不习惯小数点后四位为角度显示的,也可以用命令J◢DMS◢来直接显示)Fix 3:”S=”:Locate 6,4,I◢4.主程序4:涵洞放样程序(由涵中心桩号计算出各涵角坐标、在主程序3中输入置仪点坐标后计算放样点至置仪点方位角及距离)程序名:4JH-XYLbI 0:Norm 290→Z[1](涵洞中心桩与右边夹角,手工输入,也可以修改成前面加?后变为变量)1→F:Prog”THB”:?L:Z[2]-Z[1] →E:X+Lcos(E) →X:Y+Lsin(E) →Y:Fix 3: "X=":Locate 6,4,X◢"Y=":Locate 6,4,Y◢Prog"3JS”:Goto 0:5.主程序5:路基开挖边线及填方坡脚线放样程序(输入大概桩号及测量坐标、地面标高计算出偏移距离、桩号、距中距离、填挖高度)程序名:5FBXLbI 0:Norm 2: 18→DimZ:2→F:90→Z[1]:Prog“THB”:Z:D:”M0”?M:M→Z[4]:D→Z[3]:Prog”6GD”:L→Z[6]:If D<0:Then 0.75-L→D:Goto H:Else L-0.75→D:Goto H:IfEndLbI H:Prog”H”:H-0.03-Z[4] →Z[5]:Z[6] →L:If Z[5]<0:Then –z[5]→G:Goto W:Else Z[5] →G:Goto T:LbI W:Prog “W0”:Z[10]+Z[11] →A: If G>A:Then Goto 1:Else IfG>Z[10]:Then Goto 2:Else Goto 3:IfEnd:LbI 1:L+Z[12]+Z[13]+Z[14]+(G-A)×Z[9]+Z[11]×Z[8]+Z[10]×Z[7]:Goto Z:LbI 2:L+Z[12]+Z[13]+(G-Z[10])×Z[8]+Z[10]×Z[7]:Goto Z:LbI 3:L+Z[12]+G×Z[7]:Goto z:LbI T:L+0.5→N:If G>Z[17]:Then(N+Z[18]+(G-Z[17])×Z[16]+Z[17]×Z[15])→S:Goto Z:Else(N+G×Z[15])→S:Goto z:LbI Z:Z[3]→D:Fix 2:Abs(D)-S→T:”L0=”:L Locate 6,4,T◢"KM=":Locate 6,4,Z◢"D=":Locate 6,4,D◢“TW=”: Locate 6,4,Z[5]◢Goto 06.主程序6:路基标准半幅宽度计算程序(对于设计有加宽渐变的有用,如路基宽度无变化,则把此程序直接输入半幅宽度值至L)程序名:6GDProg “G0”Z-C→E:(B-A)×E/S+A→L:L:7.坐标计算次程序(THB)程序名:THB18→DimZ:"KM"?Z:Prog "X0"1÷P→C: (P-R)÷(2HPR) →S:180÷π→E:F=1=>Goto 1:F=2=>Goto 2←┘Lbl 1:?D: Abs(Z-O) →W:Prog "A":X:Y:Goto 3LbI 2:X:Y:X→I:Y→J:Prog "B":O+W→Z:D→D:Goto 3 LbI 3:IF F=1Then X:Y:Else Z:D8. 正算子程序(A)程序名:A0.1184634425→A:0.2393143352→B:0.2844444444→N 0.046910077→K:0.2307653449→L:0.5→M: U+W(Acos(G+QEKW(C+KWS))+Bcos(G+QELW(C+LW S))+Ncos(G+QEMW(C+MWS))+Bcos(G+QE(1-L)W(C+(1-L)WS))+Acos(G+QE(1-K)W(C+(1-K)WS))) →X:V+W(Asin(G+QEKW(C+KWS))+Bsin(G+QELW(C+LWS))+Nsin(G+QEMW(C+MWS))+Bsin(G+QE(1-L)W(C+(1-L)WS))+Asin(G+QE(1-K)W( C+(1-K)WS))) →Y:G+QEW(C+WS)+Z[1]→Z[2]:X+Dcos(Z[2])→X: Y+Dsin(Z[2])→Y9. 反算子程序(B)程序名:BG-90→T: Abs((Y-V)cos(T)-(X-U)sin(T)) →W:0→D:Lbl 0:Prog "A":T+QEW(C+WS) →L: (J-Y)cos(L)-(I-X)sin(L)→D:IF Abs(D)<0.01:Then Goto1:Else W+D→W:Goto 0←┘Lbl 1:0→D:Prog "A":(J-Y)÷si n(Z[2]) →D:10.高程计算子程序(H)程序名:HProg “S0”:R:T:C:G:I:C-T→F:Z-F→L:C+T→E:G-TI→Q:If T=O:ThenQ+LI→H:Goto 0:Else If Z<F:Then Q+LI→H:Goto 0:Else If Z≤E:ThenQ+LI+L2÷2÷R→H:Goto 0:LbI 0:H:If D=0:Then Goto I:Else Prog “I”:H+V→H:Goto I:LbI I:H:I: 11.高程超高计算程序(I)程序名:IProg”I0”:W=1=> Goto 0:W=2=>Goto 1:LbI 0:If L=0:Then Abs(D)×M→V:Goto 2:ElseAbs(D)×((N-M)×(Z-C)÷L+M)→V:Goto 2:IfEnd:LbI 1:If L=0:Then Abs(D)×M→V:Goto 2:ElseAbs(D)×(((3((Z-C)÷L)2-2((Z-C)÷L)∧(3))×(N-M))+M)→V:Goto 2:IfEnd: LbI 2:Abs(D)→E:V÷E→I:I(E-K)→V:12.数据子程序(附后示例)①程序名:X0(坐标计算要素程序)If Z≥25900 And Z≤26615.555:Then25900→O:11587.421→U:1847.983→V:101。
5800程序
FX-5800计算器公路测量常用程序分享作者:回龙已被分享1次评论(0)复制链接分享转载举报转】 FX-5800计算器公路测量常用程序转载分享该日志评论举报一、程序功能本程序由6个主程序、5个次子程序及5个参数子程序组成。
主要用于公路测量中坐标正反算,设计任意点高程及横坡计算,桥涵放样,路基开挖口及填方坡脚线放样。
程序坐标计算适应于任何线型.二、源程序1.主程序1:一般放样反算程序(①正算坐标、放样点至置仪点方位角及距离;②反算桩号及距中距离)程序名:1ZD-XYLb1 0:Norm 2F=1:(正反算判别,F=1正算,F=2反算,也可以改F前加?,改F为变量)Z[1]=90(与路线右边夹角)Prog"THB":F=1=>Goto 1:F=2=>Goto 2Lb1 1:Fix 3:"X=":Locate 6,4,X◢"Y=":Locate 6,4,Y◢Prog"3JS”:Goto 0:Lb1 2:Fix 3:"KM=":Locate 6,4,Z◢"D=":Locate 6,4,D◢Goto 02.主程序2:高程序横坡程序(设计任意点高程及横坡)程序名:2GCLbI 0:Norm 2“KM”?Z:?D:Prog”H”:Fix 3:” H=”:Locate 6,4,H◢“ I=”: Locate 6,4,I◢Goto 03.主程序3:极坐放样计算程序(计算放样点至置仪点方位角及距离)程序名:3JSX:Y:1268.123→K(置仪点X坐标)2243.545→L(置仪点Y坐标,都是手工输入,也可以建导线点数据库子程序,个人认为太麻烦)Y-L→E:X-K→F:Pol(F,E):IF J<0:Then J+360→J:Int(J)+0.01Int(60Frac(J))+0.006Frac(60Frac(J)) →J:(不习惯小数点后四位为角度显示的,也可以用命令J◢DMS◢来直接显示) Fix 4:” FWJ=”: Locate 6,4,J◢(不习惯小数点后四位为角度显示的,也可以用命令J◢DMS◢来直接显示)Fix 3:” S=”:Locate 6,4,I◢4.主程序4:涵洞放样程序(由涵中心桩号计算出各涵角坐标、在主程序3中输入置仪点坐标后计算放样点至置仪点方位角及距离)程序名:4JH-XYLbI 0:Norm 290→Z[1](涵洞中心桩与右边夹角,手工输入,也可以修改成前面加?后变为变量)1→F:Prog”THB”:?L:Z[2]-Z[1] →E:X+Lcos(E) →X:Y+Lsin(E) →Y:Fix 3: "X=":Locate 6,4,X◢"Y=":Locate 6,4,Y◢Prog"3JS”:Goto 0:5.主程序5:路基开挖边线及填方坡脚线放样程序(输入大概桩号及测量坐标、地面标高计算出偏移距离、桩号、距中距离、填挖高度)程序名:5FBXLbI 0:Norm 2: 18→DimZ:2→F:90→Z[1]:Prog “THB”:Z:D:”M0”?M:M→Z[4]:D →Z[3]:Prog”6GD”:L→Z[6]:If D<0:Then 0.75-L→D:Goto H:Else L-0.75→D:Goto H:IfEndLbI H:Prog”H”:H-0.03-Z[4] →Z[5]:Z[6] →L:If Z[5]<0:Then –z[5] →G:Goto W:Else Z[5] →G:Goto T:LbI W:Prog “W0”:Z[10]+Z[11] →A: If G>A:Then Goto 1:Else If G>Z[10]:ThenGoto 2:Else Goto 3:IfEnd:LbI 1:L+Z[12]+Z[13]+Z[14]+(G-A)×Z[9]+Z[11]×Z[8]+Z[10]×Z[7]:Goto Z: LbI 2:L+Z[12]+Z[13]+(G-Z[10])×Z[8]+Z[10]×Z[7]:Goto Z:LbI 3:L+Z[12]+G×Z[7]:Goto z:LbI T:L+0.5→N:If G>Z[17]:Then (N+Z[18]+(G-Z[17])×Z[16]+Z[17]×Z[15])→S:Goto Z:Else (N+G×Z[15])→S:Goto z:LbI Z:Z[3]→D:Fix 2:Abs(D)-S→T:” L0=”:L Locate 6,4,T◢"KM=":Locate 6,4,Z◢"D=":Locate 6,4,D◢“ TW=”: Locate 6,4,Z[5]◢Goto 06.主程序6:路基标准半幅宽度计算程序(对于设计有加宽渐变的有用,如路基宽度无变化,则把此程序直接输入半幅宽度值至L)程序名:6GDProg “G0”Z-C→E:(B-A)×E/S+A→L:L:7.坐标计算次程序(THB)程序名:THB18→DimZ:"KM"?Z:Prog "X0"1÷P→C: (P-R)÷(2HPR) →S: 180÷π→E:F=1=>Goto 1:F=2=>Goto 2←┘Lbl 1:?D: Abs(Z-O) →W:Prog "A":X:Y:Goto 3LbI 2:X:Y:X→I:Y→J:Prog "B":O+W→Z:D→D:Goto 3 LbI 3:IF F=1Then X:Y:Else Z:D8. 正算子程序(A)程序名:A0.1184634425→A: 0.2393143352→B:0.2844444444→N 0.046910077→K:0.2307653449→L:0.5→M: U+W(Acos(G+QEKW(C+KWS))+Bcos(G+QELW(C+LW S))+Ncos(G+QEMW(C+MWS))+Bcos(G+QE(1-L)W(C+(1-L)WS))+Acos(G+QE(1-K)W(C+(1-K)WS))) →X:V+W(Asin(G+QEKW(C+KWS))+Bsin(G+QELW(C+LWS))+Nsin(G+QEMW(C+MWS))+Bsin(G+QE(1-L)W(C+(1-L)WS))+Asin(G+QE(1-K)W( C+(1-K)WS))) →Y:G+QEW(C+WS)+Z[1]→Z[2]:X+Dcos(Z[2])→X: Y+Dsin(Z[2])→Y9. 反算子程序(B)程序名:BG-90→T: Abs((Y-V)cos(T)-(X-U)sin(T)) →W: 0→D:Lbl 0:Prog "A":T+QEW(C+WS) →L: (J-Y)cos(L)-(I-X)sin(L)→D:IF Abs(D)<0.01:Then Goto1:Else W+D→W:Goto 0←┘Lbl 1:0→D:Prog "A":(J-Y)÷sin(Z[2]) →D:10.高程计算子程序(H)程序名:HProg “S0”:R:T:C:G:I:C-T→F:Z-F→L:C+T→E:G-TI→Q:If T=O:Then Q+LI→H:Goto 0:Else If Z<F:Then Q+LI→H:Goto 0:Else If Z≤E:Then Q+LI+L2÷2LbI 0:H:If D=0:Then Goto I:Else Prog “I”:H+V→H:Goto I:LbI I:H:I: 11.高程超高计算程序(I)程序名:IProg”I0”:W=1=> Goto 0:W=2=>Goto 1:LbI 0:If L=0:Then Abs(D)×M→V:Goto 2:Else Abs(D)×((N-M)×(Z-C)÷L+M)→V:Goto 2:IfEnd:LbI 1:If L=0:Then Abs(D)×M→V:Goto 2:Else Abs(D)×(((3((Z-C)÷L)2-2((Z-C)÷L)∧(3))×(N-M))+M)→V:Goto 2:IfEnd:LbI 2:Abs(D)→E:V÷E→I:I(E-K)→V:12.数据子程序(附后示例)①程序名:X0(坐标计算要素程序)If Z≥25900 And Z≤26615.555:Then 25900→O:11587.421→U:1847.983→V:101。
最新CASIO5800计算器公路竖曲线全线高程计算程序汇总
C A S I O5800计算器公路竖曲线全线高程计算程序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个给别的程序用。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
5800公路测量程序使用说明5800公路测量程序使用说明一、程序使用流程本程序数据和主程序是分开的,编程时将不同的工程数据存放到不同的数据文件里,如A 匝道,文件名为A,将匝道A所有的曲线线元参数输入A文件里。
运行时只要运行文件名A 的程序就可以了,具体运行流程见下图:二、数据文件的编写(一)交点法数据文件编辑交点法编写数据文件必须是对称型的,即直线段→缓和曲线段→圆曲线段→缓和曲线段→直线段,(如果任意一端没有直线段,则把直线段长度看做是0),另外圆曲线两侧缓和曲线的旋转常数必须相等,并且和直线段连接处的半径必须是无穷大。
交点法数据文件编写一般是根据设计图纸提供的平面曲线参数一览表提供的参数来编写,每个弯道包括:弯道起点方位角(C),交点X坐标(D),交点Y坐标(E),缓和曲线长度(F,当没有设缓和曲线时,F=0),交点转交(G,向左转弯,G为负值,向右转弯,G取正值),交点桩号(H),弯道圆曲线半径(R)。
下图是一段市政道路设计参数数据。
根据上图提供的数据,可以编辑成如下的数据文件:文件名:CHLNR3→DimZ “X0”?A:”Y0”?B:“Ln”?L:Abs(L)-Int(Abs(1000L))/1000→Z[3]:Lbl 0:If Z[3]≠0.0001: Then ?L: Else “Xp”?X:”Yp”?Y:X→Z[1]:Y→Z[2]:IfEnd:Lbl 1:If L>0 :Then 98°39°35.12°→C:4474. 384→D:2415.861→E:140→F:31°17°23°→G:410.007→H:600→R:IfEnd: If L>1060 Then 1 29°56°58.19°→C:4206.421→D:3093.946→E:70→F:-33°50°48°→G:1285.437→H:600→R:If End:Prog”XLJS”:If Z[3]≠0.0001:Then Goto 0:Else (Z[1]-X)cos(O)+(Z[2]-Y)sin(O)→N:L+N →L:-(Z[1]-X)sin(O)+(Z[2]-Y)cos(O)→K:If Abs(N)≥0.001:Then Goto 1:Else “L=“: L◢“K=”:K◢IfEnd:Goto 0: IfEnd在面程式中,有两个条件转移语句即If L>0:Then 98°39°35.12°→C:4774.384→D: 2415.861→E:140→F:31°17°23°→G:410.007→H:600→R:IfEndIf L>1060:Then 129°56°58.19°→C:4206.421→D: 3093.946→E:70→F:-33°50°48°→G:1285.437→H:600→R:IfEnd……如果还有其他弯道,可以继续完后加。
在这些存放设计参数的语句前后的程序表达式是固定的。
说明:编辑曲线参数时,每个曲线参数放在一个If L>***.***(两个弯道中间直线段上的任意桩号) :Then ***°**°**.**°→C(弯道起点方位角):****.***→D(交点X坐标):****.****→E(交点Y坐标):***.***→F(缓和曲线长度:**°**°**°→G(转角,向左转为负值,向右转为正值):***.***→H(交点里程桩号):***→R(圆曲线半径):IfEnd 条件式语句里,如果有多个弯道,一直按上述形式编下去,变量说明:1、 L>***.***弯道参数的起点范围,可以是弯道起点,也可以是弯道前直线段里的任意点桩号2、 ***°**°**.**°→C 弯道起点方位角3、****.***→D、****.****→E交点X坐标、Y坐标4、***.***→F缓和曲线长度,如果没设置缓和曲线,则缓和曲线长度看做05、**°**°**°→G 转角,向左转为负值,向右转为正值6、***.***→H、交点里程桩号7、***→R 圆曲线半径注意,运行程序时,第一部是输入测站坐标X0,Y0,然后输入近似桩号,主要是为了加快收敛,输入时注意当根据桩号和距中距离计算所求点坐标时,请不要把小数点第四位输入0.0001,如K21+369.0921,请把桩号输入21369.092即可,相反,当根据坐标反算桩号和距中距离时,请在输入时把第四位小数数位0.0001,如K21+200,输入时请输入21200.0001。
(二)线元法数据文件编辑线元法数据文件编辑适合于各种各样的线型组合,特别是在大型立交区或者是不规则的线型组合地方,如小区道路、重丘区山路等有特别明显的有点,本程序为了减少使用者设计参数的输入,特别把直线与缓和曲线以及圆曲线连接的地方只要输入缓和曲线参数就可以了,这样可以减少输入很多设计参数,同时节约大量的内存。
看下图,该图是一个半喇叭型的互通立交,一共是5条匝道,我们以D 匝道为例,来看看线元法数据文件的建立。
下表是D 匝道的线元表:D 匝道线元数据分析:从上表中可以看出,D 匝道由三个线元组成,第一段是缓和曲线段,根据上表判断,该缓和曲线属于第一段缓和曲线,其最小半径处桩号为J=K0+039.289,该处坐标X=494347.926,Y=477989. 873,半径为R=40米,方位角W=302°18′26.0″,缓和曲线旋转常数P=55,在缓和曲线终点K0+039.289处,有一圆曲线与其相连接,长度I=39.216。
第二段是圆曲线,第三段又是一段缓和曲线,根据上表判断,该曲线属于第二缓和曲线,曲线最小半径位于与园曲线连接处,桩号J=K0+78.504,坐标为X=494380.677,Y=477971.271,方位角W=358°28′45.9″,最小半径R=40,缓和曲线旋转常数P=-65(为了判断是第一段还是第二缓和曲线,我们通过P的正负来判断,第一缓和段P统一用正数表示,第二缓和段统一用负号表示。
起点处相连的圆曲线长度I可以看做0,也可以看做是39.216.由此我们整理下。
从整个线型全部是向右转向,所以R全部取正数。
具体如下:第一段缓和曲线线元参数:最小半径处坐标X=494347.926 Y=477989. 873最小半径R=40最小半径处方位角:W=302°18′26.0″缓和曲线旋转常数P=55与之相连的圆曲线长度I=39.216最小半径处桩号J=39.289此段数据计算范围可以从K0+000~ K0+78.504第二段缓和曲线线元参数最小半径处坐标X=494380.677 Y=477971.271最小半径R=40最小半径处方位角:W=358°28′45.9″缓和曲线旋转常数P=65与之相连的圆曲线长度I=39.216最小半径处桩号J= W=358°28′45.9″此段数据计算范围可以从K0+78.504到匝道结束。
当桩号L位于K0+000~ K0+78.504时,曲线参数按第一段编写,当L>78.504时,按第二段缓和曲线编写,当然第二段缓和曲线计算范围也可以从圆曲线起点K0+039.289到K0+78.504中间任意桩号开始。
下面是D匝道的数据程序文件(文件名“DZD”):3→DimZ:X0”?A:”Y0”?B:“Ln”?L: Abs(L)-Int(Abs(1000L))/1000→Z[3]:Lbl 0:If Z[3]≠0.0001: The n ?L: Else “Xp”?X:”Yp”?Y:X→Z[1]:Y→Z[2]:IfEnd:Lbl 1:If L≥0 :Then 494347.926→X:477 989. 873→Y:40→R:302°18°26°→W:55→P:39.216→I: 39.289→J:IfEnd: If L≥78.504:The n 494380.677→X:477971.271→Y:40→R:358°28°45.9°→W:-65→P:39.216→I: 78.504→J:I fEnd:Prog”FDCH”: Prog”XLJS”: If Z[3]≠0.0001:Then Goto 0:Else (Z[1]-X)cos(O)+(Z[2]-Y)si n(O)→N:L+N→L:-(Z[1]-X)sin(O)+(Z[2]-Y)cos(O)→K:If Abs(N)≥0.001:Then Got o 1:Else “L=“:L◢“K=”:K◢IfEnd:Goto 0: IfEnd在上面程式中,每个缓和曲线的线元参数放在一个If … Then …… IfEnd循环语句中,If 后面紧跟计算的起点范围,终点范围从下段的起点范围结束。
变量定义:1、X、Y 输入缓和曲线半径最小处的X、Y坐标2、R 缓和曲线最小半径,当线路左转时,半径数据前面加“-”号,以判断线路转向。
3、W 输入缓和曲线半径最小处的方位角4、P 缓和曲线旋转常数,第一缓和曲线长度为正数,第二缓和曲线常数为负数。
当不设缓和曲线时,P=05、I 与缓和曲线最小半径端连接的圆曲线长度。
6、J缓和曲线小半径段的桩号。
再看看E 匝道数据文件编辑E 匝道线元设计数据表在E 匝道线元表中,我们可以看出,E 匝道式由一段直线段→缓和曲线段→圆曲线段→缓和曲线段→缓和曲线段→圆曲线段连接起来的。
值得注意的是,在位于K0+248.491处,是两段反向的缓和曲线连接点,在编写数据程序文件时,分三段编写,第一段从K0+000到K0+203.366,第二段从K0+203.366到K0+248.919,第三段从K0+248.919到线路终点K0+331.13。
具体文件如下:(文件名“EZD ”)3→DimZ :X0”?A:”Y0”?B:“Ln ”?L:Abs(L)-Int(Abs(1000L))/1000→Z[3]:Lbl 0:If Z[3]≠0.0001: Then ?L: Else “Xp ”?X:”Yp ”?Y:X →Z[1]:Y →Z[2]:IfEnd:Lbl 1:If L ≥0 :Then 494381.6316→X :477847.870→Y :200→R :90°08°44.6°→W :120→P:60.07→I: 143.296→J :IfEnd: If L ≥203.366:Then 494372.527→X :477948.932→Y :200→R :107°21°16.3°→W :-95→P:60.07→I:203.366→J:IfEnd: If L≥248.491:Then 494337.373→X:478010.658→Y:86.75→R:92°24°19°→W:75→P:17.8→I: 313.333→J:IfEnd: Prog”FDCH”: Prog“XLJS”:If Z[3]≠0.0001:Then Goto 0:Else (Z[1]-X)cos(O)+(Z[2]¬-Y)sin(O)→N:L+N→L:Int(1000L)÷1000+0.0001→L:-(Z[1]-X)sin(O)+(Z[2]-Y)cos(O)→K:If Abs(N)≥0.001:Then Goto 1:Else “L=“:L◢“K=”:K◢IfEnd:Goto 0: IfEnd为了让使用者熟悉掌握数据程序文件的编写线元法的数据程序文件,现在将C、F、G等匝道的线元数据列出来,供使用者练习。