| |
> 拡張子を .txt にする。
今現在編集しているファイルの拡張子を「.txt」にして保存する、ということ
ならば、例えばこんなマクロになります。
$name = basename2;
if( $name == "" ) {
message "ファイル名が分かりません。";
endmacro;
}
#len = strlen($name);
#x = #len - 1;
while( #x > 0 && midstr($name, #x, 1) != "." ) {
#x = #x - 1;
}
if( #x > 0 ) {
$name2 = leftstr( $name, #x ) + ".txt";
} else {
$name2 = $name + ".txt";
}
question "ファイル名を " + $name2 + " にして保存しますか？";
if( result == yes ) {
saveas $name2;
}
> 文字コードを Shift-JIS にする。
saveasのパラメータでsjisを指定すればいいです。例えば上のマクロの例だと、
saveas $name2;
の所を、
saveas $name2, sjis;
にすればいいです。
|
|