コメントマーク付け外し

提供:MeryWiki
2019年12月1日 (日) 07:17時点におけるSukemaru (トーク | 投稿記録)による版 (→‎sukemaru 版)
ナビゲーションに移動 検索に移動

手石 版 (2014/03)

コメントマークの付け外しをするマクロです。
js 以外の拡張子に対応させる時は、最後の関数に追加してください。

更新履歴

  • 2013/03/28
    • 無題のときに対応しました。
  • 2014/03/22
    • できるだけ短くしてみました。

ソースコード

// コメントマーク.js
// 行頭コメントマークを付けたり外したり。
// 空白文字の後ろにあっても外す。つけるときは行頭に。

var sel = Editor.ActiveDocument.Selection;
var ty = sel.GetTopPointY( mePosLogical );
var bx = sel.GetBottomPointX( mePosLogical );
var by = sel.GetBottomPointY( mePosLogical );
if ( bx == 1 && ty != by ){ by--; };
sel.SetActivePoint( mePosLogical, 1, ty, false );
sel.SetActivePoint( mePosLogical, 1, by+1, true );

var mark = commentMark();
var reg = new RegExp( "^([ \t]*" + mark + "\\s?)?(?=.)", "mg" );
mark += " ";

sel.Text = sel.Text.replace( reg, function( s0, s1 ){ return ( s1 == undefined )? mark : "" } );

function commentMark(){
	switch( Document.Mode.toLowerCase() ){
	case "text" : return "//";
	case "javascript" : return "//";
	case "tex" : return "%";
	case "ruby" : return "#";
	default : return Prompt( "コメントマーク?", "//");
	};
};

masme 版

マクロ「テキスト整形」の「行頭 // を挿入/削除」を独立・改造したものです。
論理行頭にコメント文字が有れば削除(アンコメント)し、無ければ挿入(コメントアウト)します。

  • 空白行(改行/半角空白/水平タブのみの行)はコメントアウトしないようにしました。
  • 初期設定では、インデントされたコメント文字には対応していません。
    「indent」変数を「false」から「true」に書き換えると、手石 版のように行頭空白後のコメント文字も削除するようになります。
    インデントへの対応は、手石 版と同様に削除限定です。挿入するときは論理行頭になります。
  • 編集モードによる定義切替は、マクロ「Eclipse風コメントアウト」を参考にしました。

更新履歴

  • 2019/06/01
    • コメント文字を付け外しした次の行に変更行の印がつかないようにした。
      末尾の改行(次の行頭)を範囲に含めず書き換えるように変更。
  • 2016/02/28
    • 編集モードによる定義切替が正常に機能していないミスを修正。
  • 2015/02/14
    • 特殊文字があると誤動作する不具合を再修正。
  • 2015/02/14
    • 「行コメント文字の定義」に正規表現の特殊文字があると誤動作する不具合を修正。
    • 矩形選択(始点or終点が左下かつ論理行頭)時、下端の行が範囲から漏れる不具合を修正。
    • テキストの処理方法を変更。
  • 2014/02/22
    • 初版公開。

ソースコード

//■行コメントのアン・アウト
// 2014/02/11-2019/06/01
//・行頭にコメント文字が有れば削除し、無ければ挿入する。空白行には挿入しない。

//■行コメント文字の定義 ●初期値="//"
var comment = "//";
//■インデントされたコメント文字も削除(true:する/false:しない) ●初期値=false
var indent = false ? "[ \t]*" : "";

//▼編集モードによる定義切替
comment = (function(){
  switch (Document.Mode.toLowerCase()) {
  case "bat":
    return "::";
  case "c#":
  case "c++":
  case "javascript":
    return "//";
  case "ini":
  case "python":
  case "ruby":
    return "#";
  case "visualbasic":
  case "vbscript":
    return "'";
  default:
    return comment;
  }
}());

