![[PukiWiki]](image/pukiwiki.png "[PukiWiki]")
|
本日（20） 昨日：77 合計：493460 JR1GDY ハムの部屋の入口 †ここは私のアマチュア無線のページです。 技術的な事や専門的なことを主に掲載していきたいと思っています。 ＤＴＰ関連の方でココに迷い込んでしまった方は技術情報からＤＴＰ情報を閲覧できます
私への連絡は †左記サイドバーの質問・要望からお願いします。 また、直接連絡を取りたい方は下記アドレスへお願いします メールについても一度お読み下さい 加入団体 †
おおよそ 最近の業務時間 †
活動日誌の写し †ハム活動記 ← 全ての活動日誌の目次と今後の計画 †今月のハム活動記（GDYのボヤキです） †目標：複式キーで自由自在の符号を素敵なリズムで送りたい
2019/11/13 (水)外付けHDD †仕事で使っているDTP専用のパソコンのバックアップ用ハードディスクの話し 2台同時に2年前に交換しました。2Tバイトです、（量販店で安かったので） Lacie製の2テラバイト、10K以下でした。 タイムマシンという機能で内蔵のデーターをバックアップさせるHDDとして使用していました 最初に故障したのは9月、私の使っていたPC それから11月、もう1台のPC 故障の症状は同じ、急にアンマウントされ、マウントされなくなりました。復旧ソフトでも症状が改善されません Lacie製は初めて使用しましたが、こんなに簡単に壊れるとは・・・・ 確かにHDDの寿命は2年〜と理解していましたが・・・、一日10時間250日稼働させたとして一年で2500時間、2年で5000時間です。壊れるのとても早い！ バッファローのHDDなどはつけっぱなしで10年も稼働している、使っている私も最近はビクビクしているしまつです。 そこで、今回はバッファローを購入しました、同時に2台購入です。 2019/11/11 (月)カワセミの週末 †楽しめる季節になりました。 必ず居る・・・という訳ではありませんが、飛んでくるポイントで2〜3時間、ボーっとしているのが心安まります 飛んでくると、一気にテンションが上がり無我夢中でシャッターを切ります 撮影が終わってから画像をチェックするのも楽しい 土曜日 †
日曜日 †
2019/11/4 (月)久しぶりにカワセミ †本当に久しぶりでした、朝からXYLが出かけて一人です。 思う存分カメラで遊びました。 9時〜現場に、午前中は空振り、近くのラーメン屋で昼食をとり、13時〜再度現場。 14時になったので、そろそろ帰ろうとしたら飛んできました。 まだ、幼い子供のようです、胸のオレンジ色は鮮やかではありません、 3〜40分 楽しめました もう少し経つときれいな色になります
2019/11/2 (土)BBQ †毎年恒例のBBQです 今年は13局参加してくれました。 和文の話、最近話題のFT8/FT4の話など興味津々の話題で、アマチュア無線のモチベーションがあがりました 恒例のオークションもあり、一部が貢ハムクラブの運営資金となりました。 ご協力ありがとうございました
2019/11/1 (金)Mac バージョンあげたら †OSX10.15にバージョンアップしたら、自作のハムログソフト「Logdy」の中でクリップボードを利用している箇所がいくつかある メモ記入の際、交信日や周波数を保存しておく、登録時に登録内容を保存しておく バージョンアップしたら、使えなくなってしまったので、仕方ないのでシェルコマンドで対応するようにした echo '保存する文字列' | pbcopy ←クリップにコピー $pstr = pbpaste ←ペースト こんな感じだ、 そこで、エンコードとデコードも書き直した まぁ、バージョンが上がれば、不具合も出る、チマチマと手直ししながら使うほかありまあせん 以下にperlソースコード （クリップボードの読み書き）MacOSX10.15 †#
# クリップボードのテストプログラム
# 2019/10/30 by jr1gdy
#
use utf8;
use Encode qw/ from_to encode decode encode_utf8 decode_utf8 /;
#以下テストプログラム
my $str1="テスト 123abc次の行\n";
my $str2="追加の 文字列追加の行\n";
&pb_clear();
my $pbstr = &pb_sum_copy($str1);
print encode_utf8("一回目 = $pbstr\n");
$pbstr = &pb_sum_copy($str2);
print encode_utf8("二回目 = $pbstr\n");
my $paste_str = &pb_paste();
print encode_utf8("クリップのペースト: $paste_str\n");
#&pb_clear();
print("Tyin >");
while(my $stdin = <STDIN>){ #キーボードからのテスト
if($stdin eq "q"){exit;}
$stdin = decode_utf8($stdin);
&pb_sum_copy($stdin);
}
print encode_utf8(&pb_paste);
#---サブルーチン-----------------------------------------------------------
sub pb_clear{#クリップボードのクリア
`echo '' | pbcopy`;
}
#ペースト
sub pb_paste{
my $str = `pbpaste`;
$str =~ s/^\n//;#最初と最後に改行が入って来るので削除する
chomp($str);
$str = decode('utf8', $str);
return $str;
}
#クリップへコピー
sub pb_copy{
my ($str)=@_;
$str = encode('MacJapanese',$str);
`echo '$str' | pbcopy`;
return;
}
#クリップへ追加コピー
sub pb_sum_copy{
my ($str) = @_;
my $sum_str = &pb_paste($str);
$sum_str .= $str;
&pb_copy($sum_str);
return $sum_str;
}
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
top2.jpg 536件
[詳細]
top.jpg 138件
[詳細]
R0012953.jpg 2396件
[詳細]
R0012954-2.jpg 1335件
[詳細]
ja_follow_me-a.png 1270件
[詳細]
op.jpg 1365件
[詳細]
