「ひらがな／カタカナ変換」を編集中 (節単位)

== ひらがな／カタカナ マルチカーソル対応版 (トグル変換未対応) by Kuro ==
Mery Ver 3.0.0 のマルチカーソルに対応する例として sukemaru さんのソースコードをもとにカスタマイズしてみました。

変換処理の部分は手を加えずメソッド化しただけです。

マクロからマルチカーソルの位置を取得することはできるのですが、マルチカーソルを設置する機能がないので複数選択の状態を復元することができないためトグル変換に対応できていません。

複数の選択範囲に対して変換処理を行うときに、ひらがな・カタカナ変換のように文字数・行数が変化しないものはこのようにシンプルに書けますが、変換前と変換後で文字数・行数が変わる場合は複数選択の位置を再計算してやる必要があるのでもう少し大変だと思います。

追記: よく見ると「わ゛」あたりの変換は文字数が変わっているので、このままだと位置がずれそうです。
→ とりあえず暫定で文字数が変化したときに再計算するようにしてみましたが、少々強引な気もします。(2020/03/15)

<syntaxhighlight lang="javascript">
#title = "ひらがな／カタカナ変換"
#tooltip = "ひらがな／全角カタカナ のトグル変換"
#icon = "文字_あア[1].ico"
// #icon = "Mery用 マテリアルデザインっぽいアイコン.icl", 324

// ---------- ▼ 設定項目 ▼ ----------

// ■ 選択範囲がないとき
var autoSelection = 1;
  /**
   * 0: なにもしない
   * 1: カーソル位置の単語を自動選択
   * 2: カーソル位置の行全体（表示行）を自動選択
   * 3: カーソル位置の行全体（論理行）を自動選択
   * 4: 文書全体を自動選択
   */

// ---------- ▲ 設定項目 ▲ ----------

var d = editor.ActiveDocument,  s = d.selection;
var isEmpty = s.IsEmpty;

if ( d.ReadOnly ) {
  Status = "　このドキュメントは書き換え禁止です。";
}
else if ( isEmpty && autoSelection == 0 ) {
  Status = "　選択範囲がありません。";
}
else {
  Redraw = false;
  var sx = ScrollX,  sy = ScrollY;

  // 以下、変更した箇所
  // ---------------------------------ここから---------------------------------
  // もともとここにあった処理は下部の Convert 関数にそのまま移動

  // 複数選択を保持しておくための配列 (SetActivePoint を使うと複数選択が解除されるため、事前に選択箇所を格納しておく必要がある)
  var selections = [];

  // マルチカーソルの場合、document.selection.Count は 0 より大きい値が返る
  if (document.selection.Count > 0) {
    for (var i = 0; i < document.selection.Count; i++) {
      // GetTopPointX、GetTopPointY、GetBottomPointX、GetBottomPointY のみ、第二引数に 0 以上の値を指定すれば複数選択の箇所が取得できる
      selections.push({
        tx: s.GetTopPointX( mePosLogical, i ),
        ty: s.GetTopPointY( mePosLogical, i ),
        bx: s.GetBottomPointX( mePosLogical, i ),
        by: s.GetBottomPointY( mePosLogical, i )
      });
    }
  // マルチカーソルではない場合
  } else {
    // GetTopPointX、GetTopPointY、GetBottomPointX、GetBottomPointY は第二引数を省略するか -1 を指定すれば現在のカーソル位置が取得できる
    selections.push({
      tx: s.GetTopPointX( mePosLogical ),
      ty: s.GetTopPointY( mePosLogical ),
      bx: s.GetBottomPointX( mePosLogical ),
      by: s.GetBottomPointY( mePosLogical )
    });
  }

  BeginUndoGroup();
  try {
    var cnt = 0;
    var len = 0;
    for (var i = 0; i < selections.length; i++) {
      // 複数選択の箇所に現在のカーソルを設定する (選択範囲の開始と終了が逆になることがあるけど気にしない方向で…)
      s.SetActivePoint( mePosLogical, selections[i].bx, selections[i].by, false );
      s.SetActivePos( s.GetActivePos() + cnt, false );
      s.SetActivePoint( mePosLogical, selections[i].tx, selections[i].ty, true );
      s.SetActivePos( s.GetActivePos() + cnt, true );
      len = d.Text.length;
      Convert(s.IsEmpty, s.GetActivePointY( mePosLogical ), ( isEmpty ) ? s.GetActivePos() : -1);
      cnt += d.Text.length - len;
    }
  } finally {
    EndUndoGroup();
  }
  // 今のところマクロから複数選択を設定する仕組みがないので複数の選択範囲を復元することはできません
  // ---------------------------------ここまで---------------------------------

  ScrollX = sx;  ScrollY = sy;
  Redraw = true;
}