var Sel = Document.Selection;
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);
Sel.Text = Sel.Text.replace(new RegExp(
  "^("+indent+")"+comment.replace(/[$()*+.?[\\\]^{|}]/g,"\\$&"); //コメント行
 +"|^(?![ \t]*$)" ,"gm") //空白行でない行頭
 ,function($0,$indent){return $0 ? $indent : comment}
);
Sel.SetActivePoint(mePosLogical,1,by+1);
Sel.SetAnchorPoint(mePosLogical,1,ty);


sukemaru 版

「行コメント」マクロ (コメントマーク付けはずし sukemaru版)

ダウンロード >> 「行コメント.zip」(アイコン入り) 最終更新 2019/12/01


masme 版の設定用変数 indent = true の状態(インデントされたコメントマークを削除できる)を下地として、インデントされた行の字下げ位置にあわせてコメントアウト できるようにしました。
選択範囲内のもっとも字下げの少ない位置にあわせてコメントマークを付けられるので、コードブロックのコメントアウトのさいに各行の先頭位置が少しだけ分かりやすくなります。

  • 空白行(タブ文字/半角スペースのみの行と、完全な空行)は無視します。
  • 編集モードによるコメントマーク定義の切り替えは、masme版 (2016/02/28) のコードを翻案しています。
  • 設定変数 comment の定義に ">" などの引用マークを指定すると、引用マークの付けはずしにも利用できます。


「コメントアウトするときは // コメント  や > コメント のようにうしろに半角スペースを入れたいけれど、拾い物のコード内やコピペした文章内の半角スペースなしのコメント行 //コメント や >コメント も手軽にアンコメントしたい」という使い方も想定しています。

  • コメントマークの定義の末尾に「半角スペース×1」がついている状態をデフォルト状態にしてあります(初期値も編集モードごとの個別定義も)。


選択範囲が1行内の場合は、選択範囲の先頭位置で コメントアウト/アンコメント できますので、行の途中からのインラインコメントアウトができます。

  • 選択範囲の先頭が空白文字なら字下げオプションに準じて処理します。
  • 行の途中から1行内の // インラインコメント部分 を範囲選択している状態で Ctrl キーを押しながらマクロを実行した場合は、選択範囲の先頭のコメントマークを削除します(アンコメント)。


このマクロは、pizz 氏作成の「GetKeyState.exe(キー状態取得実行ファイル)」で機能を拡張できます。
マクロライブラリから ZIP ファイルをダウンロードして Mery\Macros フォルダに解凍してください。

Ctrl キーを押しながら実行したときは、コメントアウト状態の反転ではなく、選択範囲をふくむ行全体を 強制的にコメントアウト します。

  • // コメント行 を含むコードブロックをまとめてコメントアウトするさいに、既存の // コメント行 を // // 二重にコメントアウト できます。
  • 強制コメントアウトでコメントマークを挿入する位置は、基本的に 行頭 に限定されます。
※ 設定項目で inLineEnable = true; の場合は、選択範囲が1行内のときに選択範囲の先頭位置で強制コメントアウトします。
  • 「GetKeyState.exe」を導入している場合、Ctrl キーの押し下げ状態でマクロの機能を切り替えるので、このマクロに ショートカットキー を割り当てる場合は、「Ctrl キーをふくむキーパターン」と「Ctrl キーをふくまないキーパターン」の2つを登録する必要があります。
e.g.1 「Ctrl + /」キー と 「Alt + /」キー
e.g.2 「Ctrl + Alt + /」キー と 「Alt + /」キー
※ ツールバーアイコンやメニューから実行するときも、Ctrl キーを押し下げながらのクリックにより強制コメントアウトモードになります。
  • 「GetKeyState.exe」を導入してない場合でも、"強制コメントアウト" 以外の機能はそのまま使用できます。




2019/11/10 22:40
ブックマーク行のあるドキュメント/選択範囲でこのマクロを実行しても、ブックマーク状態を保持できるようにしました。

  • Mery ver 2.8.6 でブックマークを正常に保持できることを確認してあります。
