真方位角與羅盤方位角轉換

真方位角與羅盤方位角轉換

程式編寫日期: 2007年12月21日

注意: π^r 是按 SHIFT EXP SHIFT Ans 2

程式 (57 bytes，使用記憶A及B)

?→A: ?→B: A => Goto 0: Fix 0:

Rnd( B ÷ 90 + . 5: Norm 1◢ Lbl 0:

180(Ans=4) - cos( π^rAns )(B - 180

(Ans≠1) cos( π^rAnsA

註1: 輸入方向資料時，0表示沒有東南北方向資料，即輸入為真方位角，1代表東北(NE)，2代表東南(SE)，3代表西南(SW)，4代表西北(NW)。

註2: 為方便記憶上述數字的意思，1, 2, 3, 4的編排可理解為順時針由右上角(1:NE)至右下角(2:SE)至左下角(3:SW)至左上角(4:NW)。

例題1: 將真方位角 130°轉換為羅盤方位角。

按 Prog 1 再按 0 EXE (0代表沒有方向資料，即輸入為真方位角)

130 EXE (顯示2，代表東南) EXE (顯示角度為50°)

所以羅盤方位角為 S 50°E

例題2: 將真方位角 280°轉換為羅盤方位角。

按 Prog 1 再按 0 EXE (0代表沒有方向資料，即輸入為真方位角)

280 EXE (顯示4，代表西北) EXE (顯示角度為80°)

所以羅盤方位角為 N 80°W

例題3: 將羅盤方位角S 50°E轉換為真方位角。

按 Prog 1 再按 2 EXE (2代表東南SE)

50 EXE (顯示角度為130°)

所以真方位角為 130°

例題4: 將羅盤方位角N 80°W轉換為真方位角。

按 Prog 1 再按 4 EXE (4代表西北NW)

80 EXE (顯示角度為280°)

所以真方位角為 280°

註3: 注意輸入的角度範圍，真方位角為0≦θ<360°，羅盤方位角為0≦θ≦90°。