「テキスト整形」を編集中 (節単位)

== 基本コード ==
<syntaxhighlight lang="javascript" copy>
//■テキスト整形
//　2013-09-15 - 2019-06-01

//■拡張コード：リスト
var f = [];
// ----------------- ↓ここより下に拡張コードを追加

// ----------------- ↑ここより上に拡張コードを追加
/*■拡張コード：書式
//▼コマンド
f.push(["コマンド名","オプション",function(引数){ 処理 }]);
//▽オプション
  s : 実行に範囲選択を要求 (require selection)
  c : 実行にクリップボードを要求 (require clipboard)
  L : 行選択してから処理 (select Line)
  O : 非選択時はすべて選択してから処理 (select OR all) ※実験的
//▽引数(arguments)
  第1引数 = Document.Selection.Text
  第2引数 = Document.Selection
//▽処理の戻り値(return value)
  String/Array以外 : 選択範囲に対し何もしない
  "abcd"           : abcd に置換後、abcd を選択
  ["ab","cd"]      : abcd に置換後、ab と cd の間に移動
  ["ab","cd",""]   : abcd に置換後、cd を選択
//▼サブメニュー
f.push(["メニュー名",function(f){ コマンドなど }]);
//▼セパレーター
f.push(["--------"]);
// ----------------- */

//■メソッド：連続置換
//"string".replaceBatch([ [検索1,置換1],[検索2,置換2],… ]);
String.prototype.replaceBatch = function(a){ //▲引数の型はチェックしてない
  var _this=this, i=0, n=a.length;
  if (!a[0]) i++;
  if (!a[n-1]) n--;
  for (; i<n; i++) {
    if (typeof a[i][0]==="string") //◆特殊文字をエスケープし、"g"フラグを付加
      a[i][0] = new RegExp(a[i][0].replace(/[$()*+.?\[\\\]^{|}]/g,"\\$&"),"g");
    _this = _this.replace(a[i][0],a[i][1]);
  }
  return _this;
};

(function(){
//■実行コード
var Sel = Document.Selection;
var isSelEmpty = Sel.IsEmpty;
var isClipEmpty = !ClipboardData.GetData();
var cmd = [], cid = 0; //コマンド, ID
//リストからメニュー作成
var Menu = CreatePopupMenu();
(function ListToMenu(List, Menu) {
  for (var i=0,_L; _L=List[i]; i++) {
    if (typeOf(_L[0]) !== "String") continue;
    switch (_L.length) {
    case 3: //◆コマンド      _L = ["コマンド名","オプション",function]
      if (typeOf(_L[1]) !== "String") break;
      if (typeOf(_L[2]) !== "Function") break;
      ++cid;
      var isGray = (/\bs\b/.test(_L[1]) && isSelEmpty)
                || (/\bc\b/.test(_L[1]) && isClipEmpty) ;
      Menu.Add(_L[0]+"\t"+_L[1], cid, isGray? meMenuGrayed: 0);
      if (isGray) break;
      cmd[cid] = { func: _L[2]
      , selLine:  /\bL\b/.test(_L[1])
      , selOrAll: /\bO\b/.test(_L[1])
      };
    break;
    case 2: //◆サブメニュー  _L = ["メニュー名",function]
      if (typeOf(_L[1]) !== "Function") break;
      var sub_f = [], sub_Menu = CreatePopupMenu();
      _L[1](sub_f);
      Menu.AddPopup(_L[0], sub_Menu);
      ListToMenu(sub_f, sub_Menu); //再帰：サブメニュー作成
    break;
    case 1: //◆セパレーター  _L = ["--------"]
      if (!/^-+$/.test(_L[0])) break;
      Menu.Add("", 0, meMenuSeparator);
    break;
    }
  }
}(f, Menu));
//ポップアップメニューを表示して処理
main: if (cid = Menu.Track(mePosMouse)) { //※キャンセル(Esc)時は 0 で終了
  var invertPos = Sel.GetActivePos() < Sel.GetAnchorPos();
  if (cmd[cid].selLine) selectLine(Sel);
  if (cmd[cid].selOrAll && isSelEmpty) Sel.SelectAll();
  var res = cmd[cid].func(Sel.Text, Sel);
  if (typeOf(res) === "String") res = ["",res,""];
  if (typeOf(res) !== "Array") break main;
  
  var head = res.shift(), tail = res.pop() || "", body = res.join("");
  Sel.Text = head + body + tail;
  var acp = Sel.GetActivePos() - tail.replace(/\r\n/g,"\n").length;
  var anp = acp                - body.replace(/\r\n/g,"\n").length;
    //※クリップボードなどCR+LFが含まれる場合、1字と数えなければズレる
  Sel.SetActivePos(invertPos? anp: acp);
  Sel.SetAnchorPos(invertPos? acp: anp);
}

//■型判別
function typeOf(obj) {
  return (obj===null)? "Null": (obj==null)? "Undefined":
    Object.prototype.toString.call(obj).slice(8,-1); //"[object Type]".slice
};
//■論理行選択
function selectLine(Sel) {
  var ty = Sel.GetTopPointY(mePosLogical);
  var by = Sel.GetBottomPointY(mePosLogical);
  var bx = Sel.GetBottomPointX(mePosLogical);
  var nn =(Sel.Text.match(/\n/g)||[]).length;
  if (bx===1 && nn<=by-ty && nn) by--; //末尾改行対策
    //下端が論理行頭 && 矩形選択でない && 複数行
  Sel.SetActivePoint(mePosLogical, 1, by);
  Sel.EndOfLine(false, mePosLogical);
  Sel.SetAnchorPoint(mePosLogical, 1, ty);
};

}());
</syntaxhighlight>