「検索ヒット数表示（選択文字列）」を編集中 (節単位)

=== ソースコード ===
2019/12/03 更新
*全体のヒット件数のうしろに「何件目」のヒットかを追加
*ヒット数のカウント方法を設定変数で指定

<syntaxhighlight lang="javascript">
#title = "ヒット件数（選択文字列）"
#tooltip = "検索ヒット数表示（選択範囲の文字列）"
// #icon = "Mery用 マテリアルデザインっぽいアイコン.icl",19

/**
 * アクティブなタブの文書内から選択範囲の文字列に完全一致するものをカウントする。
 * ヒット件数はステータスバーに表示する。
 * 
 * 選択範囲のある状態でマクロを手動で実行するか
 * イベント「選択範囲が変更されたとき」に設定して自動で実行させる。
 */

var start = new Date();

// ■ 「あああああ」にたいして「ああ」のヒット数 （ture: 2 件、 false: 4 件）
var countMinimum = true;	// Mery の検索方式にあわせるなら false に

// ■ 大文字と小文字を区別するか？ （ture: する、 false: しない）
var matchCase = false;

// ■ ヒット数検索の所要時間を表示するか？
var timerEnable = true;

var d = editor.ActiveDocument, s = d.selection;
var word = matchCase ? word : word.toLowerCase();

if ( word ) {
  Status = "";
  var docu = matchCase ? d.Text : d.Text.toLowerCase();
  var tPos = Math.min( s.GetActivePos(), s.GetAnchorPos() );
  var count = 0, hit = 0, append = "*";
  var next = countMinimum ? word.length : 1;
  var pos = docu.indexOf( word );
  while ( pos >= 0 ) {
    count ++;
    if ( pos <= tPos ) {
      hit = count;
      if ( pos == tPos ) { append = ""; }
    }
    pos = docu.indexOf( word, pos + next );
  }

  Status = ( " ヒット数：" + count + " 件"
             + " ( " + hit + " 件目" + append + " ) "
           ).replace( /(\d)(?=(?:\d{3})+(?!\d))/g, "$1," );
  if ( timerEnable ) {
    Status += "  [ "
            + ( ( new Date() - start ) / 1000 ).toFixed( 3 )
                                               .replace( /\./, ". " )
            + " 秒 ]";
  }
}
</syntaxhighlight>