当前位置：文档之家 › 陶庆fx-5800P数据库及主程序(修改版) (1)

陶庆fx-5800P数据库及主程序(修改版) (1)

  • 格式：doc
  • 大小：63.00 KB
  • 文档页数：6

陶庆fx-5800P数据库及主程序

一、数据库内容(对称型交点法)

（对称型：1、线路转角G：左转输“负”，右转输“正”。2、偏距K：左输“负”，右输“正”）

10→DimZ ↙

“X0”?A:“Y0”?B: “X1”?C:C→Z[10]:”Y1”?D:D→Z[4]: tan-1((Z[4]-B)÷(Z[10]-A+10^(-10)))→Z[6] ↙

Z[10]-A<0=>Z[6]+180→Z[6]:Z[6]<0=>Z[6]+360→Z[6]: √((Z[10]-A)2+(Z[4]-B)2)→Z[7] ↙

“DIS”:Z[7] ◢

“FWJ”:Z[6] >DMS◢

“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 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(Ｏ)＋(Z[2]－Y)sin(Ｏ)→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: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

如果还有其他弯道，可以继续往后加。在这些存放设计参数的语句前后的程序表达式是固定的。

说明：编辑曲线参数时，每个曲线参数放在一个If L>***.***（两个弯道中间直线段上的任意桩号） :Then

***°**°**.**°→C（弯道起点方位角）：****.***→D（交点X坐标）：****.****→E（交点Y坐标）：***.***→F（缓和曲线长度：**°**°**°→G（转角，向左转为负值，向右转为正值）：***.***→H（交点里程桩号）:***→R（圆曲线半径）:IfEnd 条件式语句里，如果有多个弯道，一直按上述形式编下去，

变量说明：

1、 L>***.***弯道参数的起点范围，可以是弯道起点，也可以是弯道前直线段里的任意点桩号

2、 ***°**°**.**°→C 弯道起点方位角

3、****.***→D、****.****→E 交点X坐标、Y坐标

4、***.***→F 缓和曲线长度，如果没设置缓和曲线，则缓和曲线长度看做0

5、**°**°**°→G 转角，向左转为负值，向右转为正值

6、***.***→H、交点里程桩号

7、***→R 圆曲线半径

注意，运行程序时，第一部是输入测站坐标X0，Y0，然后输入近似桩号，主要是为了加快收敛，输入时注意当根据桩号和偏离计算所求点坐标时，请不要把小数点第四位输入0.0001，如K21+369.0921，请把桩号输入21369.092即可，相反，当根据坐标反算桩号和偏离时，请在输入时把第四位小数数位0.0001，如K21+200，输入时请输入21200.0001。

二、数据库内容(非对称型线元法)

（非对称型：1、圆曲线半径R:左转输“负”，右转输“正”。 2、缓和曲线旋转参数P:第一缓和曲线输“正”，第二缓和曲线输“负”）

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中间任意桩号开始 线元名称 起点桩号 偏向 半径或缓和曲线旋转常数A 线元长度(m) 线元起点坐标、方位角

X(m) Y(m) 方位角

缓和曲线 DK0+000.00 右偏 55 39.289 494341.902 478027.825 260°38′55.7″

圆曲线 DK0+039.289 右偏 40 39.216 494347.926 477989. 873 302°18′26.0″

缓和曲线 DK0+078.504 右偏 65 105.625 494380.677 477971.271 358°28′45.9″

1 、C匝道线元要素表

2、C匝道线元数据库

10→DimZ ↙

“X0”?A:“Y0”?B: “X1”?C:C→Z[10]:”Y1”?D:D→Z[4]: tan-1((Z[4]-B)÷(Z[10]-A+10^(-10)))→Z[6] ↙

Z[10]-A<0=>Z[6]+180→Z[6]:Z[6]<0=>Z[6]+360→Z[6]: √((Z[10]-A)2+(Z[4]-B)2)→Z[7] ↙

“DIS”:Z[7] ◢

“FWJ”:Z[6] ►DMS◢

“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 495005.991→X：478056.677→Y：32→R：56°19°42.3°→W： 0→P : 56.876→I: 0→J：IfEnd:

If L≥56.876：Then 494943.127→X：478122.242→Y：140→R：164°20°25.7°→W：65→P : 30.431→I:

108.332→J：IfEnd:

If L≥138.763：Then 494913.167→X：478127.219→Y：140→R：176°47°40.6°→W：-65→P: 30.431→I:

138.763→J：IfEnd:

