| |
中国語ファイルを日本語ShiftJISまたは日本語EUCとして読み込んだ場合、半
角カナとかJIS第二水準漢字が多数出没して、日本語のひらがなは全然出てこな
い、みたいな感じになると思います。それをマクロで判定して読み込み直しさせ
るってことなら出来ると思いました。
それで試しにマクロを作ってみた感じではこんな風になりました。
if( encode != 1 && encode != 3 ) {
endmacro;
}
#x = x; #y = y;
gofiletop;
$s = searchbuffer;
#f = searchoption;
searchdown2 "[\\xA6-\\xDF\\x82\\x9F-\\x83\\x8F\\x98\\x40-\\xFC\\xFF]"
, regular;
if( result ) {
#code = code;
} else {
#code = 0x8140;
}
setsearch $s, #f;
if( #code <= 0xDF || #code >= 0x9840 ) {
question "簡体字中国語として読み込み直しますか？";
if( result == yes ) {
loadfile filename, gb2312;
endmacro;
}
}
moveto #x, #y;
マクロの内容としては、ファイルの先頭から「半角カナ、または全角ひらがな
／カタカナ、JIS第二水準漢字」のどれかを検索して一番最初にヒットした文字
が半角カナまたはJIS第二水準漢字だったらメッセージ表示する、みたいな、単
純な処理になってます。なので、中国語ファイルすべてでうまくいくかどうかは
あんまり自信は無いですけども…。
これを例えば、「マクロ・マクロ登録・自動起動」の「ファイルを開いた直
後」に登録しておくと、自動で読み込み直しが出来て便利かもしれないです。
よかったらお試しください。
|
|