絵文字を含むファイルがSJISとして開かれて文字化けする

絵文字を含むファイルがSJISとして開かれて文字化けする現況である、絵文字に含まれている有害な制御記号を削除するサクラエディタ・マクロ

※サクラエディタ・マクロはSJIS／CR+LFで保存する。

S_ReplaceAll('[\r\n]+', '\n', 148);

S_ReplaceAll('[\x{0000}-\x{0008}\x{000B}-\x{001F}\x{007F}-\x{009F}\x{200B}-\x{200F}\x{202A}-\x{202E}\x{2060}-\x{206F}\x{FE00}-\x{FE0F}\x{FEFF}]',  '',  44);

//完了
S_ReplaceAll('^[\r\n]+', '', 44);
//S_ReplaceAll('[\n]+', '\r\n', 44);
S_ReDraw(0);
S_SelectAll(0);
S_Copy(0);