それ以前のバージョンでは、Mery 本体側のブックマーク機能の仕様が安定していないので、ブックマークを正しく復元できないことがあります。
※ Mery ver 2.8.x でブックマークの探索や再設定の処理が速くなったので、文書全体のブックマーク行番号を保存 → JavaScript の replace() メソッドでコメントアウト/アンコメント → ブックマークをクリア → 保存したブックマーク情報で復元 という処理に変更しました (ver 2.6.x や 2.7.x の Mery では十分な速度が出なかったり、ブックマークの復元処理がうまくいかないことがあったりするかもしれません)。




注意事項 (仕様上の制限) ▼

  • 動作モードの優先順位
  1. Ctrl キーを押しながらの強制コメントアウト(行の先頭で強制コメントアウト)
  2. インラインコメントアウト/アンコメント(行の途中からのコメントアウト)
  3. 字下げオプションに応じたコメントアウト/アンコメントのトグル(反転)
  • 字下げルールが「半角スペースのみ または タブ文字のみである」か、混在する場合には「半角スペースとタブ文字の出現順序が同じである」という前提になっています。タブ文字ひとつを半角スペースひとつと同じように数え、表示上の幅で評価しません。
半角スペースとタブ文字が不規則に混在しているなら、字下げオプションの変数を indentMode = 0 または indentMode = 1 にして使ってください。手石・masme版と同様に行の先頭でコメントアウトします。
  • "GetKeyState" を導入しない場合は、コメントアウトの状態を反転させるだけのマクロとなり、// コメントアウトされている行 を二重にコメントアウトすることはできなくなります。
字下げオプションの設定値が 0 でも、行頭1文字目にコメントマークがある行は、かならずアンコメントされます。
  • コメントマークの定義が ">" または ">" のときに、行頭が 「>>」 の行で連続実行すると、以下のように作用します。
  • 1回目: さいしょの ">" を削除 (アンコメント)
  • 2回目: つぎの ">" または ">" を削除 (アンコメント)
  • 3回目: 先頭に ">" または ">" を追加 (コメントアウト)
この場合、連続で実行しても アンコメント/コメントアウト トグルによる元の状態への復元はできません。
  • コメントマーク末尾の半角空白 あり/なし の差分について。
  • コメントマーク定義の末尾につける空白は半角スペース1文字しか想定していません。
  • コメントマークの定義文字列に「正規表現のメタ文字」が含まれていても大丈夫なはずですが、保証はいたしかねます。
  • もしも誤動作などで使いづらくなってしまうことがあった場合は、設定項目 var varEnable = true; の "true" を "false" にしてください。
  • コメント定義の先頭には空白文字をつけないでください。
行コメント文字の変数 comment = "hoge"; の先頭が空白文字だとアンコメントできなくなるので、先頭の空白文字は無視します。




使用例

※コメントマークの定義文字列: "//"

例0-1. 字下げに非対応だと…

※ indentMode = 0; varEnable = false; のばあい
//comment 0     =>  |// //comment 0     =>  |//comment 0   
// comment 1    =>  |comment 1          =>  |// comment 1  
  // comment 2  =>  |//  // comment 2   =>  |  // comment 2

例0-2. 字下げには非対応でも…

※ indentMode = 0; varEnable = true; (sukemaru版 独自拡張)
//comment 0     =>  |comment 0          =>  |// comment 0  
// comment 1    =>  |comment 1          =>  |// comment 1  
  // comment 2  =>  |//  // comment 2   =>  |  // comment 2

例1-1. 6行まとめて選択すると…

※ indentMode = 1; varEnable = false; (従来版とおなじ動作)
//comment 0     =>  |// //comment 0     =>  |//comment 0   
// comment 1    =>  |comment 1          =>  |// comment 1  
  // comment 2  =>  |  comment 2        =>  |//   comment 2
  hoge          =>  |//   hoge          =>  |  hoge        
    fuga        =>  |//     fuga        =>  |    fuga      
      piyo      =>  |//       piyo      =>  |      piyo

例1-2. 6行まとめて選択でも…