If L≥168.941：Then 494379.485→X：478086.681→Y：85→R：211°37°04.2°→W：85→P : 72.739→I :

675.964→J：IfEnd:

Prog“FDCH”: Prog“XLJS”：If Z[3]≠0.0001:Then Goto 0:Else (Z[1]－X)cos(Ｏ)＋(Z[2]--Y)sin(Ｏ)→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 起点桩号 偏向 半径或缓和曲线旋转常数A 线元长度(m) 线元起点坐标、方位角

X(m) Y(m) 方位角

圆曲线 CK0+000.00 右偏 32 56.876 495005.991 478056.677 56°19′42.3″

直线 CK0+056.876 21.277 494991. 262 478104. 123 158°09′54.4″

缓和曲线 CK0+078.153 右偏 65 30.179 494971. 511 478112.036 158°09′54.4″

圆曲线 CK0+108.332 右偏 140 30.431 494943.127 478122.242 164°20′25.7″

缓和曲线 CK0+138.763 右偏 65 30.179 494913.167 478127.219 176°47′40.6″

直线 CK0+168.941 右偏 85 422.023 494883.008 478126.740 182.°58′11.8″

缓和曲线 CK0+590.964 右偏 85 85 494461.552 478104.874 182.°58′11.8″

圆曲线 CK0+675.964 右偏 85 72.739 494379.485 478086.681 211°37′04.2″

合集下载

5800 计算程序

5800 计算程序

5800 计算程序

Fx-5800 计算器程序

QXJS-000 主程序

Fix 3:Deg:Lbl 4:“1.SZ=>XY”:“2.XY=>SZ”: “ 1,2= ” ? →Q:

” LICHENG= ” ? →S:Prog“QXJSSUB0” ↙

Lbl 0:IfQ=1:Then Goto1:IfEnd:IfQ=2:ThenGoto2:IfEnd ↙

Lbl 1:”OUT JL=”? → Z: “OUT JD=”?

G:Prog“QXJSSUB1”:“XZB=”:N →N ◢

“YZB=”:E →E ◢

“QXFWJ=”:F →F:F ▲ DMS ◢

Goto4 ↙

Lbl 2: “XZB=”? →B: “YZB=”? →C:B→N:

C→E:Prog“QXJSSUB2”: “LICHENG=”:S →S ◢

“OUT JL=”:Z →Z ◢

Goto4 ↙

说明：

Q: 代表正反算，其中 1 为正算， 2 为反算； S: 代表里程； Z ：代

表偏移距离； G ：代表偏移角度（以线路前进方向为 X 方向，顺时针

转为正； N ： X 坐标； E ： Y 坐标； F ：切线方位角；

QXJSSUB0 ( 数据库 )

Goto1 ↙

Lbl 1

IF S<157687.528:THEN

2884169.2517→U:471475.6573→V:157547.528→O:98 ° 32 ′ 43.08

″ →A:140→L:10^45→P:10000→R: Return:IfEnd ↙

IF S<157993.605:THEN

2884148.1260→U:471614.0539→V:157687.528→O:98 ° 56 ′ 46.93

″ →A:306.0771→L:10000→P:10000→R: Return:IfEnd ↙

IF S<158133.605:THEN

2884095.9086→U:471915.6318→V:157993.605→O:100 ° 42 ′ 0.22

工程测量中fx-5800P计算器基本程序

工程测量中fx-5800P计算器基本程序

工程测量中fx-5800P计算器基本程序

的编写及实际放线的应用

刘兵策 刘 杰

摘 要 在日常工程测量工作中，计算器是必不可少的工具。目前行业内用fx-5800P。本文介绍测量工作中坐标正反算、大地转施工、施工转大地等常用程序的原理及编写，并对其比较复杂的实际放线的灵活应用进行解析，为类似的测量工作提供借鉴。

关键词 工程测量 fx-5800P程序 应用

1 引 言

控制测量是施工的基础，为了便于施工，放线一般使用施工坐标系，坐标轴平行于建筑物主轴线。对于建筑物主轴线与坐标轴不平行的，为了方便放线，一般不再改变坐标系，用计算器程序进行计算，迅速判断需要定位的点。

利用fx-5800P计算器根据测出的坐标数据计算出与设计图纸上的差值，指挥棱镜进行移动，找到准确的设计位置。测量工作中主要用到坐标正反算，大地转施工，施工转大地等常用程序，下面介绍这几个程序的原理和编写，总结一些在实际工作中的应用。

