複数行を一行にする秀丸マクロ

秀丸マクロで先頭行に#をつけて、数字を消し、空白行削除、全選択、コピーまで出来たのですが
複数行を一行にするマクロの記述が分からず困っています
以下書いたコードです

やりたいことは以下になります

[マクロ使用前]
00
みかん
01
リンゴ
02
パイナップル
03
白菜
04
トマト

[マクロ使用後（やりたいこと）]
＃みかん#リンゴ#パイナップル#白菜#トマト

[以下のマクロコード結果（複数行を一行に出来ない）]
＃みかん
＃リンゴ
＃パイナップル
＃白菜
＃トマト

///////////////////////////
// ◆ユーザ設定
// 行頭に挿入する文字列
$header = "#";
// 行末に挿入する文字列
$footer = "";
///////////////////////////

// ファイル先頭へ
gofiletop;
#tmplineno = lineno - 1;

// ファイル末尾まで繰り返し
while (code != eof) {

    // 行頭
    moveto 0, #tmplineno;
    insert $header;
    
    // 行末
    moveto linelen, #tmplineno;
    insert $footer;

    //次の行へ
    #tmplineno = #tmplineno + 1;
    movetolineno 1, #tmplineno + 1;
    if (#tmplineno == lineno) break;
}


replaceall ",," , "," , nohilight;
replaceall "# " , "",regular;
replaceall " ","",regular;
replaceall "([0-9]+)","",regular;
replaceall "^\n", "", regular;
replaceall "\#+", "\#", regular;
selectall;
copy;
selectall;