※ indentMode = 1; varEnable = true; (sukemaru版 独自拡張)
//comment 0     =>  |comment 0          =>  |// comment 0  
// comment 1    =>  |comment 1          =>  |// comment 1  
  // comment 2  =>  |  comment 2        =>  |//   comment 2
  hoge          =>  |//   hoge          =>  |  hoge        
    fuga        =>  |//     fuga        =>  |    fuga      
      piyo      =>  |//       piyo      =>  |      piyo

例2-1. 下3行だけを選択すれば…

※ indentMode = 2 or 3; (sukemaru版 独自拡張)
//comment 0     =>  |//comment 0        =>  |//comment 0   
// comment 1    =>  |// comment 1       =>  |// comment 1  
  // comment 2  =>  |  // comment 2     =>  |  // comment 2
  hoge          =>  |  // hoge          =>  |  hoge        
    fuga        =>  |  //   fuga        =>  |    fuga      
      piyo      =>  |  //     piyo      =>  |      piyo

例2-2. 下4行を選択だと…

※ indentMode = 2 or 3; (sukemaru版 独自拡張)
//comment 0     =>  |//comment 0        =>  |//comment 0   
// comment 1    =>  |// comment 1       =>  |// comment 1  
  // comment 2  =>  |  comment 2        =>  |  // comment 2
  hoge          =>  |  // hoge          =>  |  hoge        
    fuga        =>  |  //   fuga        =>  |    fuga      
      piyo      =>  |  //     piyo      =>  |      piyo

例3. 6行まとめて選択しても、コメントアウトとアンコメントで別々の先頭位置を使うこともできる

※ indentMode = 3; varEnable = true; (sukemaru版 独自拡張)
//comment 0     =>  |comment 0          =>  |// comment 0  
// comment 1    =>  |comment 1          =>  |// comment 1  
  // comment 2  =>  |  comment 2        =>  |//   comment 2
  hoge          =>  |  // hoge          =>  |  hoge        
    fuga        =>  |  //   fuga        =>  |    fuga      
      piyo      =>  |  //     piyo      =>  |      piyo

例4. 一応、こういうこともできる

※ indentMode = 4; varEnable = true; (sukemaru版 独自拡張)
//comment 0     =>  |comment 0          =>  |// comment 0  
// comment 1    =>  |comment 1          =>  |// comment 1  
  // comment 2  =>  |  comment 2        =>  |  // comment 2
  hoge          =>  |  // hoge          =>  |  hoge        
    fuga        =>  |    // fuga        =>  |    fuga      
      piyo      =>  |      // piyo      =>  |      piyo

例5. コードブロックをまとめて強制的にコメントアウトするなら

Ctrl キーを押しながらマクロを実行 (sukemaru版 独自拡張)
//comment 0     =>  |// //comment 0     =>  |//comment 0   
// comment 1    =>  |// // comment 1    =>  |// comment 1  
  // comment 2  =>  |//   // comment 2  =>  |  // comment 2
  hoge          =>  |//   hoge          =>  |  hoge        
   fuga         =>  |//     fuga        =>  |    fuga      
     piyo       =>  |//       piyo      =>  |      piyo

ソースコード

(最終更新 2019/11/10 22:40)
ダウンロードページ >> 「ファイル:行コメント.zip(アイコン入り)」

#title = "行コメント"
#tooltip = "コメントマーク付けはずし"
#icon = "double-slash[2].ico"
// #tooltip = "Ctrl: 強制コメントアウト"
// #icon = "Mery用 マテリアルデザインっぽいアイコン.icl",215

var start = new Date();
var d = editor.ActiveDocument;

var $ctrl = 0;
var gks = editor.FullName.replace( /[^\\]+$/i , "" )
        + "Macros\\GetKeyState.exe";
if ( new ActiveXObject( "Scripting.FileSystemObject" ).FileExists( gks ) ) {
  var WshShell = new ActiveXObject( "WScript.Shell" );
  // Ctrl キーの状態を取得
  $ctrl = WshShell.Run( '"' + gks + '" ctrl', 0, true );
}

