HAMLOG プログラム開発室


新着表示
タイトル
記事No
投稿日
投稿者

Re: 緯度経度  方位と距離を表示する
955
2021/11/07(Sun) 07:28:48
JA2BQX 太田
JG1MOU 浜田さん、ありがとうございます。

> ちょっとバタバタしてまして、明日の夕方までにはメールで送ります。

お手数をお掛けします。浜田さんが参照したと言う Nifty フォーラムはクローズしていて中身は既に削除されていてソースにたどり着けませんでした。

> VB.netは、浮動小数点が doubleよりも大きい変数は扱えるのでしょうか。

どうでしょうか、通常は Int32 , Long 位しか使わないので。
Webで調べると下記のデータがありました。

Double System.Double 倍精度浮動小数点型 64bit 8バイト

負の値:
-1.79769313486231570×10^308 ~ -4.94065645841246544×10^-324

正の値:
4.94065645841246544×10^-324 ~ 1.79769313486231570×10^308
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop
タイトル
記事No
投稿日
投稿者

Re: 緯度経度  方位と距離を表示する
954
2021/11/06(Sat) 22:09:55
JG1MOU浜田
ちょっとバタバタしてまして、明日の夕方までにはメールで送ります。
VB.netは、浮動小数点が doubleよりも大きい変数は扱えるのでしょうか。
浮動小数点演算の精度が若干落ちるのかな、と思いまして。
C#なら、long doubleとかあると思いますが。

大昔に勉強したような三角関数、ラジアンとか使ってます。
今ではさっぱり理解できません。
教えていただいた計算式を、Delphiのソースに変えただけです。
三角関数系のライブラリがVB.netにあれば使えると思います。

> どなたか、他にも2点間の緯度経度から方位を求めるコードがありませんか?
>
> VB.net版が良いですが、C++ や C# でも変換努力しますが。
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop
タイトル
記事No
投稿日
投稿者

Re: 緯度経度  方位と距離を表示する
953
2021/11/06(Sat) 19:02:23
JA2BQX 太田
JA9AOB 銅子さん、ありがとうございます。

> GLを使っていますが、緯度・経度に直して方位と距離を出します。
> 送って置きました。参照下さい。

C# からVB.net に変換して見ましたが数か所エラーが出ます。
調査中ですが対処出来るかどうか?

どなたか、他にも2点間の緯度経度から方位を求めるコードがありませんか?

VB.net版が良いですが、C++ や C# でも変換努力しますが。
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop
タイトル
記事No
投稿日
投稿者

Re: 緯度経度  方位と距離を表示する
952
2021/11/06(Sat) 18:56:59
JA2BQX 太田
何時もお世話になります。

確認です。ユザーリスト、オープンさせていて、「免許状gets」[ From ] で使用中に
ユザーリストにヒットすればCodeが入り、なおかつ方位も表示されます。

ユザーリストにヒットしないけど「免許状gets」から code が転記される局は方位計算はしていないのでしょうか?
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop
タイトル
記事No
投稿日
投稿者

Re: 緯度経度  方位と距離を表示する
951
2021/11/06(Sat) 11:46:11
JA2BQX 太田
JA9AOB 銅子さん、こんにちは。何時もありがとうございます。

> 役に立かは分かりませんが、C#のもの送りますか。
> GLを使っていますが、緯度・経度に直して方位と距離を出します。Hamlogとほぼ同じの結果が得られます。
> 送って置きました。参照下さい。

いま、受取りました。C#から VB.net への変換をこれからします。
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop
タイトル
記事No
投稿日
投稿者

Re: 緯度経度  方位と距離を表示する
950
2021/11/06(Sat) 10:48:53
JA9AOB 銅子
>
> それにしてもWeb上に VB.net で検索で「緯度経度 方位」のサンプルが出てこない。
>
AOB 銅子です
役に立かは分かりませんが、C#のもの送りますか。
GLを使っていますが、緯度・経度に直して方位と距離を出します。Hamlogとほぼ同じの結果が得られます。

送って置きました。参照下さい。
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop
タイトル
記事No
投稿日
投稿者

Re: 緯度経度  方位と距離を表示する
949
2021/11/05(Fri) 20:50:03
JA2BQX 太田
浜田さん、こんばんは。

> WM_COPYDATA で
> 117 = 入力ウインドウの方位と距離の文字列を得る。
> というのがありましたけど、使えますか?

あらら、これは見落としていました。先日までは何回か HamlogMs.txt を
見ていたのですが、注意不足でした。ありがとうございます。

それにしてもWeb上に VB.net で検索で「緯度経度 方位」のサンプルが出てこない。
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop
タイトル
記事No
投稿日
投稿者

Re: 緯度経度  方位と距離を表示する
948
2021/11/05(Fri) 20:26:59
JG1MOU浜田
WM_COPYDATA で
117 = 入力ウインドウの方位と距離の文字列を得る。
というのがありましたけど、使えますか?

入力ウインドウで適当に W6AAA と入れてEnterキーを押し、
117番を送ったら、
「方位:44度 9302km」という文字列が返ってきました。

> 何時もお世話になります。
> Hamlog ユーザーからの依頼なのですが
> メニューの「オプション」「環境設定」「設定3」にての
> 緯度経度 「方位と距離を表示する」の設定をしておいて、
> データ入力ウインドウの右上に表示される「方位」データを VB.net にて取得出来る方法はありますか?
> VB.net にて2点間の緯度経度から方位を取得するサンプルコードは未発見です。
> 有っても直ぐに利用出来るかどうかですが。
>
> 国内局の時にはユーザーリストにマッチする等でcode欄に記入されないと表示されませんが。
>
> DX局の時にはコールサインから Entity を確定して Entity と方位を
> 関連つけたファイルから取得は出来ました。
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop
タイトル
記事No
投稿日
投稿者

緯度経度  方位と距離を表示する
947
2021/11/05(Fri) 16:20:23
JA2BQX 太田
何時もお世話になります。
Hamlog ユーザーからの依頼なのですが
メニューの「オプション」「環境設定」「設定3」にての
緯度経度 「方位と距離を表示する」の設定をしておいて、
データ入力ウインドウの右上に表示される「方位」データを VB.net にて取得出来る方法はありますか?
VB.net にて2点間の緯度経度から方位を取得するサンプルコードは未発見です。
有っても直ぐに利用出来るかどうかですが。

国内局の時にはユーザーリストにマッチする等でcode欄に記入されないと表示されませんが。

DX局の時にはコールサインから Entity を確定して Entity と方位を
関連つけたファイルから取得は出来ました。
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop
タイトル
記事No
投稿日
投稿者

Re: Th527api HamlogMs.txt  cmmd = 20
946
2021/10/06(Wed) 07:09:08
JA9AOB 銅子
> こんばんは。
>
> > 聞くところによると、Edgeなどは一般人にはアクセスできない保護エリアにインストールされているとかです。
>
> そうなのでしょうか、ちょっと探したら下記にあるようですが。
> Win10 64Bit PC
>
> C:\Program Files (x86)\Microsoft\Edge\Application\msedge.exe
>
> 他のフォルダにも msedge.exe はありますね。
>
>
本当だ クリックすると表示される。
でも、プログラム内で起動しようと思うと従来のIEとは全く異なった方法で無いと起動出来ません。その説明に何か書いてあったような気がしたので調べもしないで書きました。
Edgeはユニバーサル Windows プラットフォーム (UWP) アプリ と言う事で説明を読んでも良く分からない内容です、段々手に負えません。
このスレッドは管理者によってロックされていますので、返信並びに編集は出来ません!
pagetop