改行をスペースに置換する秀丸マクロ

↓秀丸エディタでこのようなことができる!(したい人は多分ほぼいない)
改行をスペースに置換する秀丸マクロ_a0003166_21392008.gif
工夫した点
1行あけたい改行(「たちつてと」と「なにぬねの」の間の改行)はスペースに置換しているが、
1行あけたくないけど、行の先頭に来た改行(「さしすせそ」と「たちつてと」の間の改行)はスペースに置換していない。
使い方
・下記のマクロを秀丸エディタに登録する マクロの登録のやりかた
・秀丸エディタのメニューの「その他」→「ファイルタイプ別の設定」→設定の対象「体裁」→折り返しの枠内の「固定」をチェックし、折り返し文字数を設定する
・下記のマクロを実行する(タブが消えて見にくくなっています)

#width = width;//折り返し文字数取得
#count = #width;//スペースのカウンタ(初期値:折り返し文字数)
$space=””;//スペースの文字列変数
//1.文頭の改行を、折り返し文字数分の半角スペースに置換
//折り返し文字数分の半角スペースの文字列を作る
while(#count){
$space=$space + ” “;
#count = #count-1;
}
//文頭の改行を、折り返し文字数分の半角スペースに置換
replaceall “^\n”,$space,regular;
//2.文頭以外の改行を半角スペースに置換
gofiletop; //ファイルの先頭へ
while(code!=eof){
searchdown2 “\n”; //改行を検索
if(!result)break;//改行が無い場合は終了
#x = x; //現在の(改行の)横位置取得
$space=””;//スペースの文字列変数をリセット
//改行が一番左にある場合(=文末に入れた改行がたまたま次の行の左端に来た場合)、スペースの文字列変数を空にする
//改行が一番左より右にある場合、改行の位置に応じた数のスペースを変数に格納
if(#x){
#count = #width – #x; //スペースの数を数えるカウンタ
while(#count){
$space=$space + ” “;
#count = #count-1;
}
}
//改行をスペースに置換
replacedown “\n”,$space,regular;
}



2019-02-16 22:03 | PCメモ