/**
 * --------------------------------------------------------------
 * 「コメントマーク付け外し」マクロ 
 *   Orginal created by 手石 & masme, 2013/03/28 - 2019/06/01 
 * 「行コメント」マクロ (sukemaru版)
 *   Modified by sukemaru, 2018/10/28 - 2019/12/01
 * --------------------------------------------------------------
 * https://www.haijin-boys.com/wiki/コメントマーク付け外し
 * https://www.haijin-boys.com/wiki/%E3%82%B3%E3%83%A1%E3%83%B3%E3%83%88%E3%83%9E%E3%83%BC%E3%82%AF%E4%BB%98%E3%81%91%E5%A4%96%E3%81%97
 * --------------------------------------------------------------
 * ※ このマクロは、以下の外部実行ファイルで機能拡張できます
 * ・pizz 氏作成の "GetKeyState.exe(キー状態取得実行ファイル)" を
 *   マクロライブラリからダウンロードして "Mery\Macros" フォルダに をZIP 解凍
 *  https://www.haijin-boys.com/wiki/GetKeyState.exe(キー状態取得実行ファイル)
 *  https://www.haijin-boys.com/wiki/GetKeyState.exe%28%E3%82%AD%E3%83%BC%E7%8A%B6%E6%85%8B%E5%8F%96%E5%BE%97%E5%AE%9F%E8%A1%8C%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%29
 */

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

// ● 行の途中にある選択範囲をコメントアウトするか?
var inLineEnable = true;	// (※初期値 true )
  /**
   * true  ならインラインコメントアウトする
   *   (選択範囲が1行内のとき、選択範囲の先頭位置でコメントアウト/アンコメント)
   * false ならインラインコメントアウトしない
   *   (各行の先頭位置でコメントアウト/アンコメント)
   */

// ● 字下げされたコメントマークも削除するか?
var mode = 3;	// (※初期値 3 )
  /**
   * mode = 0; なら 追加/削除 する位置は「常に行頭」のみ
   *               (字下げされたコメントマークは削除しない)
   * ※ 1 ~ 4  なら字下げされたコメントマークも削除する。
   *                追加する位置は以下のとおり。
   * mode = 1; なら「常に先頭」にコメントマークを追加する
   *               (例1.の使い方 ※従来版の挿入パターン)
   * ※ 2 ~ 4  なら追加する位置は字下げに対応可。
   * mode = 2; なら追加と削除で同じ判定基準の先頭位置検出をする
   *               (例2.の使い方ができる)
   * mode = 3; なら追加と削除で別々の判定基準の先頭位置検出をする(例3.の使い方)
   * mode = 4; なら「常に各行の字下げ位置」にあわせてコメントマークを追加する
   *               (例4.の使い方)
   */

// ◆ コメントマーク末尾に空白つきで定義しているときに、末尾空白のないコメントマークも削除するか?
var varEnable = true;	// (※初期値 true )
  /**
   * ※ comment = "// ";  のときに  "//こういうコメント行"  もアンコメントするか?
   * varEnable = true  なら削除する
   * varEnable = false なら削除しない
   * ※ 再度コメントアウトするさいは comment で定義したコメントマーク
   *   (末尾空白つき)になる。
   *   コメントマーク comment を末尾に空白なしで定義した場合は無視する。
   */


// ■ 行コメント文字の定義  (※初期値  "// " )
var comment = "// ";
  /**
   * ※ コメントマークの定義に "末尾空白" ありがデフォルト
   * 「var comment = "> ";」にするか、下の定義切替ブロックに
   * 「case "text":  return "> ";」を追加すると、引用マークの付けはずしにもなる
   */


