| |
kendoさん，こんにちは。
》 たとえばカッコ記号の変わりに ▼ ▲をカッコと見なして、それである文
》字列を括って前処理したテキストで、その括られた部分を捨てるか、または別
》の場所（テキストの末尾など）に吐き出すマクロは可能でしょうか。前処理さ
》れていたテキストからは▼文字列▲部分は消えてなくなるわけです。
まずはこれからやってみます。次のマクロでできますか？
//------- CutMiddle.mac ----------------------------
// 指定文字間の文字列を切り取る
$kd1 = "▲";//前文字初期値：変更できます
$kd2 = "▼";//後文字初期値：変更できます
$k1 = input( "指定する前文字は？", $kd1 );
if( $k1 == "" ) endmacro;
$k2 = input( "指定する後文字は？", $kd2 );
if( $k2 == "" ) endmacro;
disabledraw;
if( selecting ) {
#sel = 1;
#handle1 = hidemaruhandle(0);
cut;
openfile "/h";
#handle2 = hidemaruhandle(0);
paste;
}
gofiletop;
#i = 1;
while( 1 ) {
searchdown2 $k1;
if( !result ) break;
beginsel;
searchdown $k2;
if( !result ) break;
right;
cut;
#i = #i + 1;
}
enabledraw;
question "切り取った文字列を書き出しますか？";
if( result ) {
gofileend;
insert "\n";
while( #i > 1 ) {
insert "\n";
up;
poppaste;
golinetop;
delete;
golineend;
backspace;
golinetop;
#i = #i - 1;
}
insert "【切り取った文字列】\n";
}
if( #sel ) {
gofileend;
insert "\n";
selectall;
copy;
setactivehidemaru #handle1;
paste;
closehidemaruforced #handle2;
}
endmacro;
//----------------------------------------------//
では， (^^)/~
山紫水明
|
|