コメントマーク付け外し

手石 版 (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/11/10)

---

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

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

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

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

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

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

このマクロは、以下の外部実行ファイルで機能を拡張できます。
マクロライブラリから ZIP ファイルをダウンロードして Mery\Macros フォルダに解凍してください。

• pizz 氏作成の "GetKeyState.exe(キー状態取得実行ファイル)" を Macros フォルダに配置してください。

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

• "// コメント行" を含むコードブロックをまとめてコメントアウトするさいに、既存の "// コメント行" を "// // 二重にコメントアウト" できます。
• 強制コメントアウトでコメントマークを挿入する位置は、行頭に限定されます。
• Ctrl キーの押し下げ状態でマクロの機能を切り替えるので、このマクロにショートカットキーを割り当てる場合は、「Ctrl キーをふくむキーパターン」と「Ctrl キーをふくまないキーパターン」の２つを登録する必要があります。

e.g.1 「Ctrl + /」キー と 「Alt + /」キー

e.g.2 「Ctrl + Alt + /」キー と 「Alt + /」キー

※ "GetKeyState" を導入してない場合でも、"強制コメントアウト" 以外の機能はそのまま使用できます。

2019/11/10

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

• ※ ブックマークを正常に保持できるのは Mery ver 2.8.6 以上の場合だけです。

それ以前のバージョンでは、Mery 本体側のブックマーク機能の仕様が安定していないので、ブックマークを正しく復元できません。

---

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

• 動作モードの優先順位

1. Ctrl キーを押しながらの強制コメントアウト（行の先頭で強制コメントアウト）
2. インラインコメントアウト／アンコメント（行の途中からのコメントアウト）
3. 字下げオプションに応じたコメントアウト／アンコメントのトグル（反転）

• 字下げルールが「半角スペースのみ または タブ文字のみである」か、混在する場合には「半角スペースとタブ文字の出現順序が同じである」という前提になっています。タブ文字ひとつを半角スペースひとつと同じように数え、表示上の幅で評価しません。

半角スペースとタブ文字が不規則に混在しているなら、字下げオプションの変数を indentMode = 0 or 1 にして使ってください。手石･masme版と同様に行の先頭でコメントアウトします。

• "GetKeyState" を導入しない場合は、コメントアウトの状態を反転させるだけのマクロとなり、"// コメントアウトされている行" を二重にコメントアウトすることはできなくなります。

字下げオプションの設定値が 0 でも、行頭１文字目にコメントマークがある行は、かならずアンコメントされます。

• コメントマークの定義が　">"　または　">␣"　のときに、行頭が 「>>␣」 の行で実行すると、以下のように作用します。

• １回目: さいしょの　">"　を削除 （アンコメント）
• ２回目: つぎの　">"　または　">␣"　を削除 （アンコメント）
• ３回目: 先頭に　">"　または　">␣"　を追加 （コメントアウト）

この場合、連続で実行しても アンコメント／コメントアウト トグルによる元の状態への復元はできません。

• コメントマーク末尾の半角空白 あり/なし の差分について。

• コメントマーク定義の末尾につける空白は半角スペース１文字しか想定していません。
• コメントマークの定義文字列に「正規表現のメタ文字」が含まれていても大丈夫なはずですが、保証はいたしかねます。
• もしも誤動作などで使いづらくなってしまうことがあった場合は、設定項目 "var varEnable = true;" の "true" を "false" にしてください。

• コメント定義の先頭には空白文字をつけないでください。

行コメント文字の変数 comment = "hoge"; の先頭が空白文字だとアンコメントできなくなるので、先頭の空白文字は無視します。

---

▼ 使用例 ▼

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

例０-１. 字下げに非対応だと…

※ indentMode = 0; varEnable = false; のばあい

//comment 0     =>  |// //comment 0     =>  |//comment 0   
// comment 1    =>  |comment 1          =>  |// comment 1  
  // comment 2  =>  |//  // comment 2   =>  |  // comment 2

例０-２. 字下げには非対応でも…

※ indentMode = 0; varEnable = true; (sukemaru版 独自拡張)

//comment 0     =>  |comment 0          =>  |// comment 0  
// comment 1    =>  |comment 1          =>  |// comment 1  
  // comment 2  =>  |//  // comment 2   =>  |  // comment 2

例１-１. ６行まとめて選択すると…

※ 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

例１-２. ６行まとめて選択でも…

※ 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

例２-１. 下３行だけを選択すれば…

※ 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

例２-２. 下４行を選択だと…

※ 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

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

※ 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

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

※ 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

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

※ 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)
ダウンロードページ　>> 「ファイル:行コメント.zip（アイコン入り）」

※ 以前の 人柱版 の追加コードを統合してあります。

※ Mery 本体が ver 2.8.5 以前であれば、2019/04/07 版を。

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

/**
 * --------------------------------------------------------------
 * 「行コメント」マクロ （コメントマーク付け外し sukemaru版）
 *   Orginal created by 手石 & masme, 2013/03/28 - 2016/02/28
 *   Modified by        sukemaru,     2018/10/28 - 2019/11/10
 * --------------------------------------------------------------
 */

var start = new Date();	// 所要時間計測（開始）
var d = editor.ActiveDocument;
var $ctrl = 0;
var gks = editor.FullName.replace( /[^\\]+\.exe$/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 );
}


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

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

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

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