2 Fx-5800计算器程序的原理与编写

2.1 大地坐标转换为施工坐标

大地坐标转换为施工坐标见图1。

Xp、Yp分别是P点在XOY坐标系中的纵横坐标，xp，yp分别是xo’y坐标系中的纵横坐标值，Xo，Yo分别是xo’y坐标系的坐标原点o’在XOY坐标系中的纵、横坐标值，Δα为两坐标系坐标纵轴的夹角。

将P点从XOY坐标系转换到xo’y坐标系中，

即大地转施工的公式如下： 图1 大地坐标与施工坐标转换图

xp=（Yp-Yo）sinΔα+（Xp-Xo）cosΔα；

yp=（Yp-Yo）cosΔα-（Xp-Xo）sinΔα；

用fx-5800P编制程序时，只要输入大地坐标的原点o’的坐标和要转换的点P点的大地坐标，即在坐标系XOY坐标系中的坐标，再用上述公式带入，输出P点的施工坐标。基本程序如下： “X1=”?A:”Y1=”?B: (输入xoy的原点的大地坐标）

5800计算器程序

5800计算器程序

曲線任意里程中邊樁坐標正反算5800p

TYQXJS(主程序名)

LbI 0:4→Dimz:Cls

"1.SZ→XY"

"2.XY→SZ"?→N:Cls

"XO"?U: "YO"?V: "SO"?O:"FO"?G: "LS"?H: "RO"?P:"RN"?R:?Q

1÷P→C：(P-R)÷(2HPR) →D：180÷π→E

N=2=>Goto 2

LbI 1:Cls:?S

S=0=>Goto 0 (注:當S輸入0時,程序會由LbI 0開始重新運行)

Z:Abs(S-O)→W

Prog"SUB1":Cls

"XS=":X◢

"YS=":Y◢

"FS=":F-90 ►DMS◢

Goto 1

LbI 2:Cls:?X

X=0=>Goto 0 (注:當X輸入0時,程序由會LbI 0開始重新運行)

Y:X→I:Y→J

Prog"SUB2":O+W→S:Cls

"S=":S◢

"Z=":Z◢

Goto 2

注:紅色部可以不要,亦可以要,它的作用是將S或X輸入0時,程序會重新由頭開始運行,(即是可以計算下段線元)

SUB1(子程序名)

0.→A:0.→B

0.→K:0.→L 1-L→F:1-K→M

G+QEKW(C+KWD)→Z[1]

G+QELW(C+LWD)→Z[2]

G+QEFW(C+FWD)→Z[3]

G+QEMW(C+MWD)→Z[4]

A×cos(Z[1])→X (剩號可省略)

X+Bcos(Z[2])→X

X+Bcos(Z[3])→X

X+Acos(Z[4])→X

U+WX→X

Asin(Z[1])→Y

Y+Bsin(Z[2])→Y

Y+Bsin(Z[3])→Y

Y+Asin(Z[4])→Y

V+WY→Y

G+QEW(C+WD)+90→F

X+Zcos(F)→X

Y+Zsin(F)→Y

SUB2(子程序名)

G-90→T

(Y-V)cos(T)-(X-U)sin(T)→W

Abs(W)→W:0→Z

5800公路放样程序

5800公路放样程序

FX-5800计算器公路测量常用程序

一、程序功能

本程序由6个主程序、5个次子程序及5个参数子程序组成。主要用于公路测量中坐标正反算，设计任意点高程及横坡计算,桥涵放样，路基开挖口及填方坡脚线放样。程序坐标计算适应于任何线型.

二、源程序

1.主程序1：一般放样反算程序(①正算坐标、放样点至置仪点方位角及距离；②反算桩号及距中距离)

程序名:1ZD-XY

Lb1 0:Norm 2

F=1：(正反算判别，F=1正算，F=2反算,也可以改F前加？，改F为变量)

Z[1]=90（与路线右边夹角）

Prog＂THB＂：F=1=>Goto 1:F=2=>Goto 2

Lb1 1:Ｆix 3:＂ Ｘ=＂：Locate 6,4,Ｘ◢

＂ Ｙ＝＂：Locate 6,4,Ｙ◢

Ｐrog＂3JS”:Goto 0:

Lb1 2:Fix 3:＂ＫＭ＝＂：Locate 6,4,Ｚ◢

＂Ｄ＝＂：Locate 6,4,Ｄ◢

Ｇoto 0

２．主程序２：高程序横坡程序(设计任意点高程及横坡)

程序名：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◢来直接显示)