// ▼ コメントマークの定義切替  ▼
comment = ( function() {

  // ▼ 拡張子による定義切り替え ▼
  if ( d.Name.match( /\.def$|\.asm$|\.reg$|\.key$|\.inf$/i ) ) {
    return "; ";
  }

  // ▼ ファイル名による定義切り替え ▼
  else if ( d.Name.match( /^hosts$/i ) ) {
    return "# ";
  }

  // // ▼ ファイル名による定義切り替え ▼
  // else if ( d.Name.toLowerCase() == "hoge.txt" ) {
  //   return "> ";
  // }

  // // ▼ フォルダ名による定義切り替え(正規表現) ▼
  // else if ( d.FullName.match( /\\FUGA\\(?!PIYO\\)/i ) ) {
  //   return "> ";
  // }

  // ▼ 編集モードによる定義切り替え ▼
  else {
    switch ( d.Mode.toLowerCase() ) {
      case "text":
        return "> ";
      case "bat":
        return ":: ";	// return "REM ";	// ": " や "' " でも可
      case "c#":  case "c++":  case "delphi":  case "java":
      case "javascript":  case "jsp":  case "windows script": 
      case "mery_macro_js":  case "mery_macros_js": 
      case "mery macro js":  case "mery macros js":  
      case "janestyle (正規表現用)":
        return "// ";
      case "ini":  case "mery msy":
        return "# ";
      case "perl":  case "perlscript":  case "php":  
      case "python":  case "ruby":   case "powershell":
      case "ini":  case "mery msy":		// ini は "; " でも可
        return "# ";
      case "visualbasic":  case "vbscript":
        return "' ";
      case "hsp":  case "autohotkey":
        return "; ";
      case "sql":
        return "-- ";
      case "tex":
        return "% ";
      default:
        return comment;
    }
  }

} )();

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


// ドキュメントが書き換え禁止ならマクロを閉じる
if ( d.ReadOnly ) {
  Status = " ドキュメントは書き換え禁止です。";
}
// コメントマークが空白文字だけならマクロを閉じる
else if ( /^\s*$/.test( comment ) ) {
  Status = " コメントマークの定義が無効です。";
}

else {
  var cmStr = "";
  Redraw = false;

  // コメントマークの先頭の空白文字を除去
  comment = comment.replace( /^\s+/, "" );
  // コメントマークの末尾が空白文字の場合、末尾空白なしのコメントマークを定義
  if ( varEnable && /\s+$/.test( comment ) ) {
    comStr = comment.replace( /\s+$/, "" );
  }

  // 選択範囲
  var s   = editor.ActiveDocument.selection;
  var tx  = s.GetTopPointX( mePosLogical );
  var ty  = s.GetTopPointY( mePosLogical );
  var bx  = s.GetBottomPointX( mePosLogical );
  var by  = s.GetBottomPointY( mePosLogical );
  var anc = s.GetAnchorPos();
  var act = s.GetActivePos();
  var pos = s.IsEmpty;	// 範囲選択なしのフラグ
  var sx = ScrollX,  sy = ScrollY;

  // 1行内で範囲選択しているとき(インラインモード) ※選択範囲を拡張しない
  var inLine = ( ! pos && inLineEnable && ty == by );

  // 範囲選択なし または 複数行選択のとき(行全体のコメントアウト)
  if ( ! inLine ) {
    // 選択範囲を拡張と末尾改行の調整
    if ( ty < by && bx == 1 ) { by --; }
    s.SetActivePoint( mePosLogical, 1, by );
    s.EndOfLine( false, mePosLogical );
    s.SetAnchorPoint( mePosLogical, 1, ty );
  }

  // ブックマークを保存
  var bmArray = [];
  if ( ty < by ) {
    var tp = s.GetAnchorPos(),  bp = s.GetActivePos();
    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.SetAnchorPos( tp );  s.SetActivePos( bp, true );
    ScrollX = sx;  ScrollY = sy;
  }
  var bmCount = bmArray.length;

  // コメントアウト/アンコメント
  var st = s.Text;
  var ad = AddDeleteComment( st, mode, comment, comStr, $ctrl );
  if ( ad != st ) {		// 変更なしなら undo 履歴に残さない
    s.Text = ad;
  }

  // ブックマークを復元
  if ( bmCount ) {
    var ep = s.GetActivePos();
    editor.ExecuteCommandByID( 2129 );		// ブックマークをクリア
    for ( var i = 0; i < bmCount; i ++ ) {
      s.SetActivePoint( mePosLogical, 1, bmArray[i], false );
      editor.ExecuteCommandByID( 2126 );	// ブックマークを設定/解除(設定)
    }
    s.SetActivePos( ep );
  }

  var gap = ad.length - st.length;

  // 選択範囲なしで実行したときは選択範囲を残さない
  if ( pos ) {
    var id = 1 + d.GetLine( ty, 0 ).search( /[^\s]/ );
    var x = ( gap > 0 && tx >= id ) ? tx + gap :		// コメントアウト
            ( tx > gap && tx > id ) ? tx + gap : tx;	// アンコメント
    s.SetActivePoint( mePosLogical, x, ty );
  }
  // 選択範囲が1行だけのときは選択範囲を復旧する
  else if ( inLine ) {
    s.SetActivePos( ( anc < act ) ? act + gap : act );
    s.SetAnchorPos( ( anc < act ) ? anc : anc + gap );
  }
  // 複数行選択なら拡張した選択範囲を復旧する
  else {
    s.SetActivePoint( mePosLogical, 1, by + 1 );
    s.SetAnchorPoint( mePosLogical, 1, ty );
  }
  ScrollX = sx;  ScrollY = sy;
  Redraw = true;

  var elapsedSec = ( ( new Date() - start ) / 1000 ).toFixed( 3 );
  Status = " 「行コメント」マクロ  [ "
         + elapsedSec.replace( /\./, ". " )
         + " 秒 ]";
}


