《fx-5800P程序》（全）资源-CSDN文库

共2个文件

txt：1个

pdf：1个

5800p程序

需积分: 19 128 浏览量 2013-08-07 11:02:46 上传评论收藏 1.42MB RAR 举报

资源推荐

资源详情

资源评论

收起资源包目录

casio5800编程（全）》.rar （2个子文件）

casio5800编程（全）

fx-5800P+chengxujiayouzhan-shouce.pdf 1.51MB

帮助说明.txt 2KB

覃辉(qh-506@163.com)

- 1 -

fx-5800P 矩阵编程计算器

《工程测量与公路测设程序加油站操作手册》

作者：覃辉(qh-506@163.com)

感谢您购买 fx-5800P 矩阵编程计算器！愿它给您的工程测量与公路测设

工作带来更大的方便。

本加油站的程序只能在 fx-5800P 中运行，不能在 fx-4500PA、fx-4800P 及 fx-4850P 中运行！

本次 fx-5800P 程序加油站向 fx-5800P 用户提供 20 个常用工程测量与公路测量程序、程序名、

子程序名及其功能列于表 1。

表 1 《工程测量与公路测设程序加油站》程序列表

主程序名需要调用的子程序名功能说明

PR1

计算一个起点至任意个端点的边长与方位角

PR2

极坐标法放样元素计算

PR3

经纬仪视距法测图计算记录

PR4

单一闭附合图根水准路线近似平差计算

PR5

单一闭附合图根导线近似平差计算

PR6

图根支导线坐标计算

PR7

测角前方交会坐标计算

PR8 ANGLE

测角后方交会坐标计算

PR9 DIST-BEAR

测边后方交会点坐标计算

PR10 COEFFICIENT,ZS,FS

54 北京系与 80 西安系高斯投影正算

PR11 COEFFICIENT,ZS,FS,DM-S

54 北京系与 80 西安系高斯投影反算

PR12 COEFFICIENT,ZS,FS

54 北京系与 80 西安系高斯投影换带计算

PR13 X[K]-GC

单交点单圆曲线偏角法中桩放样要素计算

PR14 X[K]-XY

单交点单圆曲线切线支距法中桩放样要素计算

PR15 X[K]-GCXY

单交点单圆曲线中桩坐标计算

PR16 Z[10]-XY, X[K]-HGC

单交点对称基本形曲线偏角法中桩放样要素计算

PR17 Z[10]-XY, X[K]-HXY

单交点对称基本形曲线切线支距法中桩放样要素计算

PR18 Z[10]-XY, X[K]-HOXY

单交点对称基本形曲线中桩坐标计算

PR19 X[K]-GQXY

双圆复曲线中桩测量坐标计算

PR20 X[K]-XH

竖曲线的计算

表 1 中共有 20 个主程序，15 个子程序，占用内存 21520 字节，占计算器总内存容量 28500 字

节的 75.5%。主程序名都是以字符“PR”开头加数字 1~20 命名的，其余字符开头的程序均为子

程序，用户只能运行 PR1~PR20 主程序，不能直接运行子程序。

卡西欧(上海)贸易有限公司向中国各地的卡西欧代理商提供一台内含 20 个程序的母机，如果

图 1 两台 fx-5800P 间数据通讯

覃辉(qh-506@163.com)

- 2 -

您的计算器是在卡西欧代理商处购买的，请您及时向代理商申请将母机内的 20 个程序通过数据通

讯的方式传输到您购买机器的内存中。操作方法为：

① 使用 SB-62 数据线(需要另外购买)连接两台 fx-5800P 的 3Pin 数据通讯口，见图 1 所示；

② 在您购买的 fx-5800P 上按

键打开机器电源，按 (LINK) (Receive)键使您

的机器处于接收数据状态，屏幕显示“Receiving…”，表示机器正等待接收母机发送来的数据；

③ 在代理商的母机上按键打开机器电源，按 (LINK) (Transmit)

(All)

(Yes)键启动代理商的母机发送数据，屏幕显示“Transmitting…”，表示正在发送数据。

传输完全部 20 主程序及 15 个子程序大约需要时间 56 秒，程序传输完毕后，两台机器的屏幕

都显示“Complete”，表示程序传输完成，屏幕显示过程见图 2 所示。

机器正在传输程序时，请不要进行其它操作，也不要拔出数据线，以免数据丢失。程序传输完

成后即可拔出数据线，按本操作手册使用程序。

请您将程序使用中的问题与建议及时发送到 qh-506@163.com，以便改进我们的工作，更好地

为您服务，卡西欧(上海)贸易有限公司感谢您的大力支持！

1、程序 PR1，计算一个起点至任意个端点的边长与方位角

"X,Y DIST And BEARING PR1" 显示程序标题

