田立新 张平

摘要：利用fx-5800计算器可编程的特点，编写坐标方位角连续计算程序，使计

算方位角的工作变得简单易行，并且工作量大幅度降低。

关键词：方位角；左侧转角；导线

Abstract: using fx-5800 calculator programmable characteristics, write coordinates continuous calculation program azimuth, make millions

Calculate azimuth of work has become simple and feasible, and greatly reduce the workload.

Keywords: azimuth; The left corner; wire

中图分类号： TH72文献标识码：A 文章编号：

一、基本原理

如上图，沿A B1 2 3 4 5方向测得左侧转角分别为 、 、 、 、

；AB方向的坐标方位角为 。

则：B1方向坐标方位角为

①当 时，

②当 时，

③当 时，

12方向坐标方位角为

①当 时，

②当 时，

③当 时，

2 3方向坐标方位角为

①当 时，

②当 时，

③当 时，

3 4方向坐标方位角为

①当 时，

②当 时，

③当 时，

4 5方向坐标方位角为

①当 时，

②当 时，

③当 时，

二、源程序

FWJJS 程序名

0J:0 B:"N="?J

Lbl1

" ="?B

J+B J

IfJ<1800:Then J+1800J:N=J: "N=":J►DMS◢

Goto 1

Else If J≥5400:Then J-5400 J:N=J: "N=":J►DMS◢

Else J-1800 J:N=J:"N=":J►DMS◢

IfEnd:Goto 1

三、程序运行

【例】已知AB边的坐标方位角，由B点起始向前分别实测了1、2、3、4导线点，已知数据如下，计算B1、12、23、34边的坐标方位角。

已知边 实测水平角

NAB=

操作步骤

按MODE 5 2 按 ▲▼键，当文件名为TLX—FWJJS高亮度显示时，按EXE 。

此时屏幕显示N=？，此时输入AB边坐标方位角 ，显示 ？，输入B点实测水平角 ，显示 ，即为B1边的坐标方位角。

再按EXE 显示 ？，输入1号点实测水平角 ，显示 ，即为12边的坐标方位角。

再按EXE 显示 ？，输入2号点实测水平角 ，显示 ，即为23边的坐标方位角。

再按EXE 显示 ？，输入3号点实测水平角 ，显示 ，即为34边的坐标方位角。

注：1、运算时注意导线前进方向要统一；

2、水平角要用导线前进方向的左角；

3、计算后的方位角是各边前进方向的坐标方位角；

四、各种字符录入方法

：FUNCTION 3 2

: EXE

?: FUNCTION 3 1

If: FUNCTION 3 3

Then : FUNCTION 3 4

Else : FUNCTION 3 5

IfEnd: FUNCTION 3 6

Lb1: FUNCTION 3 7

Goto : FUNCTION 3 8

≥ : FUNCTION 3▼5

<: FUNCTION 3▼4

: FUNCTION 3▼ ▼3

For : FUNCTION 3▼ ▼ ▼ 1

To: FUNCTION 3▼ ▼ ▼ 2

Next: FUNCTION 3▼ ▼ ▼ 2

[]:ALPHA ln ALPHA X■

List:FUNCTION 7 1 1

: :ALPHA■

Freg:FUNCTION 7 1 2

结 语：煤矿井下导线测量是煤炭生产中经常性工作，频率较高。本程序使计算方位角的

工作量大幅降低，具有广泛的应用性。

【参考文献】

[1]覃辉,段长.fx-9860G SD矩阵串列编程计算器实用测量程序……