一括表示 件名: Re: 緯度経度  方位と距離を表示する
記事No 956
投稿日 2021/11/07(Sun) 17:17:09
投稿者 JA9AOB 銅子
> JA9AOB 銅子さん、ありがとうございます。
>
> > GLを使っていますが、緯度・経度に直して方位と距離を出します。
> > 送って置きました。参照下さい。
>
> C# からVB.net に変換して見ましたが数か所エラーが出ます。
> 調査中ですが対処出来るかどうか?
>
> どなたか、他にも2点間の緯度経度から方位を求めるコードがありませんか?
>
> VB.net版が良いですが、C++ や C# でも変換努力しますが。

太田さん どこでエラーになりますか。
from の緯度経度
to の緯度経度
をラージアンに変換して 次の式に代入するだけです。
ラージアンとは角度180度 をπラージアン と言いますπは約3.14です Math.PI です
緯度経度をラージアンに直すのは 角度*π/180 で得られます 変数は
double で十分です
πが字が変わって読みにくいですがパイ です

const double r=6378.137; // km---- これは地球の半径
double sa = tolongitude - fromlongitude;
distance = r * Math.Acos(Math.Sin(fromlatitude) * Math.Sin(tolatitude) + Math.Cos(fromlatitude) * Math.Cos(tolatitude) * Math.Cos(sa)); // Km
origin = 180.0 * Math.Atan2(Math.Sin(sa), Math.Cos(fromlatitude) * Math.Tan(tolatitude) - Math.Sin(fromlatitude) * Math.Cos(sa)) / Math.PI; // 度
if (origin < 0)
origin = origin + 360;
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
関連一覧ツリー 一括表示 をクリックするとツリーを一括表示します)
一括表示 緯度経度  方位と距離を表示する - JA2BQX 太田 11/05-16:20 No.947
  Re: 緯度経度  方位と距離を表示する - JG1MOU浜田 11/05-20:26 No.948
  Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/05-20:50 No.949
    Re: 緯度経度  方位と距離を表示する - JA9AOB 銅子 11/06-10:48 No.950
      Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/06-11:46 No.951
      Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/06-19:02 No.953
        Re: 緯度経度  方位と距離を表示する - JG1MOU浜田 11/06-22:09 No.954
        Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/07-07:28 No.955
          Re: 緯度経度  方位と距離を表示する - JG1MOU浜田 11/07-17:45 No.957
            Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/07-18:13 No.961
            Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/07-19:43 No.962
              Re: 緯度経度  方位と距離を表示する - JG1MOU浜田 11/07-20:00 No.963
                Re: 緯度経度  方位と距離を表示する - JG1MOU浜田 11/07-21:10 No.965
                  Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/08-08:24 No.967
                    Re: 緯度経度  方位と距離を表示する - JG1MOU浜田 11/08-09:32 No.970
                      Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/08-10:13 No.971
        Re: 緯度経度  方位と距離を表示する - JA9AOB 銅子 11/07-17:17 No.956
          Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/07-18:03 No.959
            Re: 緯度経度  方位と距離を表示する - JA9AOB 銅子 11/08-07:54 No.966
              Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/08-08:28 No.968
                Re: 緯度経度  方位と距離を表示する - JA9AOB 銅子 11/08-09:12 No.969
                  Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/08-11:56 No.974
                    Re: 緯度経度  方位と距離を表示する - JG1MOU浜田 11/08-12:14 No.975
  Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/06-18:56 No.952
    Re: 緯度経度  方位と距離を表示する - JG1MOU浜田 11/07-17:53 No.958
      Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/07-18:11 No.960
        Re: 緯度経度  方位と距離を表示する - JG1MOU浜田 11/08-10:49 No.972
          Re: 緯度経度  方位と距離を表示する - JA2BQX 太田 11/08-11:41 No.973