10/07/16 20:33:37 O3aURyh60
>>451
まったく外しているかもしれないが・・・
//----------------------------------------
$s = input("検索語は？");
$r = input("置換語は？");
question "検索語：" + $s + "\n" +
"置換語：" + $r + "\n" + "実行しますか？";
if( result == no ) endmacro;
gofiletop;
#roothandele = hidemaruhandle(0);
while( lineno < linecount2 ) {
tagjump;
selectline;
replaceall $s, $r, inselect;
escapeinselect;
save;
#temphandle = hidemaruhandle(0);
setactivehidemaru #roothandele;
closehidemaru #temphandle;
movetolineno 1, lineno + 1;
#i = #i + 1;
}
message str(#i) + " 個置換しました。";
endmacro;
//----------------------------------------