情報交換の掲示板（アマチュア無線）

市コードの2バイトの空白を見かけ上消す方法

;市区町村コードの6バイト中の末尾に2バイトの空白が附加されているコードを
;右寄せで表示した際に、見かけ上末尾の2バイトを隠す方法
;----------- 市区町村コード表示 --- By JS1BRX 2025/06/18 ----------
?nData8! "0,1,2,3,4,5,6,7,8,9";Code欄空欄ならJCC(G)コード非表示
#Goto*50
;? Data8 " "
?nData8 "A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R";
#PrintR 980,135, "JCG #!JC" ;相手局の町村コード
?End
?nData8! "A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R";
? Data8 " "
#PrintR 996,135, "JCC #!JC" ;相手局の市コード
?End
? Data8! " "
#PrintR 980,135, "JCC #!JC" ;相手局の区コード
?End
*50
#Exit