2005/09/05(月) 台風14号接近

　進行速度が遅いので丸１日以上、暴風雨の可能性大。会社の駐車場が少し遠くなった（といっても50メートルほど）ので、昨日、合羽を買っておいてもらった。まず傘は差せない。きょうはまだいいにしても、明日は暴風雨の中を出勤することになりそう。速度が速くならないものか。

文字数計算マクロ

選択した文字列かクリップボードの文字数を計算する秀丸マクロ。改行を含むとうまくいかないのが難点。改良したいところ。

//文字数計算マクロ lettercalc.mac
if(selecting){
    copy2;}
beginclipboardread;
$a = getclipboard;
$count = str(strlen($a));
$count2 = str(strlen($a) / 2);
#a = strlen($a);
if((#a % 2) !=0 ){
    message "全角で"+$count2+".5文字です。\n半角では" + $count + "文字です。";
}else{
    message "全角で"+$count2+"文字です。\n半角では" + $count + "文字です。";}
endmacro;

避難勧告

　午後７時過ぎに出た。山沿いなので土石流の危険があるからだろう。迷ったが、万一のことを考えて避難することにした。僕と長男は実家へ、家内と娘２人は叔母さんのマンションへ。実家へ行く途中、通行止めの道路があった。小さな川が氾濫したのか？ 仕方がないので少し回り道。風雨は強いが、暴風雨というほどではない。

　実家に着いて家内の携帯に電話してみたら出ない。叔母さん宅に電話したら、長女が出た。家内は叔母さんと一緒に近くの高校に行ったという。高台にある高校は避難所になっていて、そこにいる叔母さんの息子、つまり家内のいとこに差し入れを持って行ったそうだ。いとこは市職員。避難した人の世話を担当しているとのこと。

　暴風雨は明日の夜中まで続くという。既に警戒水位に達した河川が多い。過去にない被害が出てもおかしくない状況だ。