Deg:ClrStat:FreqOff:Fix 3

基本设置

"X0(m)="?A:"Y0(m)="?B

提示输入 0 点的坐标

K 变量计数清零

Lbl 0

K+1

K:Norm 1:"n=":K 计数变量计数

Fix 3:"Xn(m)=,(0 To END)"?

C 提示输入 n 点的 x 坐标，输入 0 结束程序计算

While C

"Yn(m)="? D 提示输入 n 点的 y 坐标

Pol(C-A,D-B):Cls

调用极坐标函数并清除屏幕显示

If J<0:Then J+360

F:Else J F:IfEnd

"DISTO 0 n(m)=":I 显示水平距离

"BEAR 0

n(DMS)=":F DMS 以六十进制度显示计算出的方位角

List X[K]:F List Y[K] 存储边长与方位角到统计串列

Goto 0: WhileEnd

提示重复输入端点的坐标

"PR1

END"

程序说明：运行上述程序，先输入起点的 x，y 坐标，然后输入端点的 x，y 坐标，起点坐标只

提示用户输入一次，端点坐标将反复提示用户输入，每输入完一个端点的坐标后，程序显示起点→

端点的边长与方位角，端点 x 坐标输入 0 时，停止程序运行。

表 1-1 中列出了使用程序 PR1 计算 0 点分别至 1，2，3，4 点的边长与方位角，表中的红色数

字为计算结果。

表 1-1 使用程序 PR1 计算边长与方位角案例

点

号

(m)

y (m)

起讫点号

D (m)

(°′″)

图 2 发送母机的全部数据到用户机器的操作过程

覃辉(qh-506@163.com)

- 3 -

O 3885.634 3114.471

1 4281.739 3592.881

O→1

621.108 50 22 35.6

2 3356.668 3419.507

O→2

610.616 150 1 46.09

3 3373.397 2385.189

O→3

891.201 234 54 58.89

4 3968.103 3005.750

O→4

136.460 307 10 54.11

完成计算后，起点至端点的边长与方位角分别存储在统计串列 List X，List Y 中，请按

(REG)键进入双变量统计与回归模式查看。在 List Y 中的方位角是以十进制度显示的，若要查看其

六十进制的角度值，应将光标移动到 List Y 的某个单元，按

键。

2、程序 PR2，极坐标法放样元素计算

"POLAR SETTING-OUT PR2" 显示程序标题

Deg:ClrStat:FreqOff:Fix 3

基本设置

"XO(m)="?A:"YO(m)="?B

提示输入测站点的坐标

"X0(m)="?C:"Y0(m)="?D

提示输入 0 方向点的坐标

Pol(C-A,D-B):Cls

调用极坐标函数并清除屏幕显示

If J<0:Then J+360

E:Else J E:IfEnd 判断并计算方位角

"DIST O

0(m)=":I 显示测站→0 方向的水平距离

"BEAR O

0(DMS)=":E DMS 以六十进制度显示测站→0 方向的方位角

K:I List X[K]:E List Y[K] 存储 0 方向的边长与方位角到统计串列

Lbl 0

K+1 K:Norm 1:"n=":K 计数变量计数

Fix 3:"Xn(m)=,(0 To END)"?

U 提示输入放样点的 x 坐标，输入 0 结束程序计算

While U

"Yn=(m)"? V 提示输入放样点的 y 坐标

Pol(U-A,V-B):Cls

调用极坐标函数并清除屏幕显示

If J<0:Then J+360

F:Else J F:IfEnd 判断并计算方位角

F-E

H 计算 0 方向与 n 方向的水平夹角

If H<0:Then H+360

H:IfEnd 判断并计算水平夹角

"DIST O

n(m)=":I 显示测站→n 方向的水平距离

"BEAR O

n(DMS)=":F DMS 以六十进制度显示测站→n 方向的方位角

"ANGLE 0-O-n(DMS)=":H

DMS 以六十进制度显示 0 方向与 n 方向的水平角

List X[K]:F List Y[K] 存储 O→n 方向的边长与方位角到统计串列

List Freq[K] 存储 O→n 方向的放样水平角到统计串列

Goto 0: WhileEnd

提示重复输入端点的坐标

"PR2

END"

程序说明：程序先计算测站至零方向的边长与方位角，再分别计算测站至任意端点的边长与方

位角，并由此计算出零方向与任意端点方向的水平夹角。

运行上述程序，先输入测站点的 x，y 坐标，再输入零方向点的 x，y 坐标，然后分别输入放样

点的坐标。测站点与零方向点坐标只提示输入一次，测站点→零方向点的边长与方位角也只显示一

次；放样点坐标将反复提示用户输入，每输入完一个放样点坐标后，程序显示测站点→放样点的边

