//////////////////////////////////////////////////
// UNFOLD.MAC by nyan
// 秀丸マクロ
//
// 行末の改行を取り除きます。画面上で一定の桁数より後ろにある改行のみ
// を取り除き、前の方にある改行は残します。
//

#len=val(input("何桁以降の行末から改行を取り除きますか？",str(width-4)));
if((!result)||(#len>width)) endmacro;
gofiletop;
while(1) {
	golineend2; #thisline=(x>=#len);
	if(#prevline) {golinetop2; backspace; golineend2;}
	if(code==eof) break;
	right; #prevline=#thisline;
}