|
安久津さん今日は、ひろです。
> んで、●[1]の findup で次のように変換されます。
>
> ク゛ラフィックス
実はこれ気付いたはいたんです(^^)。ただこれのために file の頭になに
か任意の文字を挿入しておくのは好きじゃないんですよね (最後に消しても
見た目は、何も編集していなくても「更新」になってしまうので)。あと一般
的な日本語の文章は、段落の最初は字下げを行うので、あれでごまかしてい
ます(^^)。
しかし自分で使うのはまだしも、公の場に投稿する場合は不味いですねm(_|_)m。
以下の物に置き換えます。
//-------------------------------------------------------------------
main:
#count = 0;
disabledraw;
#orgx=x;
#orgy=y;
call save_search;
gofiletop;
insert "\n";
gofiletop;
call sear_hankaku;
call reset_search;
gofiletop;
delete;
moveto #orgx,#orgy;
endmacro;
save_search://*******検索状態を保存
#reg_search=getininum("hidemaru.ini","Env","SelectFound");
if(!#reg_search){
writeininum "hidemaru.ini","Env","SelectFound",1;
envchanged;
}$search=searchbuffer;
#search=searchoption;
return;
reset_search://******検索を初期状態に戻す
if(!#reg_search){
writeininum "hidemaru.ini","Env","SelectFound",#reg_search;
envchanged;
}setsearch $search, #search;
return;
sear_hankaku:
searchdown "[。-゚]+",regular;
// ^^^^全て半角
while(result){
call han2zen;
#count = #count + 1;
finddown;
}return;
han2zen:
tozenkakukata;
escape;
return;
//-------------------------------------------------------------------
> # searchdown "[。-゜]+",regular; は 0xA1 0xDF でないです。
> # 0x8142 0x814B の全角になっています。
> # たぶんメーラーの自動変換ではないでしょうか?
安久津さんは何を使って、秀ネットを巡回されているのでしょうか? 私は
秀Term を使っていますが、投稿時・読み込み時共に記録されている log は
問題なく半角のままです。
もし mail client による転送によってこういったことが起きるのならば、
半角カタカナが捕まれている場合は、送付 file にするなど、なにか対策が
必要だと思います。->秀ネット担当様
|
|