「Eclipse風コメントアウト(改)」の版間の差分

提供: MeryWiki
ナビゲーションに移動 検索に移動
← 古い編集
MSY-07 (トーク | 投稿記録)
2,334 回編集
ダイアログ ボックスで [キャンセル] ボタンを押した場合の処理を追加（Ver 3.7.13でwindow.Promptメソッドの仕様が変更されたため）
MSY-07 (トーク | 投稿記録)
2,334 回編集
QuickJS / V8対応版を追加
 
(同じ利用者による、間の2版が非表示)
9行目: 9行目:


== 注意事項 ==
== 注意事項 ==
Mery Ver 3.7.2未満のソースコードでは、Shiftキーの状態を取得するために、[[GetKeyState.exe(キー状態取得実行ファイル)]]を使用しています。本体マクロと併せて上記実行ファイルも必要になります。
Shiftキーの状態を取得するために[[マクロリファレンス:3:Shell オブジェクト#GetKeyState メソッド|shell.GetKeyStateメソッド]]を使用しているため、Mery Ver 3.7.2以降で動作します。
 
なお、Mery Ver 3.7.2以降のソースコードでは[[マクロリファレンス:3:Shell オブジェクト#GetKeyState メソッド|shell.GetKeyStateメソッド]]を使用しているため、GetKeyState.exeは必要ありません。


== ソースコード ==
== ソースコード ==
=== Ver 3.7.2以降 ===
=== JavaScript ===
このスクリプトはMery Ver 3.7.2以降対応版です。Mery Ver 3.7.2未満の環境では、Ver 3.0.0以降またはVer 3.0.0未満対応のスクリプトを利用してください。
 
<syntaxhighlight lang="javascript" copy>
<syntaxhighlight lang="javascript" copy>
#icon = "_Comment.ico"
#icon = "_Comment.ico"
#title = "選択行コメントアウト"
#title = "選択行コメントアウト"
// このスクリプトはMery Ver 3.7.2以降対応版です
// Ver 3.7.2以前の環境では動作しません


// -----------------------------------------------------------------------------
// -----------------------------------------------------------------------------
114行目: 107行目:


// キャンセルされた場合
// キャンセルされた場合
if (comInput === null) {
if (!comInput) {
Quit();
Quit();
}
}
257行目: 250行目:
</syntaxhighlight>
</syntaxhighlight>


=== Ver 3.0.0以降 ===
=== QuickJS / V8 ===
このスクリプトはMery Ver 3.0.0以降対応版です。Mery Ver 3.0.0未満の環境では、Ver 3.0.0未満対応のスクリプトを利用してください。
このスクリプトを使用するときは、ファイルの先頭に<code>#language = "quickjs"</code>または<code>#language = "V8"</code>を記述してください。


<syntaxhighlight lang="javascript" copy>
<syntaxhighlight lang="javascript" copy>
#language = "quickjs"
#icon = "_Comment.ico"
#icon = "_Comment.ico"
#title = "選択行コメントアウト"
#title = "選択行コメントアウト"
// このスクリプトはMery Ver 3.0.0以降対応版です
// Ver 3.0.0以前の環境では動作しません


// -----------------------------------------------------------------------------
// -----------------------------------------------------------------------------
286行目: 277行目:
// g) 空白行で実行するとUndoされてしまう問題に対処
// g) 空白行で実行するとUndoされてしまう問題に対処
// h) OutputBarにフォーカスがある場合に処理できない問題に対処
// h) OutputBarにフォーカスがある場合に処理できない問題に対処
//
// SHIFTキー状態取得のために、"GetKeyState.exe"が必要です
//
//
// Improved by pizz
// Improved by pizz
335行目: 324行目:
break;
break;
}
}
var wshShell = new ActiveXObject("WScript.Shell");
// カレントディレクトリをマクロディレクトリに変更
wshShell.CurrentDirectory = editor.FullName.match(/^.*\\/)[0] + 'Macros';


// タグ設定を取得
// タグ設定を取得
var comSelected = "";
var comSelected = "";
if (document.Tag.exists(TAGKEY)) {
if (document.Tag.exists(TAGKEY)) {
comSelected = document.Tag(TAGKEY);
comSelected = document.Tag[TAGKEY];
}
}
if (comSelected == "") {
if (comSelected == "") {
352行目: 336行目:


// SHIFTキー状態を取得
// SHIFTキー状態を取得
var shift = wshShell.Run("GetKeyState.exe shift", 0, true);
var shift = shell.GetKeyState(0x10);


if (shift != -1) {
// コメント文字の入力を受ける
// コメント文字の入力を受ける
if (comTrim == "" || shift < 0) {
if (comTrim == "" || shift == 1) {
var comInput = "// ";
var comInput = "// ";
if (comTrim != "") {
if (comTrim != "") {
comInput = comSelected;
comInput = comSelected;
}
}


comInput = prompt("コメント文字を指定してください", comInput);
comInput = prompt("コメント文字を指定してください", comInput);


comTrim = comInput.replace(/(^\s+)|(\s+$)/g, ""); // スペースなしのコメント文字
// キャンセルされた場合
if (comTrim != "") {
if (!comInput) {
comSelected = comInput;
Quit();
document.Tag(TAGKEY) = comSelected;
}
}
}


comTrim = comInput.replace(/(^\s+)|(\s+$)/g, ""); // スペースなしのコメント文字
if (comTrim != "") {
if (comTrim != "") {
var meGetLineLogical = 0;
comSelected = comInput;
var regOrg = new RegExp("^[ \\t]*" + comSelected.replace(/\W/g, "\\$&"));
document.Tag[TAGKEY] = comSelected;
var regTrim = new RegExp("^[ \\t]*" + comTrim.replace(/\W/g, "\\$&"));
var scrollY = window.ScrollY;
var sel = doc.Selection;
var st = sel.GetTopPointY(mePosLogical);
var ed = sel.GetBottomPointY(mePosLogical);
var ac = sel.GetActivePointY(mePosLogical);
if (st != ed && sel.GetBottomPointX(mePosLogical) == 1) {
// 複数行選択、最下行選択位置が行頭の場合は、最終行は除外
ed--;
}
var tab = GetTabSpace();
 
sel.SetActivePoint(mePosLogical, doc.GetLine(ed, meGetLineLogical).length + 1, ed);
sel.SetAnchorPoint(mePosLogical, 1, st);
var lines = sel.Text.split("\n");
if (sel.Text.length > 0) {
sel.Untabify();
}
var linesWithoutTab = sel.Text.split("\n");
if (sel.Text.length > 0) {
doc.Undo();
}
 
// インデント取得
var indent = -1;
var existNotCommentLine = false; // 空白・コメント行でない行が存在するか
for (var i = 0, len = linesWithoutTab.length; i < len; i++) {
var line = linesWithoutTab[i];
var left = line.search(/[^ ]/);
if (left >= 0 && (indent < 0 || left < indent)) {
// インデントはタブ幅単位(左寄せ)
indent = Math.floor(left / tab) * tab;
}
if (left >= 0) {
// コメント行判定
if (!existNotCommentLine && line.search(regTrim) == -1) {
existNotCommentLine = true;
}
}
}
 
var txt = "";
var changed = false;
if (existNotCommentLine) {
// コメントアウト
for (var i = 0, len = lines.length; i < len; i++) {
var line = lines[i] + "\n";
// 空白行はコメントアウトしない
if (line.search(/[^ \t\n]/) == -1) {
txt += line;
continue;
}
 
// 挿入位置をタブと空白を考慮して決定
var index = 0, j;
for (j = 0; index < indent; j++) {
// indent の範囲には半角スペースかタブしかない
if (line.charAt(j) == " ") {
index += 1;
} else {
index += tab - (index % tab);
}
}
txt += line.substring(0, j) + comSelected + line.substring(j);
changed = true;
}
} else {
// コメントから復帰
for (var i = 0, len = lines.length; i < len; i++) {
var line = lines[i] + "\n";
if (line.match(regTrim)) {
if (line.match(regOrg)) {
txt += line.replace(comSelected, ""); // 先頭のコメント(空白付き)の削除
} else {
txt += line.replace(comTrim, ""); // 先頭のコメント(空白なし)の削除
}
changed = true;
} else {
txt += line;
}
}
}
 
// コメントアウト部分を書き換えて、全体を選択
if (doc.GetLine(ed + 1, meGetLineWithNewLines) == "") {
txt = txt.substring(0, txt.length - 1); // 最後の改行は除去
}
if (ac == st) {
// 下から上への選択状態
sel.SetActivePoint(mePosLogical, 1, st);
sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
if (changed) {
sel.Text = txt;
}
sel.SetActivePoint(mePosLogical, 1, st);
sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
} else {
// 上から下への選択状態
sel.SetActivePoint(mePosLogical, 1, ed + 1);
sel.SetAnchorPoint(mePosLogical, 1, st);
if (changed) {
sel.Text = txt;
}
sel.SetAnchorPoint(mePosLogical, 1, st);
}
window.ScrollY = scrollY;
}
}
}
}


//========================================
if (comTrim != "") {
// 関数
var meGetLineLogical = 0;
//========================================
var regOrg = new RegExp("^[ \\t]*" + comSelected.replace(/\W/g, "\\$&"));
// タブ幅を取得
var regTrim = new RegExp("^[ \\t]*" + comTrim.replace(/\W/g, "\\$&"));
function GetTabSpace() {
var scrollY = window.ScrollY;
var doc = editor.ActiveDocument;
var sel = doc.Selection;
var sel = doc.Selection;
var saved = doc.Saved;
var st = sel.GetTopPointY(mePosLogical);
sel.EndOfDocument();
var ed = sel.GetBottomPointY(mePosLogical);
doc.Write("\n\t");
var ac = sel.GetActivePointY(mePosLogical);
sel.SetAnchorPoint(mePosLogical, sel.GetActivePointX(mePosLogical) - 1, sel.GetActivePointY(mePosLogical));
if (st != ed && sel.GetBottomPointX(mePosLogical) == 1) {
sel.Untabify();
// 複数行選択、最下行選択位置が行頭の場合は、最終行は除外
var n = sel.Text.length;
ed--;
doc.Undo();
}
doc.Undo();
var tab = GetTabSpace();
doc.Saved = saved;


return n;
sel.SetActivePoint(mePosLogical, doc.GetLine(ed, meGetLineLogical).length + 1, ed);
}
sel.SetAnchorPoint(mePosLogical, 1, st);
</syntaxhighlight>
var lines = sel.Text.split("\n");
 
if (sel.Text.length > 0) {
=== Ver 3.0.0未満 ===
sel.Untabify();
以下は、Mery Ver 3.0.0未満の環境でも利用できます（3.0.0以降でも動作しますが、上のバージョンの利用をお勧めします）。
}
 
var linesWithoutTab = sel.Text.split("\n");
<syntaxhighlight lang="javascript" copy>
if (sel.Text.length > 0) {
#icon = "_Comment.ico"
doc.Undo();
#title = "選択行コメントアウト"
 
// -----------------------------------------------------------------------------
// Eclipse風なコメントアウト
// 複数行一括コメントアウト、復帰マクロ
// 1) 対象は行全体(行途中の選択も行全体とみなす)
// 2) 空白行はコメントアウトしない
// 3) インデントは選択行の範囲で一番左(タブ幅単位)に合わせる
// 4) 選択範囲全体がコメントアウトされている場合は復帰
//
// Copyright (c) ks. All Rights Reserved.
// www:  http://merysmacro.seesaa.net/
// -----------------------------------------------------------------------------
// a) 最終行の先頭までの選択状態では、最終行は処理範囲外にする(行選択対応)
// b) コメント文字の種類を追加(Mery標準で単一行コメント可能な編集モード全て対応)
// c) スペースが含まれるコメント文字に対応
// d) コメント文字が正規表現文字でも正しく動作するようにした
// e) コメント文字不明時、SHIFTキー押下起動時はコメント文字を入力できるようにした
//    (Mery.iniと同じ場所に設定ファイルとして一時記憶)
// f) 選択方向を維持するようにした(下から上への選択対応)
// g) 空白行で実行するとUndoされてしまう問題に対処
// h) OutputBarにフォーカスがある場合に処理できない問題に対処
//
// SHIFTキー状態取得のために、"GetKeyState.exe"が必要です
//
// Improved by pizz
// -----------------------------------------------------------------------------
 
var doc = editor.ActiveDocument;
var COM = ""; // 単一行コメント
var settingFilename = "_CommentMacro.ini";
 
switch (doc.Mode.toLowerCase()) {
case "bat":
COM = "rem ";
break;
case "c#":
case "c++":
case "coldfusion":
case "delphi":
case "java":
case "javascript":
case "jsp":
case "php":
case "uwsc":
COM = "// ";
break;
case "hsp":
case "ini":
case "x86 assembler":
COM = "; ";
break;
case "perl":
case "perlscript":
case "powershell":
case "python":
case "rhtml":
case "ruby":
COM = "# ";
break;
case "sql":
COM = "-- ";
break;
case "tex":
COM = "% ";
break;
case "vbscript":
case "visualbasic":
COM = "'";
break;
}
 
var wshShell = new ActiveXObject("WScript.Shell");
var fso = new ActiveXObject("Scripting.FileSystemObject");
 
// カレントディレクトリをマクロディレクトリに変更
wshShell.CurrentDirectory = editor.FullName.match(/^.*\\/)[0] + 'Macros';
 
// 設定ファイルからコメント文字を読み込む
var comSelected = LoadDocSetting();
if (comSelected != null) {
if (comSelected == "") {
comSelected = COM;
}
}


var comTrim = comSelected.replace(/(^\s+)|(\s+$)/g, ""); // スペースなしのコメント文字
// インデント取得
 
var indent = -1;
// SHIFTキー状態を取得
var existNotCommentLine = false; // 空白・コメント行でない行が存在するか
var shift = wshShell.Run("GetKeyState.exe shift", 0, true);
for (var i = 0, len = linesWithoutTab.length; i < len; i++) {
 
var line = linesWithoutTab[i];
if (shift != -1) {
var left = line.search(/[^ ]/);
// コメント文字の入力を受ける
if (left >= 0 && (indent < 0 || left < indent)) {
if (comTrim == "" || shift == 1) {
// インデントはタブ幅単位(左寄せ)
var comInput = "// ";
indent = Math.floor(left / tab) * tab;
if (comTrim != "") {
}
comInput = comSelected;
if (left >= 0) {
}
// コメント行判定
 
if (!existNotCommentLine && line.search(regTrim) == -1) {
comInput = prompt("コメント文字を指定してください", comInput);
existNotCommentLine = true;
 
comTrim = comInput.replace(/(^\s+)|(\s+$)/g, ""); // スペースなしのコメント文字
if (comTrim != "") {
if (comInput != comSelected) {
SaveDocSetting(comInput);
comSelected = comInput;
}
}
}
}
}
}


if (comTrim != "") {
var txt = "";
var meGetLineLogical = 0;
var changed = false;
var regOrg = new RegExp("^[ \\t]*" + comSelected.replace(/\W/g, "\\$&"));
if (existNotCommentLine) {
var regTrim = new RegExp("^[ \\t]*" + comTrim.replace(/\W/g, "\\$&"));
// コメントアウト
var scrollY = window.ScrollY;
for (var i = 0, len = lines.length; i < len; i++) {
var sel = doc.Selection;
var line = lines[i] + "\n";
var st = sel.GetTopPointY(mePosLogical);
// 空白行はコメントアウトしない
var ed = sel.GetBottomPointY(mePosLogical);
if (line.search(/[^ \t\n]/) == -1) {
var ac = sel.GetActivePointY(mePosLogical);
txt += line;
if (st != ed && sel.GetBottomPointX(mePosLogical) == 1) {
continue;
// 複数行選択、最下行選択位置が行頭の場合は、最終行は除外
ed--;
}
}
var tab = GetTabSpace();


sel.SetActivePoint(mePosLogical, doc.GetLine(ed, meGetLineLogical).length + 1, ed);
// 挿入位置をタブと空白を考慮して決定
sel.SetAnchorPoint(mePosLogical, 1, st);
var index = 0, j;
var lines = sel.Text.split("\n");
for (j = 0; index < indent; j++) {
if (sel.Text.length > 0) {
// indent の範囲には半角スペースかタブしかない
sel.Untabify();
if (line.charAt(j) == " ") {
}
index += 1;
var linesWithoutTab = sel.Text.split("\n");
} else {
if (sel.Text.length > 0) {
index += tab - (index % tab);
doc.Undo();
}
 
// インデント取得
var indent = -1;
var existNotCommentLine = false; // 空白・コメント行でない行が存在するか
for (var i = 0, len = linesWithoutTab.length; i < len; i++) {
var line = linesWithoutTab[i];
var left = line.search(/[^ ]/);
if (left >= 0 && (indent < 0 || left < indent)) {
// インデントはタブ幅単位(左寄せ)
indent = Math.floor(left / tab) * tab;
}
if (left >= 0) {
// コメント行判定
if (!existNotCommentLine && line.search(regTrim) == -1) {
existNotCommentLine = true;
}
}
}
}
}
 
txt += line.substring(0, j) + comSelected + line.substring(j);
var txt = "";
changed = true;
var changed = false;
}
if (existNotCommentLine) {
} else {
// コメントアウト
// コメントから復帰
for (var i = 0, len = lines.length; i < len; i++) {
for (var i = 0, len = lines.length; i < len; i++) {
var line = lines[i] + "\n";
var line = lines[i] + "\n";
// 空白行はコメントアウトしない
if (line.match(regTrim)) {
if (line.search(/[^ \t\n]/) == -1) {
if (line.match(regOrg)) {
txt += line;
txt += line.replace(comSelected, ""); // 先頭のコメント(空白付き)の削除
continue;
} else {
}
txt += line.replace(comTrim, ""); // 先頭のコメント(空白なし)の削除
 
// 挿入位置をタブと空白を考慮して決定
var index = 0, j;
for (j = 0; index < indent; j++) {
// indent の範囲には半角スペースかタブしかない
if (line.charAt(j) == " ") {
index += 1;
} else {
index += tab - (index % tab);
}
}
txt += line.substring(0, j) + comSelected + line.substring(j);
changed = true;
}
}
changed = true;
} else {
} else {
// コメントから復帰
txt += line;
for (var i = 0, len = lines.length; i < len; i++) {
var line = lines[i] + "\n";
if (line.match(regTrim)) {
if (line.match(regOrg)) {
txt += line.replace(comSelected, ""); // 先頭のコメント(空白付き)の削除
} else {
txt += line.replace(comTrim, ""); // 先頭のコメント(空白なし)の削除
}
changed = true;
} else {
txt += line;
}
}
}
}
}
}


// コメントアウト部分を書き換えて、全体を選択
// コメントアウト部分を書き換えて、全体を選択
if (doc.GetLine(ed + 1, meGetLineWithNewLines) == "") {
if (doc.GetLine(ed + 1, meGetLineWithNewLines) == "") {
txt = txt.substring(0, txt.length - 1); // 最後の改行は除去
txt = txt.substring(0, txt.length - 1); // 最後の改行は除去
}
}
if (ac == st) {
if (ac == st) {
// 下から上への選択状態
// 下から上への選択状態
sel.SetActivePoint(mePosLogical, 1, st);
sel.SetActivePoint(mePosLogical, 1, st);
sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
if (changed) {
if (changed) {
sel.Text = txt;
sel.Text = txt;
}
}
sel.SetActivePoint(mePosLogical, 1, st);
sel.SetActivePoint(mePosLogical, 1, st);
sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
} else {
} else {
// 上から下への選択状態
// 上から下への選択状態
sel.SetActivePoint(mePosLogical, 1, ed + 1);
sel.SetActivePoint(mePosLogical, 1, ed + 1);
sel.SetAnchorPoint(mePosLogical, 1, st);
sel.SetAnchorPoint(mePosLogical, 1, st);
if (changed) {
if (changed) {
sel.Text = txt;
sel.Text = txt;
}
sel.SetAnchorPoint(mePosLogical, 1, st);
}
window.ScrollY = scrollY;
}
}
sel.SetAnchorPoint(mePosLogical, 1, st);
}
}
window.ScrollY = scrollY;
}
}


749行目: 488行目:


return n;
return n;
}
// コメント文字設定をファイルから読み込み
function LoadDocSetting() {
var dic = LoadDocSettingDataListWithOpend();
if (dic == null) {
return null;
}
var ret = "";
for (var key in dic) {
if (key.toLowerCase() == window.document.FullName.toLowerCase()) {
ret = dic[window.document.FullName.toLowerCase()];
}
}
return ret;
}
// コメント文字設定をファイルに書き込み
function SaveDocSetting(comStr) {
var dic = LoadDocSettingDataListWithOpend();
if (dic != null) {
dic[window.document.FullName.toLowerCase()] = comStr;
SaveDocSettingDataListWithOpend(dic);
}
}
// 設定ファイルから全ての設定値を取得
function LoadDocSettingDataListWithOpend() {
var settingPath = GetSettingFilePath();
if (settingPath == "") {
return null;
}
var dic = {};
var deleted = false;
if (fso.FileExists(settingPath)) {
var tso = fso.OpenTextFile(settingPath, 1, false, -1);
while (tso.AtEndOfStream == false) {
var setting = tso.ReadLine().split("\t", 2);
var detect = false;
for (var i = 0; i < window.Editors.Count; i++) {
for (var j = 0; j < window.Editors.Item(i).Documents.Count; j++) {
if (window.Editors.Item(i).Documents.Item(j).FullName.toLowerCase() ==
setting[0].toLowerCase()) {
dic[setting[0].toLowerCase()] = setting[1];
detect = true;
break;
}
}
if (detect) {
break;
}
}
if (detect == false) {
deleted = true;
}
}
tso.Close();
}
if (deleted) {
SaveDocSettingDataListWithOpend(dic);
}
return dic;
}
// 設定ファイルを全て書き換え
function SaveDocSettingDataListWithOpend(dic) {
var settingPath = GetSettingFilePath();
if (settingPath != "") {
var tso = fso.OpenTextFile(settingPath, 2, true, -1);
for (var key in dic) {
tso.WriteLine(key + "\t" + dic[key]);
}
tso.Close();
}
}
// コメント文字設定ファイルの場所を取得する
function GetSettingFilePath() {
var meryDir = fso.GetParentFolderName(editor.FullName);
var settingPath = "";
if (fso.FileExists(fso.BuildPath(meryDir, "Mery.ini"))) {
settingPath = fso.BuildPath(meryDir, settingFilename);
} else {
var appDataPath = fso.BuildPath(wshShell.SpecialFolders('Appdata'), 'Mery');
if (fso.FileExists(fso.BuildPath(appDataPath, "Mery.ini"))) {
settingPath = fso.BuildPath(appDataPath, settingFilename);
}
}
if (settingPath == "") {
window.Alert("Mery.ini ファイルが見つかりません");
}
return settingPath;
}
}
</syntaxhighlight>
</syntaxhighlight>

2026年9月10日 (木) 14:16時点における最新版

概要[編集]

Eclipse風なコメントアウト <=> コメントの除去を行います。

ksさんの作成された、Eclipse風コメントアウトは、私にとって欠かせないツールです。

便利に使わせていただく一方、細かい挙動が気になって変更したり、機能を追加しているうちに、すっかり別物になってしまいました。

オリジナルを作成されたksさんに感謝するとともに、せっかく作成したので改造版をここに公開します。

注意事項[編集]

Shiftキーの状態を取得するためにshell.GetKeyStateメソッドを使用しているため、Mery Ver 3.7.2以降で動作します。

ソースコード[編集]

JavaScript[編集]

#icon = "_Comment.ico"
#title = "選択行コメントアウト"

// -----------------------------------------------------------------------------
// Eclipse風なコメントアウト
// 複数行一括コメントアウト、復帰マクロ
// 1) 対象は行全体(行途中の選択も行全体とみなす)
// 2) 空白行はコメントアウトしない
// 3) インデントは選択行の範囲で一番左(タブ幅単位)に合わせる
// 4) 選択範囲全体がコメントアウトされている場合は復帰
//
// Copyright (c) ks. All Rights Reserved.
// www:		http://merysmacro.seesaa.net/
// -----------------------------------------------------------------------------
// a) 最終行の先頭までの選択状態では、最終行は処理範囲外にする(行選択対応)
// b) コメント文字の種類を追加(Mery標準で単一行コメント可能な編集モード全て対応)
// c) スペースが含まれるコメント文字に対応
// d) コメント文字が正規表現文字でも正しく動作するようにした
// e) コメント文字不明時、SHIFTキー押下起動時はコメント文字を入力できるようにした
// f) 選択方向を維持するようにした(下から上への選択対応)
// g) 空白行で実行するとUndoされてしまう問題に対処
// h) OutputBarにフォーカスがある場合に処理できない問題に対処
//
// Improved by pizz
// -----------------------------------------------------------------------------

var doc = editor.ActiveDocument;
var COM = ""; // 単一行コメント
var TAGKEY = "pizzComment";

switch (doc.Mode.toLowerCase()) {
	case "bat":
		COM = "rem ";
		break;
	case "c#":
	case "c++":
	case "coldfusion":
	case "delphi":
	case "java":
	case "javascript":
	case "jsp":
	case "php":
	case "uwsc":
		COM = "// ";
		break;
	case "hsp":
	case "ini":
	case "x86 assembler":
		COM = "; ";
		break;
	case "perl":
	case "perlscript":
	case "powershell":
	case "python":
	case "rhtml":
	case "ruby":
		COM = "# ";
		break;
	case "sql":
		COM = "-- ";
		break;
	case "tex":
		COM = "% ";
		break;
	case "vbscript":
	case "visualbasic":
		COM = "'";
		break;
}

// タグ設定を取得
var comSelected = "";
if (document.Tag.exists(TAGKEY)) {
	comSelected = document.Tag(TAGKEY);
}
if (comSelected == "") {
	comSelected = COM;
}
var comTrim = comSelected.replace(/(^\s+)|(\s+$)/g, ""); // スペースなしのコメント文字

// SHIFTキー状態を取得
var shift = shell.GetKeyState(0x10);

// コメント文字の入力を受ける
if (comTrim == "" || shift < 0) {
	var comInput = "// ";
	if (comTrim != "") {
		comInput = comSelected;
	}

	comInput = prompt("コメント文字を指定してください", comInput);

	// キャンセルされた場合
	if (!comInput) {
		Quit();
	}

	comTrim = comInput.replace(/(^\s+)|(\s+$)/g, ""); // スペースなしのコメント文字
	if (comTrim != "") {
		comSelected = comInput;
		document.Tag(TAGKEY) = comSelected;
	}
}

if (comTrim != "") {
	var meGetLineLogical = 0;
	var regOrg = new RegExp("^[ \\t]*" + comSelected.replace(/\W/g, "\\$&"));
	var regTrim = new RegExp("^[ \\t]*" + comTrim.replace(/\W/g, "\\$&"));
	var scrollY = window.ScrollY;
	var sel = doc.Selection;
	var st = sel.GetTopPointY(mePosLogical);
	var ed = sel.GetBottomPointY(mePosLogical);
	var ac = sel.GetActivePointY(mePosLogical);
	if (st != ed && sel.GetBottomPointX(mePosLogical) == 1) {
		// 複数行選択、最下行選択位置が行頭の場合は、最終行は除外
		ed--;
	}
	var tab = GetTabSpace();

	sel.SetActivePoint(mePosLogical, doc.GetLine(ed, meGetLineLogical).length + 1, ed);
	sel.SetAnchorPoint(mePosLogical, 1, st);
	var lines = sel.Text.split("\n");
	if (sel.Text.length > 0) {
		sel.Untabify();
	}
	var linesWithoutTab = sel.Text.split("\n");
	if (sel.Text.length > 0) {
		doc.Undo();
	}

	// インデント取得
	var indent = -1;
	var existNotCommentLine = false; // 空白・コメント行でない行が存在するか
	for (var i = 0, len = linesWithoutTab.length; i < len; i++) {
		var line = linesWithoutTab[i];
		var left = line.search(/[^ ]/);
		if (left >= 0 && (indent < 0 || left < indent)) {
			// インデントはタブ幅単位(左寄せ)
			indent = Math.floor(left / tab) * tab;
		}
		if (left >= 0) {
			// コメント行判定
			if (!existNotCommentLine && line.search(regTrim) == -1) {
				existNotCommentLine = true;
			}
		}
	}

	var txt = "";
	var changed = false;
	if (existNotCommentLine) {
		// コメントアウト
		for (var i = 0, len = lines.length; i < len; i++) {
			var line = lines[i] + "\n";
			// 空白行はコメントアウトしない
			if (line.search(/[^ \t\n]/) == -1) {
				txt += line;
				continue;
			}

			// 挿入位置をタブと空白を考慮して決定
			var index = 0, j;
			for (j = 0; index < indent; j++) {
				// indent の範囲には半角スペースかタブしかない
				if (line.charAt(j) == " ") {
					index += 1;
				} else {
					index += tab - (index % tab);
				}
			}
			txt += line.substring(0, j) + comSelected + line.substring(j);
			changed = true;
		}
	} else {
		// コメントから復帰
		for (var i = 0, len = lines.length; i < len; i++) {
			var line = lines[i] + "\n";
			if (line.match(regTrim)) {
				if (line.match(regOrg)) {
					txt += line.replace(comSelected, ""); // 先頭のコメント(空白付き)の削除
				} else {
					txt += line.replace(comTrim, ""); // 先頭のコメント(空白なし)の削除
				}
				changed = true;
			} else {
				txt += line;
			}
		}
	}

	// コメントアウト部分を書き換えて、全体を選択
	if (doc.GetLine(ed + 1, meGetLineWithNewLines) == "") {
		txt = txt.substring(0, txt.length - 1); // 最後の改行は除去
	}
	if (ac == st) {
		// 下から上への選択状態
		sel.SetActivePoint(mePosLogical, 1, st);
		sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
		if (changed) {
			sel.Text = txt;
		}
		sel.SetActivePoint(mePosLogical, 1, st);
		sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
	} else {
		// 上から下への選択状態
		sel.SetActivePoint(mePosLogical, 1, ed + 1);
		sel.SetAnchorPoint(mePosLogical, 1, st);
		if (changed) {
			sel.Text = txt;
		}
		sel.SetAnchorPoint(mePosLogical, 1, st);
	}
	window.ScrollY = scrollY;
}

//========================================
// 関数
//========================================
// タブ幅を取得
function GetTabSpace() {
	var doc = editor.ActiveDocument;
	var sel = doc.Selection;
	var saved = doc.Saved;
	sel.EndOfDocument();
	doc.Write("\n\t");
	sel.SetAnchorPoint(mePosLogical, sel.GetActivePointX(mePosLogical) - 1, sel.GetActivePointY(mePosLogical));
	sel.Untabify();
	var n = sel.Text.length;
	doc.Undo();
	doc.Undo();
	doc.Saved = saved;

	return n;
}

QuickJS / V8[編集]

このスクリプトを使用するときは、ファイルの先頭に#language = "quickjs"または#language = "V8"を記述してください。 

#language = "quickjs"
#icon = "_Comment.ico"
#title = "選択行コメントアウト"

// -----------------------------------------------------------------------------
// Eclipse風なコメントアウト
// 複数行一括コメントアウト、復帰マクロ
// 1) 対象は行全体(行途中の選択も行全体とみなす)
// 2) 空白行はコメントアウトしない
// 3) インデントは選択行の範囲で一番左(タブ幅単位)に合わせる
// 4) 選択範囲全体がコメントアウトされている場合は復帰
//
// Copyright (c) ks. All Rights Reserved.
// www:		http://merysmacro.seesaa.net/
// -----------------------------------------------------------------------------
// a) 最終行の先頭までの選択状態では、最終行は処理範囲外にする(行選択対応)
// b) コメント文字の種類を追加(Mery標準で単一行コメント可能な編集モード全て対応)
// c) スペースが含まれるコメント文字に対応
// d) コメント文字が正規表現文字でも正しく動作するようにした
// e) コメント文字不明時、SHIFTキー押下起動時はコメント文字を入力できるようにした
// f) 選択方向を維持するようにした(下から上への選択対応)
// g) 空白行で実行するとUndoされてしまう問題に対処
// h) OutputBarにフォーカスがある場合に処理できない問題に対処
//
// Improved by pizz
// -----------------------------------------------------------------------------

var doc = editor.ActiveDocument;
var COM = ""; // 単一行コメント
var TAGKEY = "pizzComment";

switch (doc.Mode.toLowerCase()) {
	case "bat":
		COM = "rem ";
		break;
	case "c#":
	case "c++":
	case "coldfusion":
	case "delphi":
	case "java":
	case "javascript":
	case "jsp":
	case "php":
	case "uwsc":
		COM = "// ";
		break;
	case "hsp":
	case "ini":
	case "x86 assembler":
		COM = "; ";
		break;
	case "perl":
	case "perlscript":
	case "powershell":
	case "python":
	case "rhtml":
	case "ruby":
		COM = "# ";
		break;
	case "sql":
		COM = "-- ";
		break;
	case "tex":
		COM = "% ";
		break;
	case "vbscript":
	case "visualbasic":
		COM = "'";
		break;
}

// タグ設定を取得
var comSelected = "";
if (document.Tag.exists(TAGKEY)) {
	comSelected = document.Tag[TAGKEY];
}
if (comSelected == "") {
	comSelected = COM;
}
var comTrim = comSelected.replace(/(^\s+)|(\s+$)/g, ""); // スペースなしのコメント文字

// SHIFTキー状態を取得
var shift = shell.GetKeyState(0x10);

// コメント文字の入力を受ける
if (comTrim == "" || shift < 0) {
	var comInput = "// ";
	if (comTrim != "") {
		comInput = comSelected;
	}

	comInput = prompt("コメント文字を指定してください", comInput);

	// キャンセルされた場合
	if (!comInput) {
		Quit();
	}

	comTrim = comInput.replace(/(^\s+)|(\s+$)/g, ""); // スペースなしのコメント文字
	if (comTrim != "") {
		comSelected = comInput;
		document.Tag[TAGKEY] = comSelected;
	}
}

if (comTrim != "") {
	var meGetLineLogical = 0;
	var regOrg = new RegExp("^[ \\t]*" + comSelected.replace(/\W/g, "\\$&"));
	var regTrim = new RegExp("^[ \\t]*" + comTrim.replace(/\W/g, "\\$&"));
	var scrollY = window.ScrollY;
	var sel = doc.Selection;
	var st = sel.GetTopPointY(mePosLogical);
	var ed = sel.GetBottomPointY(mePosLogical);
	var ac = sel.GetActivePointY(mePosLogical);
	if (st != ed && sel.GetBottomPointX(mePosLogical) == 1) {
		// 複数行選択、最下行選択位置が行頭の場合は、最終行は除外
		ed--;
	}
	var tab = GetTabSpace();

	sel.SetActivePoint(mePosLogical, doc.GetLine(ed, meGetLineLogical).length + 1, ed);
	sel.SetAnchorPoint(mePosLogical, 1, st);
	var lines = sel.Text.split("\n");
	if (sel.Text.length > 0) {
		sel.Untabify();
	}
	var linesWithoutTab = sel.Text.split("\n");
	if (sel.Text.length > 0) {
		doc.Undo();
	}

	// インデント取得
	var indent = -1;
	var existNotCommentLine = false; // 空白・コメント行でない行が存在するか
	for (var i = 0, len = linesWithoutTab.length; i < len; i++) {
		var line = linesWithoutTab[i];
		var left = line.search(/[^ ]/);
		if (left >= 0 && (indent < 0 || left < indent)) {
			// インデントはタブ幅単位(左寄せ)
			indent = Math.floor(left / tab) * tab;
		}
		if (left >= 0) {
			// コメント行判定
			if (!existNotCommentLine && line.search(regTrim) == -1) {
				existNotCommentLine = true;
			}
		}
	}

	var txt = "";
	var changed = false;
	if (existNotCommentLine) {
		// コメントアウト
		for (var i = 0, len = lines.length; i < len; i++) {
			var line = lines[i] + "\n";
			// 空白行はコメントアウトしない
			if (line.search(/[^ \t\n]/) == -1) {
				txt += line;
				continue;
			}

			// 挿入位置をタブと空白を考慮して決定
			var index = 0, j;
			for (j = 0; index < indent; j++) {
				// indent の範囲には半角スペースかタブしかない
				if (line.charAt(j) == " ") {
					index += 1;
				} else {
					index += tab - (index % tab);
				}
			}
			txt += line.substring(0, j) + comSelected + line.substring(j);
			changed = true;
		}
	} else {
		// コメントから復帰
		for (var i = 0, len = lines.length; i < len; i++) {
			var line = lines[i] + "\n";
			if (line.match(regTrim)) {
				if (line.match(regOrg)) {
					txt += line.replace(comSelected, ""); // 先頭のコメント(空白付き)の削除
				} else {
					txt += line.replace(comTrim, ""); // 先頭のコメント(空白なし)の削除
				}
				changed = true;
			} else {
				txt += line;
			}
		}
	}

	// コメントアウト部分を書き換えて、全体を選択
	if (doc.GetLine(ed + 1, meGetLineWithNewLines) == "") {
		txt = txt.substring(0, txt.length - 1); // 最後の改行は除去
	}
	if (ac == st) {
		// 下から上への選択状態
		sel.SetActivePoint(mePosLogical, 1, st);
		sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
		if (changed) {
			sel.Text = txt;
		}
		sel.SetActivePoint(mePosLogical, 1, st);
		sel.SetAnchorPoint(mePosLogical, 1, ed + 1);
	} else {
		// 上から下への選択状態
		sel.SetActivePoint(mePosLogical, 1, ed + 1);
		sel.SetAnchorPoint(mePosLogical, 1, st);
		if (changed) {
			sel.Text = txt;
		}
		sel.SetAnchorPoint(mePosLogical, 1, st);
	}
	window.ScrollY = scrollY;
}

//========================================
// 関数
//========================================
// タブ幅を取得
function GetTabSpace() {
	var doc = editor.ActiveDocument;
	var sel = doc.Selection;
	var saved = doc.Saved;
	sel.EndOfDocument();
	doc.Write("\n\t");
	sel.SetAnchorPoint(mePosLogical, sel.GetActivePointX(mePosLogical) - 1, sel.GetActivePointY(mePosLogical));
	sel.Untabify();
	var n = sel.Text.length;
	doc.Undo();
	doc.Undo();
	doc.Saved = saved;

	return n;
}

変更履歴[編集]

  • 1.0.2 (2020-03-15)
    • Mery 3.0.0以降対応版の追加(document.Tagプロパティを使用)
  • 1.0.1 (2019-04-12)
    • window.Quit() メソッドの使用排除
  • 1.0.0 (2019-03-04)
    • 新規作成
「https://www.haijin-boys.com/wiki/index.php?title=Eclipse風コメントアウト(改)&oldid=9660」から取得
スポンサーリンク