|ADMIN||HOME|

サイト更新情報と管理人のひとりごと

2026/02/17
市区町村コードの市コードの半角スペース
https://yuito.sakura.ne.jp/cgi/wforum/wforum.cgi?mode=read&no=160&reno=119&oya=119&page=0#160

以前に情報交換の掲示板にアップした市区町村コードの市コード末尾に半角スペースが二つ入っている仕様に対応して、市コードの半角スペースを削除して表示されるルーチンを改善して左詰めで表示して更に右側に別の項目を表示することが簡単にできるように改善しました・

;----------- 市区町村コード表示 -------------
?nData8! "0,1,2,3,4,5,6,7,8,9";Code欄空に左の文字のいずれかがなく
?nDATA12! "都,道,府,県,市,区,町,村,郡";Code欄に左の文字がなければJCC(G)コード非表示
#Goto *50


;Code欄空欄なら*50にジャンプ
?nData8 "A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R";Code欄に左の文字のいずれかがあればJCCGコードを表示
#Print 180,135, "JCG#!JC"
;相手局の町村コード
?End
?Data8 " "

;CODE欄に半角のスペースがある場合、「市コードと判定」
#Substr $$A,1,4,"!JC";市コードの先頭から4文字を変数$$Aに代入
#Print 180,135, "JCC#!$$A"
;相手局の市コード
?End
?Data8! " "

;CODE欄に半角のスペースがない場合、「区コードと判定」
#Print 180,135, "JCC#!JC"
;相手局の区コード
?End
*50
2026/02/15
自宅駐車場でQRVしました
https://yuito.sakura.ne.jp/cgi/patio/patio.cgi?read=288
最近は自宅でのQRVが多くなっています。
再開局直後はロケーションが悪いため近隣のショッピングモールや公共施設の駐車場、利根川の堤防上などで
やっていたのですが、だんだんと出不精になってしまっています。
各局FBなQSOありがとうございました。
2026/02/14
自宅駐車場でQRVしました
https://yuito.sakura.ne.jp/cgi/patio/patio.cgi?read=287
各局FBなQSOありがとうございました。
2026/02/13
自宅駐車場でQRVしました
https://yuito.sakura.ne.jp/cgi/patio/patio.cgi?read=286
発声のリハビリ(QSO)をサボっていると途端に声の出が悪くなります。
ガラガラ声でご迷惑をおかけしますがよろしくお願いいたします。
2026/02/12
自宅駐車場でQRVしました
https://yuito.sakura.ne.jp/cgi/patio/patio.cgi?read=285

今日はNHKに用事があって電話したのですが、五回もたらい回しにされました。
さすがはNHK大物です。(褒めてないよ)

受信契約の解約も考えましたが、そのためにはテレビを処分するだけでなくカーナビもテレビが受信できないものに変えないといけません。

既に、防災情報はネットで事足りてはいますしその他のニュースも同様です。
エンタメもネットで充分に楽しめます。
NHKに限らずテレビも新聞もホントに必要ですか?

新聞は、スーパーのチラシのオマケのようなものになってます。
スーパーのチラシのために購読しているようなものです。

- Topics Board -