器械自由設置

ＦＩＬＥ　XY/SE　

Ａ "ＨＳ＝" ： Ｂ "ＭＳ＝" ： L "MA＝" ＥＸＥ　　
Ｍ＝Ｉｎｔ　L：Ｎ＝Ｆｒａｃ　L×100：Ｏ＝Ｉｎｔ　Ｎ
：Ｐ＝Ｆｒａｃ　Ｎ×１００：Ｑ＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）
：Ｚ=Ａ^2＋Ｂ^2−２×Ａ×Ｂ×ＣＯＳ　Ｑ　
：Ｃ＝√Ｚ
：Ｗ＝（Ｂ＾２＋Ｃ＾２−Ａ＾２）÷２÷Ｂ÷Ｃ
：Ｄ＝ＣＯＳ-1　Ｗ
：Ｇ "ＭＸ＝" ： Ｈ"MＹ＝" ： Ｓ"ＨＸ＝"： Ｒ"ＨＹ＝" ＥＸＥ
Ｅ＝Ｇ−Ｓ：Ｆ＝Ｈ−Ｒ：
Ｐｏｌ（Ｅ，Ｆ）：Fixm：Ｊ：Fixm：Ｉ：Ｊ≧0⇒Ｋ＝Ｊ：Ｇｏｔｏ　1：≠⇒Ｋ＝Ｊ＋360
：Ｌｂｌ　1：Ｖ＝（３６０−Ｄ）＋Ｋ＋１８０
：X＝G＋B×（COS　Ｖ）
：Ｙ＝Ｈ＋B×（ＳＩＮ　Ｖ）
：Ｘ"ＰＸ＝"　▲Ｙ"ＰＹ＝"　▲Ｉ"Ｈ−ＭＳ＝"　▲


器械自由設置計算
ＨＳ＝？　 器械点より左側既知点間距離入力　　例題　284.353　ＥＸＥ
ＭＳ＝？　 器械点より右側既知点間距離入力　　例題　432.936　 ＥＸＥ
ＭＡ＝？　 左既知点基準に右既知点の角度入力　例題　49.3733　ＥＸＥ
ＭＸ＝？　　　既知点右側Ｘ座標入力　　　例題　 -151536.496　 ＥＸＥ
ＭＹ＝？　　　既知点右側Ｙ座標入力　　　例題　　 42611.517　 ＥＸＥ
ＨＸ＝？　　　既知点左側Ｘ座標入力　　　例題　 -151808.487　 ＥＸＥ
ＨＹ＝？　　　既知点左側Ｙ座標入力　　　例題　　 42424.917　 ＥＸＥ

PX=-151966.5622 　ＥＸＥ　　器械設置点のＸ座標
PY= 42661.28294　 ＥＸＥ　　器械設置点のＹ座標
Ｈ−Ｍ，Ｓ＝？　329.846425 既知点間距離のチェック用に出力させています。
ＡＣ／ｏｎ　Ｂｒｅａｋ　ＥＸＥ　入力画面に戻る、ＡＣ／ｏｎ　2回押しで終了。