长、方位角及与零方向的水平夹角，放样点的 x 坐标输入 0 时，停止程序运行。

表 2-1 中列出了使用程序 PR2 计算测站点 O 至 0 点的边长与方位角，测站点分别至 1，2，3，

4 点的边长、方位角与水平夹角，表中的红色数字为计算结果。

表 2-1 使用程序 PR2 计算极坐标法放样数据

点号

(m)

y (m)

起讫点号

D (m)

(°′″)

nO−−0

(°′″)

测站 O

4854.200 2760.279

0 点

4826.107 2844.794

O→0

89.062 108 23 12.98

覃辉(qh-506@163.com)

- 4 -

1 4842.616 2727.851

O→1

34.435 250 20 31.73 141 57 18.75

2 4819.552 2718.204

O→2

54.505 230 31 44.99 122 08 32.01

3 4838.845 2672.077

O→3

89.529 260 07 27.86 151 44 14.89

4 4861.909 2681.723

O→4

78.933 275 36 16.95 167 13 03.97

完成计算后，零方向的边长与方位角分别存储在统计串列单元 List X[1]，List Y[1]中，从统

计串列的第 2 行开始，放样方向的边长、方位角、与零方向的水平角分别存储在 List X，List Y，

List Freq 中，请按 (REG)键进入双变量统计与回归模式查看。若要查看 List Y 与 List Freq

中的六十进制的角值，应将光标移动到其中的某个单元，按

键。

3、程序 PR3，经纬仪视距法测图计算记录

"STADIA MAPPING PR3" 显示程序标题

Deg:FreqOn:Fix 3

基本设置

"HO(m)="?H

提示输入测站点高程

"IO(m)="?I

提示输入测站仪器高

"X(Deg)="?X

提示输入经纬仪竖盘指标差

If N=0:Then ClrStat:IfEnd

清除统计串列 List X,List Y,List Freq

Lbl 0:Norm 1

"UPPER(mm)="? A:"LOWER(mm)="? B 提示输入碎部点观测上、下丝读数

Fix 3:"VER(Deg)="?

V 提示输入碎部点方向竖盘读数

"HOR(Deg)="?

L 提示输入碎部点方向水平盘读数

0.1Abs(B-A)cos (90-V+X)

D 计算测站至碎部点的水平距离

H+Dtan (90-V+X)+I-(A+B)÷2000

G 计算碎部点的高程

"DI(m)=":D

显示水平距离

"HI(m)=":G

显示水平距离

Norm 1

设置正常显示格式

"STO List,YES(1),NO(Else )."?

Y 是否将碎部点展点数据存储到串列

If Y=1:Then N+1

N:L List X[N]

List Y[N]:G List Freq[N]

"List NUMBER=":N 显示已存储到串列中的碎部点数据个数

Else "List NUMBER=":N

显示已存储到串列中的碎部点数据个数

IfEnd

"GO ON(1),Stop(Else)."? Z 按键继续，按其余键停止程序运行

If Z=1:Then Goto 0:IfEnd

判断是否继续运行程序

"PR3

END"

程序说明：程序设计将每个碎部点的水平盘读数、水平距离、高程分别存储在统计串列 List X，

List Y 与 List Freq 中，串列单元记数变量为 N。程序运行前，如要清除串列单元的数据，应在执

行程序前先在 COMP 模式下执行 0

N 语句，将计数变量 N 清零。

程序先提示用户输入测站已知数据，它们包括测站点高程、测站仪器高、竖盘指标差等，程序

运行后只要不中断，只提示用户输入一次测站已知数据；中断程序后又重复运行程序时，如果测站

已知数据相同，则可分别按

键使用上次输入值。

每观测一个碎部点都要求用户依次输入上丝读数、下丝读数、竖盘读数与水平盘读数四个观测

数据，程序依此计算出测站至碎部点的水平距离与碎部点高程，水平盘读数不参与计算。

每完成一个碎部点数据的输入与计算后，屏幕提示 STO List,YES(1),NO(Else ).?，表示是否

将该碎部点的水平盘读数、水平距离与高程值存储到统计串列中，按

键为存储，按其余键

后按

键为不存储。

随后，屏幕继续提示 GO ON(1),Stop(Else).?，表示是否继续进行碎部点观测记录与计算，按

键为继续，按其余键后按键为停止程序运行。

停止程序运行后，可以按

键进入 REG 模式查看存储在统计串列中的碎部点展点数据，

覃辉(qh-506@163.com)

- 5 -

其中 List X 存储的是碎部点方向的水平盘读数值，List Y 存储的是测站至碎部点的水平距离，List

Freq 存储的是碎部点的高程值。

表 3-1 中列出了 10 个碎部点的观测与计算数据，表中的红色数字为计算结果。

表 3-1 使用程序 PR3 记录计算经纬仪视距法测图数据

