「階層化マクロメニュー」を編集中 (節単位)

== フォルダ内の文字コード統一 ==
指定したフォルダ内の文字コードを統一します。

階層化マクロメニューは 1 つの文字コードしか扱えないので、事前にこのマクロで文字コードを統一します。

=== 注意事項 ===
複数回実行しても「× 個のファイルを変換しました」と出る場合がありますが、日本語が含まれないファイルは毎回変換される可能性がありますので、正常な動作です。

=== オプション ===
{| class="wikitable"
!charset
|マクロファイルの文字コードです。<br>階層化マクロメニューと同じ文字コードにします。
|-
!ext
|対象にするファイルの指定です。
|}

=== ソースコード ===
<syntaxhighlight lang="javascript" copy>
#include "include/IO.js"
#title = "フォルダ内文字コード変換"

// =========================================================
// オプション設定

// 変換後の文字コード
var charset = "utf-8";
//var charset = "sjis";

// 変換対象のファイル拡張子
var ext = "*.js";
// =========================================================

if (!Editor.EnableTab) {
  Alert("タブを有効にしてください");
  Quit();
}

// 対象のフォルダを指定
var shell = new ActiveXObject("Shell.Application");
var path = shell.BrowseForFolder(0, "文字コードを変換するフォルダを選択してください" , 0x0240 , "");
switch (path){
case null:
case "":
  Quit();
case "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}":
  Alert("「マイコンピュータ」を選択できません");
  Quit();
}

// 開いている文書の一覧
var map = {};
for (var i=0; i<Editors.Count; i++) {
  var e = Editors.Item(i);
  for (var j=0; j<e.Documents.Count; j++) {
    var d = e.Documents.Item(j);
    if (d.FullName) {
      map[d.FullName] = d;
    }
  }
}

// 文字コードをマクロ定数に変換
switch (charset.toLowerCase()) {
case "utf8":
case "utf-8":   charset = meEncodingUTF8WithoutSignature; break;
case "sjis":
case "shift-jis":
case "shiftjis":  charset = meEncodingShiftJIS; break;
case "euc":
case "euc-jp":    charset = meEncodingEUC;  break;
default:      Alert("不明なエンコーディングです");  Quit();
}

// 処理開始
Redraw = false;
var folder = new IO.Folder(String(path));
var count = (function RecursiveConvert(folder){
  var count = 0;

  // ファイル処理
  var files = folder.GetFiles(ext);
  for (var i=0; i<files.length; i++) {
    if (!map[files[i].GetPath()]) {
      Editor.NewFile();
      Editor.OpenFile(files[i].GetPath());
      var d = Editor.Documents.Item(Editor.Documents.Count-1);
      if (d.Encoding == charset || (d.Encoding == meEncodingUTF8WithSignature && charset == meEncodingUTF8WithoutSignature)) {
        d.Close();
      } else {
        count++;
        var text = IO.LoadFromFile(d.FullName, d.Encoding);
        d.Close();
        IO.SaveToFile(files[i].GetPath(), text, charset);
      }
    }
  }

  // フォルダ処理
  var folders = folder.GetFolders();
  for (var i=0; i<folders.length; i++) {
    count += RecursiveConvert(folders[i]);
  }
  
  return count;
})(folder);

Alert(count + " 個のファイルを変換しました");
</syntaxhighlight>