放射計算 FILE HOUSYA Lbl 0:A "X=":B "Y=":C "HOU=":D  "KYUKAKU=":E "S=" EXE M=Int C:N=Frac C×100:O=Int N:P=Frac  N×100:F=M+(O÷60+P÷3600):M=Int D: N=Frac D×100:O=Int N:P=Frac N×100: G=M+(O÷60+P÷3600) :H=F+G+180:H≧360⇒H=H−360:Goto 2:≠⇒H= H:Lbl 2:H "HOUKOUKAKU" ▲X=A+E×Cos H :X "PX=" ▲Y=B+E×Sin H:Y "PY=" ▲Goto 0 放射計算   X=?     器械設置点のX座標に入力   例題  100.123 EXE   Y=?     器械設置点のY座標に入力   例題  200.123 EXE HOU=?      入射角  後視から器械点への方向角 20.1050 EXE 角度入力は、20°10′50″20.1050と入力してください。 KYUKAKU=?   測角した角度夾角入力 例題  200.1030  EXE        S=?   測定距離入力     例題   20.345  EXE HOUKOUKAKU=40.35555556 角度変換必要   SHIFT °′″ PX=115.6267206  EXE PY=213.2969771  EXE AC/on Break 入力画面に戻る AC/on 2回押しで終了。