// Convert メソッドの中身はもとのソースから変更なし
// isEmpty、ay、pos は選択範囲に応じて更新する必要があるため引数で渡す
function Convert(isEmpty, ay, pos) {
  // 非選択時には自動選択
  if ( isEmpty ) {
    if ( autoSelection == 1 ) {
      s.SelectWord();
      if ( s.GetActivePointY( mePosLogical ) != ay ) {
        s.SetActivePos( pos );
      }
    }
    else if ( autoSelection == 2 || autoSelection == 3 ) {
      var posMode = autoSelection - 1;
      s.SetAnchorPoint( posMode, 1, s.GetActivePointY ( posMode ) );
      s.EndOfLine( true, posMode );
    }
    else if ( autoSelection == 4 ) { s.SelectAll(); }
  }
  var st = s.Text;

  if ( st ) {
    var anc = s.GetAnchorPos(),  act = s.GetActivePos();
    var tp = Math.min( anc, act );
    var tmp;

    // ひらがな → 全角カタカナ変換 「ゔ ゕ ゖ → ヴ ヵ ヶ」含む
    tmp = st.replace( /う[゛ﾞu\3099]/g, "ヴ" )
            .replace( /[\u3041-\u3096\u309D\u309E]/g, function( chr ) {
             return String.fromCharCode( chr.charCodeAt( 0 ) + 0x60 );
    } );
    // ※ unicode 文字に対応できるときは「ヷ ヸ ヹ ヺ」に変換
    if ( d.Encoding >= 65000 ) {
      tmp = tmp.replace( /ワ[゛ﾞu\3099]/g, "ヷ" ).replace( /ヰ[゛ﾞu\3099]/g, "ヸ" )
               .replace( /ヱ[゛ﾞu\3099]/g, "ヹ" ).replace( /ヲ[゛ﾞu\3099]/g, "ヺ" );
    }

    if ( st == tmp ) {
      // 全角カタカナ → ひらがな変換
      // ※ 「ヷ ヸ ヹ ヺ」は「かな＋濁点」に分解する
      tmp = st.replace( /\u30F7/g, "わ゛" ).replace( /\u30F8/g, "ゐ゛" )
              .replace( /\u30F9/g, "ゑ゛" ).replace( /\u30FA/g, "を゛" )
              .replace( /[\u30A1-\u30F3\u30FD\u30FE]/g, function( chr ) {
               return String.fromCharCode( chr.charCodeAt( 0 ) - 0x60 );
      } );
      // ※ unicode 文字に対応できるときは「ヴ ヵ ヶ → ゔ ゕ ゖ」に変換
      if ( d.Encoding >= 65000 ) {
        tmp = tmp.replace( /[\u30F4-\u30F6]/g, function( chr ) {
                  return String.fromCharCode( chr.charCodeAt( 0 ) - 0x60 );
        } );
      }
      // ※ Shift_JIS などでは「ヴ ヵ ヶ → う゛ ヵ ヶ」
      else {
        tmp = tmp.replace( /\u30F4/g, "う゛" );
      }
    }

    if ( st != tmp ) {
      // ブックマークを保存
      var bmArray = [];
      s.SetActivePoint( mePosLogical, 1, 2 );
      if ( s.PreviousBookmark() ) {
        bmArray.push( s.GetActivePointY( mePosLogical ) );
      }
      s.SetActivePos( 0 );
      while ( s.NextBookmark() ) {
        bmArray.push( s.GetActivePointY( mePosLogical ) );
      }
      s.SetActivePos( anc );  s.SetActivePos( act, true );
      ScrollX = sx;  ScrollY = sy;

      // 選択範囲を変換
      s.Text = tmp;
      act = s.GetActivePos();

      // ブックマークを復元
      var bmCount = bmArray.length;
      if ( bmCount ) {
        editor.ExecuteCommandByID( 2129 );  // ブックマークをクリア
        for ( var i = 0; i < bmCount; i ++ ) {
          s.SetActivePoint( mePosLogical, 1, bmArray[i], false );
          editor.ExecuteCommandByID( 2126 );  // ブックマークを設定/解除（設定）
        }
      }
      s.SetActivePos( tp );  s.SetActivePos( act, true );
    }
    else {
      Status = "　ひらがな／カタカナ がありません。";
      if ( pos >= 0 ) { s.SetActivePos( pos ); }
    }
  }
}
</syntaxhighlight>