测站高程=5.553m，测站仪器高=1.42m，竖盘指标差=-0°15′

序

上丝读数

(mm)

下丝读数

(mm)

竖盘读数

(°′)

水平盘读数

(°′)

水平距离

(m)

高程

(m)

1 500 1485 91 00 8 45 98.453 3.832

2 800 1698 90 22 358 45 89.790 4.758

3 1600 1844 89 29 0 16 24.399 5.365

4 1700 2055 89 29 359 36 35.499 5.261

5 1100 1753 90 19 358 56 65.294 4.901

6 1700 2510 89 58 166.05 80.999 4.562

7 1400 2312 89 21 178 01 91.196 5.754

8 1200 2041 89 29 178 12 84.098 5.744

9 1300 1740 89 30 178 37 43.999 5.645

10 1300 1342 91 02 187 13 4.198 5.558

4、程序 PR4，单一闭附合图根水准路线近似平差计算

"CLOSED Or CONNECTING MAPPING LEVEL PR4" 显示程序标题

"LEVEL TYPE,PLATE(1)="?P

输入水准路线类型数字，1 代表平坦，其余数代表山地

"START H(m)="?A

输入起点已知高程

"END H(m)="?B

输入终点已知高程，闭合水准路线时为起点已知高程

ClrStat:FreqOn

基本设置

"HEIGHT NUM="?N

输入测段高差数

DimZ 定义额外数组变量用于存储平差后点的高程

X:0 Y 累加高差,路线长变量清零

For 1

I To N

"n=":I 显示测段号

"h(m)="?

List X[I] 输入测段高差

"L(km) Or n="?

List Y[I] 输入测段路线长或测站数

List X[I]+X

X:List Y[I]+Y Y 累加路线长与高差

A+X-B F 计算高差闭合差

If P=1:Then 0.04

(Y) W:Else 0.012 (Y) W:IfEnd 图根水准高差闭合差限差

"H CLOSE ERROR(MM)=":1000F

显示高差闭合差

Σ(L)km OrΣ(n)="Y

显示总路线长或总测站数

If Abs (F)>W:Then "CLOSE ERROR OVER.":IfEnd

显示高差闭合差超限

-F÷Y

V 计算每 km 或每站高差改正数

For 1

I To N

List X[I]+VList Y[I] List Freq[I] 计算改正后的测段高差

If I=1:Then A+List Freq[I]

Z[I]:Else Z[I-1]+List Freq[I] Z[I]:IfEnd

"n=":I

显示测段号

"h ADJUST(m)=":List Freq[I]

显示改正后的测段高差

"Hn ADJUST(m)=":Z[I]

显示改正后点的高程

"CLOSE TEST(mm)=":1000(Z[I]-B)

显示高程检核结果

"PR4

END"

程序说明：程序先提示用户输入水准路线类型，按

键为平坦路线，要求其后输入以 km

为单位的水准测段路线长；按其余数字键与

键为山地水准路线，要求其后输入水准测段测站数。

评论收藏

内容反馈

u011623319

粉丝: 1
资源: 2

《fx-5800P程序》（全）

卡西欧5800计算器编程入门程序集.pdf

5800P全线全套程序

fx-5800程序

5800计算器程序程序

道路中边桩坐标放样正反算CASIO fx-5800P程序（全线贯通

5800p程序 教程 编程原理

fx5800p结构构件及地基基础 计算程序开发与应用

CASIO fx-5800p使用说明书.pdf

CASIO+5800计算器测量计算程序

Fx-5800P 全线段复数计算程序 【复数程式】带涵洞计算

fx-5800计算程序

5800P计算器程序[参考].pdf

CASIO fx-5800P编程计算器公路与铁路施工测量程序

CASIO fx-5800P编程计算器公路与铁路施工测量程序.zip

立交匝道坐标放样正反算CASIO_fx-5800P程序(带数据库功能).doc

fx5800计算器公路测量常用程序集

卡西欧5800计算器编程

卡西欧5800p计算器程序

5800P计算机坐标正反算程序

5800程序使用方法

前方交会编程

CASIO fx-5800计算器使用方法&编程教程

现在在用的卡西欧5800P程序

CASIO fx-5800p 附录

卡西欧5800p计算器所有编程命令解释打印

公路路线高程、坐标联合计算程序(线元法)(fx-5800P).pdf

5800P道路高程测量程序

fx-5800P_方格网法土方量通用计算程序

CASIO fx-5800P CYT 综合曲线坐标正反算程序

CASIO fx-5800P计算器与道路坐标放样计算.part1.rar

最新资源

5800p程序教程编程原理

fx5800p结构构件及地基基础计算程序开发与应用

Fx-5800P 全线段复数计算程序【复数程式】带涵洞计算