杭打計算 FILE ST KEISAN Lbl 0:A "KUI−X=":B "KUI−Y="C:  "KIK−X=":D "KIK−Y=" EXE E=A−C:F=B−D:Pol  (E,F):Fixm:J:Fixm:I:J≧0⇒K=J :Goto 1:≠⇒K=J+360:Lbl 1:I "S=" ▲ K"HO.KAKU="▲ L"NYU.HO=" EXE M=Int L:N=Frac  L×100:O=Int N: P=Frac N×100:Q=M+(O÷60+P÷3600):H= (K+180)−Q: H"KYOUKAKU=" ▲Goto 0 杭打計算 KUI−X?     打設する杭のX座標入力   例題  100.000 EXE KUI−Y?     打設する杭のY座標入力   例題  100.000 EXE KIKAI−X?   器械設置のX座標入力    例題  200.000 EXE KIKAI−Y?   器械設置のY座標入力    例題  200.000 EXE S=           141.4213562          EXE HO.KAKU      225              EXE 角度変換必要     SHIFT °′″ この例題は、225°ですが、225.123456と出た場合は、度分秒に変換 してください。 NYU.HO=?     入射角        例題  100.1125 EXE 後視点より器械点への方向角 100°11′25″ KYOUKAKU= 304.8097222   EXE 角度変換必要 SHIET °′″304°48′35″となります。 AC/on Break EXE 入力画面に戻る、AC/on 2回押しで終了。