田立新 張平

摘要：利用fx-5800計算器可編程的特點，編寫坐標(biāo)方位角連續(xù)計算程序，使計

算方位角的工作變得簡單易行，并且工作量大幅度降低。

關(guān)鍵詞：方位角；左側(cè)轉(zhuǎn)角；導(dǎo)線

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文獻(xiàn)標(biāo)識碼：A 文章編號：

一、基本原理

如上圖，沿A B1 2 3 4 5方向測得左側(cè)轉(zhuǎn)角分別為 、 、 、 、

；AB方向的坐標(biāo)方位角為 。

則：B1方向坐標(biāo)方位角為

①當(dāng) 時，

②當(dāng) 時，

③當(dāng) 時，

12方向坐標(biāo)方位角為

①當(dāng) 時，

②當(dāng) 時，

③當(dāng) 時，

2 3方向坐標(biāo)方位角為

①當(dāng) 時，

②當(dāng) 時，

③當(dāng) 時，

3 4方向坐標(biāo)方位角為

①當(dāng) 時，

②當(dāng) 時，

③當(dāng) 時，

4 5方向坐標(biāo)方位角為

①當(dāng) 時，

②當(dāng) 時，

③當(dāng) 時，

二、源程序

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邊的坐標(biāo)方位角，由B點起始向前分別實測了1、2、3、4導(dǎo)線點，已知數(shù)據(jù)如下，計算B1、12、23、34邊的坐標(biāo)方位角。

已知邊 實測水平角

NAB=

操作步驟

按MODE 5 2 按 ▲▼鍵，當(dāng)文件名為TLX—FWJJS高亮度顯示時，按EXE 。

此時屏幕顯示N=？，此時輸入AB邊坐標(biāo)方位角 ，顯示 ？，輸入B點實測水平角 ，顯示 ，即為B1邊的坐標(biāo)方位角。

再按EXE 顯示 ？，輸入1號點實測水平角 ，顯示 ，即為12邊的坐標(biāo)方位角。

再按EXE 顯示 ？，輸入2號點實測水平角 ，顯示 ，即為23邊的坐標(biāo)方位角。

再按EXE 顯示 ？，輸入3號點實測水平角 ，顯示 ，即為34邊的坐標(biāo)方位角。

注：1、運算時注意導(dǎo)線前進(jìn)方向要統(tǒng)一；

2、水平角要用導(dǎo)線前進(jìn)方向的左角；

3、計算后的方位角是各邊前進(jìn)方向的坐標(biāo)方位角；

四、各種字符錄入方法

：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

結(jié) 語：煤礦井下導(dǎo)線測量是煤炭生產(chǎn)中經(jīng)常性工作，頻率較高。本程序使計算方位角的

工作量大幅降低，具有廣泛的應(yīng)用性。

【參考文獻(xiàn)】

[1]覃輝,段長.fx-9860G SD矩陣串列編程計算器實用測量程序.華南理工大學(xué)出版社，出版時間：2006.10.1.

[2]覃 輝,覃楠.CASIO fx-5800編程計算器基于數(shù)據(jù)庫子程序的測量程序與案例. 同濟(jì)大學(xué)出版社,2010.6.1.

[3]葛永慧.測量平差.中國礦業(yè)大學(xué)出版社,2005.2

注：文章內(nèi)所有公式及圖表請用PDF形式查看。