// ■ 行コメント文字の定義  (※初期値  "// " )
var comment = "// ";
  /**
   * ※ ver 2018/11/14 以降はコメントマークの定義に "末尾空白" ありがデフォルト
   * 「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 ( document.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 ( editor.ActiveDocument.ReadOnly ) {
  Status = "　ドキュメントは書き換え禁止です。";
}
// コメントマークが空白文字だけならマクロを閉じる
else if ( /^\s*$/.test( comment ) ) {
  Status = "　コメントマークの定義が無効です。";
}

else {
  var len = 0,  cmStr = "";
  Redraw = false;

  // コメントマークの先頭の空白文字を除去
  // ※comment の先頭に空白文字（半角空白、タブ文字、改行）があるとアンコメントできない
  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;

  // １行内で範囲選択しているとき（インラインモード） ※選択範囲を拡張しない
  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 );

    // ブックマーク行を収集（選択範囲の先頭行は確認しない）
    if ( ty < by ) {
      var tp = s.GetAnchorPos(),  bp = s.GetActivePos();
      var bmArray = [];
      s.SetActivePos( tp );
      while ( s.NextBookmark() && s.GetActivePointY( mePosLogical ) <= by ) {
        bmArray.push( s.GetActivePointY( mePosLogical ) );
      }
      len = bmArray.length;
      s.SetAnchorPos( tp );  s.SetActivePos( bp, true );
      ScrollX = sx;  ScrollY = sy;
    }
  }

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

  // ブックマークを復元
  if ( len ) {
    var ep = s.GetActivePos();
    for ( var i = 0, len = bmArray.length; i < len; i ++ ) {
      s.SetActivePoint( mePosLogical, 1, bmArray[i], false );
      s.SetBookmark();
    }
    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	// コメントアウト
          : ( gap < tx && tx > id ) ? tx + gap	// アンコメント
          : /*       else        */   tx;		// 空振り（空白行）
    s.SetActivePoint( mePosLogical, x, ty );
  }
  // 選択範囲が１行だけのときは選択範囲を復旧する
  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 先頭の空白除去の処理を追加
 */ 
function AddDeleteComment( str, mode, comment, comStr, $ctrl ) {
  // Ctrl キー押し下げで強制コメントアウト（※行頭にコメントマーク追加）
  if ( $ctrl == 1 ) {
    return str.replace( /^/gm , comment );
  }

  var id, c0, d0;		// 字下げ量（空白以外の文字の最初の出現位置）
  var a = str.split( "\n" );	// 選択範囲を行単位に分解して配列 a に
  var b = [];	// 各行の字下げ量 id を格納する			→ 削除の基準 b[i]
  var c = [];	// id をソートして最小の字下げ量を調べる	→ 追加の基準 c[0]
  var d = [];	// 非コメント行の字下げ量 _id を格納する	→ 追加の基準 d[0]
  var len = a.length;
  var comLength = comment.length;
  var comStrLength = comStr.length;

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

    // 空白行では -1 が返されるので、id をデタラメな値（∞）にして配列 b, c に格納する
    // （-1 は sort のジャマ、JScript では substr の第１引数に使用できない）
    id = ( id < 0 ) ? Infinity : id;	// 空白行はコメントアウトしないから数値は大きく
    b.push( id );
    if ( mode == 2 ) {
      c.push( id );
    }
    // コメント行の数値もデタラメな値（∞）にして _id を配列 d に格納
    else if ( mode == 3 ) {
      id = ( a[i].substr( b[i], comLength ) == comment ) ? Infinity : id;
      d.push( id );
    }
  }

  // 配列 c, d を昇順で並びかえ（ → 最小値 c[0] d[0] だけ使う）
  var CompareForSort = function( first, second ) {
    return  ( first == second ) ?  0
          : ( first < second )  ? -1
          :/* first > second */    1; 
  }
  if ( mode == 2 ) {
    c0 = c.sort( CompareForSort )[0];
  }
  else if ( mode == 3 ) {
    d0 = d.sort( CompareForSort )[0];
  }

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

    // 行頭の空白 b[i] の直後がコメントマークかチェック
    // "// コメント行" なら...
    if ( ai.substr( bi, comLength ) == comment ) {
      // ( mode > 0 ) または コメントマークが行頭 ならアンコメント
      // ( mode = 0 ) で コメントマークが行頭以外 ならコメントアウト
      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" );
}

おまけ

ブロックコメント

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

例： 字下げされている hoge, fuga, piyo の３行をコメントアウトする

      hoge
        fuga
          piyo

• 「カッコで囲う（ポップアップメニューあり）」マクロの「JS コメントアウト２」
  つねに行の先頭へコメントマークを挿入します。

/*
 *        hoge
 *          fuga
 *            piyo
 */

• 「引用符／コメント」マクロの「JS コメントアウト２」
  字下げされたブロックの先頭位置へコメントマークを挿入します。

      /* 
       * hoge
       *   fuga
       *     piyo
       */

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

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

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

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

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

例： ｢hijklmn｣ を範囲選択してコメントアウトする

abcdefghijklmnopqrstuvwxyz

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

「引用符／コメント」マクロ
/* abcdefghijklmnopqrstuvwxyz */
<!-- abcdefghijklmnopqrstuvwxyz -->