// ---------- ▼ 関数 ▼ ---------- //

/**
 * 関数 AddDeleteComment( str )
 * 選択範囲の各行の字下げ量をチェックして、字下げ位置にあわせてコメントアウトする
 * コメントマークのチェックには正規表現を使っていないので、誤爆はほぼないはず
 * ※ 変数 comment の先頭が空白文字(半角スペースやタブ、改行コード)だとアンコメントできない
 *   → メインスコープに comment 先頭の空白除去の処理を追加
 * ※ Ctrl キーでの強制コメントアウトを追加
 */ 
function AddDeleteComment( str, mode, comment, comStr, $ctrl ) {
  // Ctrl キー押し下げで強制コメントアウト(※行頭にコメントマーク追加)
  if ( $ctrl == 1 ) {
    return str.replace( /^/gm, comment );
  }

  var a = str.split( "\n" );	// 選択範囲を行単位に分解
  var b = [];
  var len = a.length;
  var comLength = comment.length;
  var comStrLength = comStr.length;
  var id,  c0,  d0;		// 字下げ量(空白以外の文字の最初の出現位置)
  c0 = Infinity,  d0 = Infinity;

  // 選択範囲内の各行の字下げ量を取得	→ 配列 b, c, d に
  for ( var i = 0; i < len; i ++ ) {
    // 各行ごとの字下げ量 (空白行では -1 )
    id = a[i].indexOf( a[i].match( /[^ \t]/ ) );

    b.push( id );	// 各行の字下げ量	→ 削除の基準 b[i]
    if ( mode == 3 && d0 != 0 && id != -1 && id < d0 &&
         a[i].substr( id, comLength ) != comment ) {
      d0 = id;		// 非コメント行の字下げ量
    }
    else if ( mode == 2 && c0 != 0 && id != -1 && id < c0 ) {
      c0 = id;		// 最小の字下げ量
    }
  }

  // 各行をコメントアウト/アンコメント処理
  for ( var i = 0, ai, bi; i < len; i ++ ) {
    if ( b[i] == -1 ) { continue; }		// 空白行はスキップ
    ai = a[i],  bi = b[i];

    // 行頭の空白 b[i] の直後がコメントマークかチェック
    if ( ai.substr( bi, comLength ) == comment ) {
      // アンコメント または コメントアウト
      a[i] = ( mode != 0 || bi == 0 )
           ? ai.substr( 0, bi ) + ai.substr( bi + comLength )
           : comment + ai;
    }

    // コメントマーク定義の末尾が空白文字つき "// " ならば
    // 各行が末尾空白なしの "//" でコメントアウトされているか再チェック
    else if ( comStr && ai.substr( bi, comStrLength ) == comStr ) {
      // アンコメント または コメントアウト
      a[i] = ( mode != 0 || bi == 0 )
           ? ai.substr( 0, bi ) + ai.substr( bi + comStrLength )
           : comment + ai;
    }

    // 非コメント行なら字下げ位置にあわせてコメントマークを追加する
    else {
      a[i] = ( mode == 4 ) ? ai.slice( 0, bi ) + comment + ai.slice( bi )
           : ( mode == 3 ) ? ai.slice( 0, d0 ) + comment + ai.slice( d0 )
           : ( mode == 2 ) ? ai.slice( 0, c0 ) + comment + ai.slice( c0 )
           : /*  else  */    comment + ai;
    }

  }
  return a.join( "\n" );
}


