行末規則で正規表現置換っていうのは、「タグつき正規表現」を使わないとヒッ トした文字を残せないから、改行コードをまたいで置換ができない(改行コード の削除ができない)んですよね。編集時に1行 4000 バイトまで、という制限も あるので、改行を全部取ったりするとエラーになりがちですし。
結局、ファイルに書き出すマクロのほうが楽かも。逆順マクロのアレンジです。 行末であることを認識させる文字の指定は do while 1 の直後の行の "" のなか に書きます。
proc main '行末が特定文字でなければ行つなぎ (2001/10/01) dim n, s$ @MoveFileTop @MoveBeginningLine n = instr(@Pathname$, ".") 'ファイルのあるフォルダに、ファイル名に「_c」を追加してファイル作成 s$ = mid$(@Pathname$, 1, n-1) + "_c." + mid$(@Pathname$, n+1) open s$ for output as #1 do while 1 if instr("-)", right$(@TextCr$(@Line),1)) then print #1, @TextCr$(@Line) else print #1, @TextCr$(@Line); end if @MoveNextLineCr if @Line = @LastLine then exit do loop close #1 end proc |