単曲線中間点座標計算 P2 LBL 1 "SIN.CHU.X/Y"PAUSE  MR10 "R=#?"HLT Min10 MR12  "L=#?"HLT  Min12 (180÷π)×60=÷2=× (MR12÷MR10)=÷60=Min1F SIN ×  (2×MR10)=GSB P19 Min2F AC MR20 "−R0*+R1?"HLT Min20 MR20 χ=0 GOTO 3 GOTO 2 LBL 3 360−MR1F= °′″←"HEN=#" HLT MR1F=±=Min3F MR2F="S0=#" HLT GOTO 4 LBL 2 MR1F=°′″←"HEN=#"HLT  MR2F="S0=#"HLT MR1F=Min3F LBL 4 MR50 "HO=#?" HLT GSB P18 Min50 MR31"BCX=#"HLT Min31 MR32  "BCY=#"HLT Min32 MR50+MR3F= Min4F  (MR4F COS)×MR2F=+MR31 =GSB P19 "PX=#"HLT Min40  (MR4F SIN)×MR2F=+MR32=GSB P19  "PY=#"HLT Min41 MR4F=°′″← "HO=#"HLT MR4F+MR3F=°′″← "AZ=#"HLT Min42 GOTO 1 P.18 Min09 INT +(MR09 FRAC×2 10x) Min09 INT÷60+MR09 FRAC ÷36= P.19 ×4 10x +FRAC=INT ÷4 10x= 単曲線中間点設置計算 R=?      曲線半径入力          例題 25.000 EXE L=?      BCより中間点までの距離入力  例題  3.862 EXE −R0*+1?   右カーブは、 1入力左カーブは、0入力 この例題は、左カーブでしています。      0 EXE HEN=355°34′28.1″   偏角  EXE   S0=3.8582        弦長  EXE ho=?     BCへの入射角入力       例題 90.0000EXE 注)角度入力 90°0′0″は、90.0000と入力してください。        20°4′5″は、20.0405と入力してください。 BCX=     BCのX座標入力        例題 100.000EXE BCY=     BCのY座標入力        例題 116.138EXE PX=100.2977     EXE  中間点X座標 PY=119.9847     EXE  中間点Y座標  h=85°34′28.11″ EXE  BCより中間点への方向角 AZ=81° 8′56.21″ EXE  接線方向角 注)後視を方向角で合わせた場合、横断方向は、81°8′56″+90°です。 入力画面に、戻ります。