更新履歴

* 2018/08/08: 自家用として改造に着手
* 2018/10/28: マクロライブラリに投稿(※初版)
* 2018/11/02: 字下げ対応の設定項目を indent 変数に一本化(※第2版)
* 2018/11/14: 人柱版コード(コメントマーク末尾の半角空白あり/なしの差分に対応)を追加
* 2018/12/02: インラインモード(行の途中から右側のコメントに対応)を追加
* 2019/03/19: 人柱版コードを統合
*             Ctrl キーで強制コメントアウト可(GetKeyState.exe が必要)
* 2019/03/25: マクロライブラリに投稿(※第3版)
* 2019/04/07: Quit() メソッドを削除(※第3版 ➁)
* 2019/04/11: ブックマーク対応コードを追加(Mery 2.7.0 以上 が必要)
* 2019/04/12: ブックマーク対応を設定変数で切り替え
* 2019/04/15: ブックマーク対応を Shift キーで切り替え(GetKeyState.exe)
              GetKeyState.exe の有無や Mery 本体バージョンの自動チェックを追加
* 2019/04/18: 本体バージョンの自動チェックを関数化
* 2019/10/15: 関数コード内の a[i], b[i] を変数に格納してみた
* 2019/11/10: ブックマークの保守方法を変更(※第4版)
              undo しても選択範囲の復帰可
              Mery 本体バージョンの自動チェックを削除
* 2019/11/10: コードのミスを修正(※第4版 ➁)
              ブックマークの復元がバージョン依存なしになるように変更
* 2019/12/01: 関数コード内の配列 c, d を排除(※第5版)
              複数行選択のときのみブックマークの保存/復元するように変更
*             


おまけ


ブロックコメント

/* と */ と * で複数行のコメントブロックをつくるなら、
カッコで囲う(ポップアップメニューあり)」マクロか「引用符/コメント」マクロで。

例: 字下げされている hoge, fuga, piyo の3行をコメントアウトする
      hoge
        fuga
          piyo
  • カッコで囲う(ポップアップメニューあり)」マクロの「JS コメントアウト2」
    つねに行の先頭へコメントマークを挿入します。
/*
 *        hoge
 *          fuga
 *            piyo
 */
  • 引用符/コメント」マクロの「JS コメントアウト2」
    字下げされたブロックの先頭位置へコメントマークを挿入します。
      /* 
       * hoge
       *   fuga
       *     piyo
       */

※どちらのマクロもアンコメント機能がありますが、「カッコで囲う」マクロは、「引用符/コメント」マクロによって字下げ位置に挿入されたコメントマークを正しく削除できません。


インラインコメントアウト

※どちらのマクロも /* と */ だけでコメントアウトすることもできます。

また、<!-- と --> でのコメントアウトとアンコメントもできます。


  • 「カッコで囲う」マクロは選択範囲内を、「引用符/コメント」マクロは選択範囲のある行全体をコメントアウトします。
例: 「hijklmn」 を範囲選択してコメントアウトする
abcdefghijklmnopqrstuvwxyz

「カッコで囲う」マクロ
abcdefg /* hijklmn */ opqrstuvwxyz
abcdefg <!-- hijklmn --> opqrstuvwxyz

「引用符/コメント」マクロ
/* abcdefghijklmnopqrstuvwxyz */
<!-- abcdefghijklmnopqrstuvwxyz -->
スポンサーリンク