「テキスト整形」の版間の差分

ks 氏作のマクロ「<b>[[テキスト変換]]</b>」の改造版です。

* <b>[[#拡張コード：書式|拡張コードの書式]]</b>を変更。

* メソッド <code><i>String</i>.replaceBatch</code> を追加。

* <b style="color:#c00;">表示行での処理には対応していません。</b>

* マクロの仕様上、<b style="color:#c00;">矩形選択での処理には原則対応していません。</b>

== お知らせ ==

<b style="color:#c00;">仕様変更によりモードは廃止されました。</b>

 

 

== スターターパック ==

 

 

<div style="height:40em; overflow:auto; border:1px dashed #999;">

** <b style="color:#c00;">仕様変更 - [[#コマンド|コマンドの書式]]を変更</b>

*** 正規表現を .*? → [^<i>文字</i>]* に変更し、改行を跨ぐようにした

* 1.2.2 (2015-03-26)

** <b style="color:#c00;">仕様修正 - モード RS/RM で、矩形選択（始点or終点が左下かつ論理行頭）時、下端の行が範囲から漏れる不具合を修正</b>

** <b>コード整理 - 文字入力など追加操作を求めるコマンドは、名称末尾に目印 ... を付けた</b>

*** 複製貼り付け ¦ ★行頭／行末に挿入 ¦ 各行先頭／末尾に挿入 ¦ ★入力文字列を含む／含まない行を削除 ¦ 正規表現に一致する／しない行を削除

** 変更 - 空白行を圧縮

** 追加 - ★連続する！？を整形 ¦ ★全角ダッシュ(――)に整形

** 変更 - ★括弧前の句読点を除去

*** 全角コンマ ， /全角ピリオド ． を除去対象に追加

** 変更 - ★三点リーダー(……)に整形

*** 全角コンマ ， /全角ピリオド ． /半角中黒 ･ /三点リーダー … /二点リーダー ‥ を変換対象に追加

** 変更 - マクロフォルダを開く

*** 処理方法を WScript.Shell.Run("explorer") → Shell.Application.Explore() に変更

* 1.0.9 (2014-02-22)

** 追加 - 丸数字 ⑳ → (20) ¦ 丸数字 (20) → ⑳

** 変更 - 文字を逆順並べ ¦ \uHHHH, \x{hex} エンコード

*** 処理方法を for ループ → replace() に変更（字数削減）

** 変更 - 拡張コード テンプレート

*** モード CR 作成補助コマンドを追加。モード CR テンプレートを変更

* 1.0.8 (2014-02-17)

** 修正 - ★行頭／行末に貼り付け

*** クリップボード終端の改行文字を除去する正規表現を修正 \r\n|\r|\n$ → (\r\n|\r|\n)$

** <b style="color:#c00;">仕様修正 - モード CR で、正規表現の特殊文字があると誤動作する不具合を修正</b>

** <b style="color:#c00;">仕様変更 - モード CR で、正規表現 (JScript) による検索置換に対応</b>

** コード整理 - コメントアウトしていた基本コードを削除

** コード整理 - 下記の6カテゴリを3カテゴリに統合。コマンドの名称や配置を見直した

*** (空白の追加 + 各行に追加) (空白の削除 + 行の削除) (数値の変換 + 文字種変換)

** 追加 - 複製貼り付け ¦ 文字を逆順並べ ¦ ★半角カナ→全角 ¦ ★全角カナ→半角

** 変更 - ★行頭／行末に貼り付け

** 変更 - 拡張コード テンプレート

*** モード CR テンプレートを刷新

* 1.0.6 (2014-02-10)

** 追加 - ★空白行を削除 ¦ \uHHHH デコード ¦ \x{hex} エンコード／デコード

** 変更 - 挿入 Confirm(|)

*** 接尾辞の長さ(s.length)でカーソル移動量を決めるようにした

* 1.0.5 (2014-02-01)

** 追加 - \uHHHH エンコード

** 変更 - ★全角かな→カナ ¦ ★全角カナ→かな

*** 踊り字（繰り返し記号） ゝゞヽヾ を変換対象に追加

* 1.0.4 (2014-01-24)

** 追加 - ★半角/全角の間を空ける ¦ ★半角英数/全角の間を空ける

** 変更 - ★全角カナ→かな

*** ヴヵヶ は対象外とした（Shift_JIS では保存できない文字のため）

* 1.0.3 (2014-01-12)

** <b>仕様変更 - スターターパックにアイコンファイルを同梱</b>

** 修正 - 編集中のファイルのパスをコピー ¦ 編集中の全ファイルのパスをコピー

*** 改行を LF → CR+LF に変更し、メモ帳でも正しく改行されるようにした

** 修正 - ★数値を3桁,区切りに

*** 小数点以下（ピリオド以降）は桁区切りしないようにした

* 1.0.2 (2014-01-08)

** <b style="color:#c00;">仕様変更 - コマンド実行時、スクロール位置を記憶・復元しないように（コメントアウト）した</b>

*** 検索系コマンドと相性が悪く、Mery の検索機能と挙動が合っていないため

** スターター追加 - ★CJK漢字を検索 ¦ ★検索強調をすべて解除

** 追加 - ★全角英数を検索 ¦ ★半角カナを検索

** 修正 - ★16→10進数

*** 16進数に使用しない英字 G～Z を変換対象に含めていたミスを修正

* 1.0.1 (2013-12-30)

** 追加 - 挿入 Confirm(|) ¦ ★数値を3桁,区切りに ¦ ★10→16進数 ¦ ★16→10進数

** 修正 - My Macros フォルダを開く (現「マクロフォルダを開く」)

*** 「テキスト整形」マクロのあるフォルダではなく Mery.exe 直下の My Macros フォルダを開くようにした

* 1.0.0 (2013-09-15)

** 初版公開

== 基本コード ==

<syntaxhighlight lang="javascript" copy>

//　2013-09-15 - 2019-06-01

//■拡張コード：リスト

/*■拡張コード：書式

f.push(["コマンド名","オプション",function(引数){ 処理 }]);

   s : 実行に範囲選択を要求 (require selection)

   c : 実行にクリップボードを要求 (require clipboard)

   L : 行選択してから処理 (select Line)

   O : 非選択時はすべて選択してから処理 (select OR all) ※実験的

//▽引数(arguments)

  第1引数 = Document.Selection.Text

  第2引数 = Document.Selection

//▽処理の戻り値(return value)

f.push(["メニュー名",function(f){ コマンドなど }]);

//▼セパレーター

f.push(["--------"]);

var Sel = Document.Selection;

var cmd = [], cid = 0; //コマンド, ID

//リストからメニュー作成

(function ListToMenu(List, Menu) {

  for (var i=0,_L; _L=List[i]; i++) {

    if (typeOf(_L[0]) !== "String") continue;

    switch (_L.length) {

    case 3: //◆コマンド      _L = ["コマンド名","オプション",function]

      if (typeOf(_L[2]) !== "Function") break;

      var isGray = (/\bs\b/.test(_L[1]) && isSelEmpty)

                || (/\bc\b/.test(_L[1]) && isClipEmpty) ;

      Menu.Add(_L[0]+"\t"+_L[1], cid, isGray? meMenuGrayed: 0);

      if (isGray) break;

       cmd[cid] = { func: _L[2]

      , selLine: /\bL\b/.test(_L[1])

      , selOrAll: /\bO\b/.test(_L[1])

      };

    break;

    case 2: //◆サブメニュー  _L = ["メニュー名",function]

      if (typeOf(_L[1]) !== "Function") break;

       var sub_f = [], sub_Menu = CreatePopupMenu();

      _L[1](sub_f);

      Menu.AddPopup(_L[0], sub_Menu);

       ListToMenu(sub_f, sub_Menu); //再帰：サブメニュー作成

    break;

     case 1: //◆セパレーター  _L = ["--------"]

       if (!/^-+$/.test(_L[0])) break;

       Menu.Add("", 0, meMenuSeparator);

    break;

//ポップアップメニューを表示して処理

main: if (cid = Menu.Track(mePosMouse)) { //※キャンセル(Esc)時は 0 で終了

  var invertPos = Sel.GetActivePos() < Sel.GetAnchorPos();

  if (cmd[cid].selLine) selectLine(Sel);

  if (cmd[cid].selOrAll && isSelEmpty) Sel.SelectAll();

  var res = cmd[cid].func(Sel.Text, Sel);

  if (typeOf(res) === "String") res = ["",res,""];

   if (typeOf(res) !== "Array") break main;

    

   var head = res.shift(), tail = res.pop() || "", body = res.join("");

  Sel.Text = head + body + tail;

  var acp = Sel.GetActivePos() - tail.replace(/\r\n/g,"\n").length;

  var anp = acp                - body.replace(/\r\n/g,"\n").length;

    //※クリップボードなどCR+LFが含まれる場合、1字と数えなければズレる

  Sel.SetActivePos(invertPos? anp: acp);

  Sel.SetAnchorPos(invertPos? acp: anp);

 

//■型判別

function typeOf(obj) {

     Object.prototype.toString.call(obj).slice(8,-1); //"[object Type]".slice

};

//■論理行選択

function selectLine(Sel) {

  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);

};

}());

== 拡張コード ==

:開き括弧類 <code>‘ “ （ 〔 ［ ｛ 〈 《 「 『 【</code> または 半角空白/全角空白/水平タブ/改行 <b style="color:#c00;">以外</b>の文字で始まる行を「地の文」とみなし、行頭に全角空白を挿入します。

<syntaxhighlight lang="javascript" copy>

f.push(["地の文の行頭を字下げ","L",function(_){ //2015-02-14

   return _.replace(/^([^‘“（〔［｛〈《「『【 　\t\n])/gm,"　$1") }]);

</syntaxhighlight>

:閉じ括弧類 <code>’ ” ） 〕 ］ ｝ 〉 》 」 』 】</code> の直前に句読点 <code>、 。 ， ．</code> がある場合、除去します。

 

:例＞ <span style="background:#bfdfff;">Wha<b style="color:#c00;">t</b>！？／あ<b style="color:#c00;">れ</b>!?</span> → What!?／あれ！？（※<b style="color:#c00;">赤字</b>が直前の文字）

<syntaxhighlight lang="javascript" copy>

f.push(["！？を半角/全角に整形","s",function(_){ //2017-06-25

   return _.replace(/[!?！？]+/g,function(s,i,c){c=c.charAt(i-1); return (!c||c==="\n")? s: /[ -~｡-ﾟ]/.test(c)? s.replace(/！/g,"!").replace(/？/g,"?"): s.replace(/\!/g,"！").replace(/\?/g,"？")}) }]);

</syntaxhighlight>

:2文字以上連続する感嘆符・疑問符を半角2文字に整形します。

<syntaxhighlight lang="javascript" copy>

f.push(["連続する！？を整形","s",function(_){ //2015-03-14

   return _.replaceBatch([ [/[!！][!?！？]*[!！]/g,"!!"],[/[!！][!?！？]*[?？]/g,"!?"],[/[?？][!?！？]*[!！]/g,"?!"],[/[?？][!?！？]*[?？]/g,"??"] ]) }]);

</syntaxhighlight>

:1～3文字以上連続する中黒・句点・読点などを、三点リーダー2文字 …… に整形します。

:※変換対象となるのは以下の8パターンです。

:{|class="wikitable" style="text-align:center;"

| 全角コンマ || ，，， || 0x8143 || U+FF0C

<syntaxhighlight lang="javascript" copy>

f.push(["三点リーダー(……)に整形","s",function(_){ //2014-03-01

   return _.replace(/、{3,}|。{3,}|，{3,}|．{3,}|・{3,}|･{3,}|…{1,}|‥{1,}/g,"……") }]);

</syntaxhighlight>

 

:2文字以上連続する長音などを、全角ダッシュ2文字 ―― に整形します。

:※変換対象となるのは以下の4パターンです。

:{|class="wikitable" style="text-align:center;"

| 全角長音符 ||rowspan="5"| 2字以上 || ーー || 0x815B || U+30FC

<syntaxhighlight lang="javascript" copy>

f.push(["全角ダッシュ(――)に整形","s",function(_){ //2017-06-25

   return _.replace(/ー{2,}|\u2014{2,}|―{2,}|－{2,}/g,"――") }]);

 

  return _.replace(/(?:｜([^《\n]+))?《.*?》/g,"$1") }]);

</syntaxhighlight>

:例＞ <span style="background:#bfdfff;">［＃注記付き］名※［＃二の字点、1-2-22］［＃「（銘々）」の注記付き終わり］</span> → 名※

<syntaxhighlight lang="javascript" copy>

:外字を表す注記 <code>※［＃ ～ ］</code> は例外とし、除去しません。

:例＞ <span style="background:#bfdfff;">［＃注記付き］名※［＃二の字点、1-2-22］［＃「（銘々）」の注記付き終わり］</span> → 名※［＃二の字点、1-2-22］

<syntaxhighlight lang="javascript" copy>

<syntaxhighlight lang="javascript" copy>

f.push(["HTMLタグを除去","s",function(_){ //2015-09-30

   return _.replace(/<("[^"]*"|'[^']*'|[^"'>])*>/g,"") }]);

 

  return _.replace(/<br( ?\/)?>\n?/gi,"\n") }]);

</syntaxhighlight>

;★実体参照 &"<> → &xxx;

:{|class="wikitable"

! 文字 !! 実体参照 !! 備考

|align="center"| &lt; || &amp;lt; || 小なり不等号 (less-than sign)

|align="center"| &gt; || &amp;gt; || 大なり不等号 (greater-than sign)

|align="center"| &quot; || &amp;quot; || 引用符 (quotation mark)

|align="center"| &amp; || &amp;amp; || アンド (ampersand)

|align="center"| &nbsp; || &amp;nbsp; || 折り返し禁止空白 (no-break space)

:空白文字 → &amp;nbsp; の変換は、実用上不都合が多いため行いません。

<syntaxhighlight lang="javascript" copy>

f.push(['実体参照 &&"<> → &&xxx;',"s",function(_){ //2015-03-14

   return _.replaceBatch([ ["&","&amp;amp;"],['"',"&amp;quot;"],["<","&amp;lt;"],[">","&amp;gt;"] ]) }]);

f.push(['実体参照 &&xxx; → \u2423><"&&',"s",function(_){ //2015-03-14

   return _.replaceBatch([ ["&amp;nbsp;"," "],["&amp;gt;",">"],["&amp;lt;","<"],["&amp;quot;",'"'],["&amp;amp;","&"] ]) }]);

  return _.replaceBatch([ ["&","&amp;amp;"],['"',"&amp;quot;"],["<","&amp;lt;"],[">","&amp;gt;"],[" ","&amp;nbsp;"] ]) }]);

</syntaxhighlight>

:例＞ <span style="background:#bfdfff;">Aわ𩸽</span> → &amp;#65;&amp;#12431;&amp;#171581;

:→ <b>[[#符号化/復号化]]</b> の節の <b>&#dec; エンコード</b> を参照

;★数値参照 &#xHEX; に変換

:文字列を数値文字参照(16進)形式に変換します。(HEX＝hexadecimal／十六進法)

:例＞ <span style="background:#bfdfff;">Aわ𩸽</span> → &amp;#x41;&amp;#x308F;&amp;#x29E3D;

:→ <b>[[#符号化/復号化]]</b> の節の <b>&#xHEX; エンコード</b> を参照

;★数値参照を文字に変換

:数値文字参照(10進/16進)を文字列に変換します。

:例＞ <span style="background:#bfdfff;">&amp;#65;&amp;#x308F;&amp;#x29e3d;</span> → Aわ𩸽

<syntaxhighlight lang="javascript" copy>

f.push(["数値参照を文字に変換","s",function(_){ //2019-06-01

   return _.replace(/&#(?:([0-9]{1,7})|x([0-9a-f]{1,6}));/gi,function(s,d,x){var n=Number(d||"0x"+x); return (n<=0xFFFF)?String.fromCharCode(n): (n<=0x10FFFF)?String.fromCharCode(n-0x10000>>10|0xD800,n&0x3FF|0xDC00): s}) }]);

</syntaxhighlight>

;★行頭 // を挿入/削除

:※このコマンドをよく利用される場合は「<b>[[コメントマーク付け外し]]</b>」マクロの導入をオススメします。

<syntaxhighlight lang="javascript" copy>

f.push(["行頭 \/\/ を挿入/削除","L",function(_){ //2015-03-14

   return _.replace(/^(\/\/)?/gm,function(s){return s? "": "\/\/"}) }]);

</syntaxhighlight>

 

 

;挿入 Confirm(|)

:文字列 <code>if(!Confirm(</code> <code>))Quit();</code> を挿入します。

<syntaxhighlight lang="javascript" copy>

f.push(["挿入 Confirm(|)","",function(_){ //2019-06-01

   return ["if(!Confirm(" , _ , "))Quit();"] }]);

</syntaxhighlight>

:ステータスバーに eval(<i>選択範囲</i>) の結果を表示します。

:たとえば、選択範囲が <code style="background:#bfdfff;">10*(5+20)</code> なら、250 と表示されます。

<syntaxhighlight lang="javascript" copy>

f.push(["選択範囲を eval で評価","s",function(_){ //2019-06-01

   Status=eval(_) }]);

</syntaxhighlight>

=== 挿入/貼付 ===

;★数値を3桁,区切りに

:半角数字列を3桁毎にコンマで区切ります。小数点以下（ピリオド以降）は区切りません。

:例＞ <span style="background:#bfdfff;">87654321／0.12345／54321.12345</span> → 87,654,321／0.12345／54,321.12345

<syntaxhighlight lang="javascript" copy>

f.push(["数値を3桁,区切りに","s",function(_){ //2014-10-12

   return _.replace(/([^.0-9]|^)([0-9]+)/g,function(_,p,n){return p+n.replace(/([0-9])(?=(?:[0-9]{3})+$)/g,"$1,")}) }]);

</syntaxhighlight>

;複製貼り付け...

:クリップボードの文字列を、入力した回数分複製してから貼り付けます。

<syntaxhighlight lang="javascript" copy>

f.push(["複製貼り付け...","c",function(){ //2019-06-01

   var r=[],c=ClipboardData.GetData(),n=parseInt(Prompt("複製回数: ※半角数字","")); if(n>0){ while(n--){r.push(c)} return r.join("") } }]);

</syntaxhighlight>

<syntaxhighlight lang="javascript" copy>

  var c=ClipboardData.GetData().replace(/(\r\n|[\r\n])$/,""); return _.replace(/^/gm,c) }]);

f.push(["行末に貼り付け","L c",function(_){ //2015-09-30

  var c=ClipboardData.GetData().replace(/(\r\n|[\r\n])$/,""); return _.replace(/$/gm,c) }]);

;★行頭／行末に挿入...

:入力した文字列を、各行の行頭/行末に挿入します。

<syntaxhighlight lang="javascript" copy>

f.push(["行頭に挿入...","L",function(_){ //2019-06-01

   var p=Prompt("行頭に挿入する文字列:",""); if(p)return _.replace(/^/gm,p) }]);

f.push(["行末に挿入...","L",function(_){ //2019-06-01

   var p=Prompt("行末に挿入する文字列:",""); if(p)return _.replace(/$/gm,p) }]);

</syntaxhighlight>

;各行先頭／末尾に挿入...

:<b style="color:#c00;">※矩形対応には Mery 2.1.0 以降が必要です。</b>

:<b style="color:#c00;">※Mery の仕様上、ゼロ幅には対応していません。</b>ゼロ幅で実行すると、<b>表示行頭</b>に文字列が挿入されます。

| <code>^(?=.&#x7C;\n)</code>

| <code>(?<=.)$&#x7C;^(?=\n)</code>

<syntaxhighlight lang="javascript" copy>

f.push(["各行先頭に挿入...","",function(_,$){ //2019-06-01

   var p=Prompt("各行先頭に挿入する文字列:",""); if(p)$.Replace("^(?=.|\\n)", p, meFindReplaceRegExp+meReplaceSelOnly+meReplaceAll) }]);

f.push(["各行末尾に挿入...","",function(_,$){ //2019-06-01

  var p=Prompt("各行末尾に挿入する文字列:",""); if(p)$.Replace("(?<=.)$|^(?=\\n)", p, meFindReplaceRegExp+meReplaceSelOnly+meReplaceAll) }]);

</syntaxhighlight>

;行頭に連番挿入 (#)

:行頭に連番 (1), (2), (3) … を挿入します。

<syntaxhighlight lang="javascript" copy>

  var re=/^/gm, n=1, pf="(", sf=")"; return _.replace(re,function(){return pf+(n++)+sf}) }]);

:選択行数を Z として、連番 (1/Z), (2/Z), (3/Z) … を挿入します。

<syntaxhighlight lang="javascript" copy>

f.push(["行頭に連番挿入 (#/Z)","L",function(_){ //2015-09-30

   var re=/^/gm, n=1, m=(_.match(re)||[]).length, pf="(", sf="/"+m+")"; return _.replace(re,function(){return pf+(n++)+sf}) }]);

<syntaxhighlight lang="javascript" copy>

f.push(["行頭に連番挿入 (0#)","L",function(_){ //2015-09-30

  var re=/^/gm, n=1, m=(_.match(re)||[]).length, pf="(", sf=")", sp="0", k=String(m).length, sp=new Array(k).join(sp); return _.replace(re,function(){return pf+(sp+(n++)).slice(-k)+sf}) }]);

</syntaxhighlight>

;※行頭に連番挿入系コマンドの比較

:{|class="wikitable"

! 例文 !! (#) !! (#/Z) !! (0#)

|-

| 1行目<br>2行目<br>…<br>9行目<br>10行目<br>11行目<br>…<br>99行目<br>100行目

| (1)1行目<br>(2)2行目<br>…<br>(9)9行目<br>(10)10行目<br>(11)11行目<br>…<br>(99)99行目<br>(100)100行目

| (1/100)1行目<br>(2/100)2行目<br>…<br>(9/100)9行目<br>(10/100)10行目<br>(11/100)11行目<br>…<br>(99/100)99行目<br>(100/100)100行目

| (001)1行目<br>(002)2行目<br>…<br>(009)9行目<br>(010)10行目<br>(011)11行目<br>…<br>(099)99行目<br>(100)100行目

|}

:{|class="wikitable"

|colspan="2"| ゼロ始まりならゼロ埋め

f.push(["連番を出力...","",function(_){ //2019-06-01

  var p=Prompt("連番を出力: ※例＞ 第1..10章",_.match(/^.*/)[0]), q=p.replace(/^([\s\S]*?)((0*)[0-9]+)\.\.((0*)[0-9]+)([\s\S]*)$/,function(_,p,n,nz,m,mz,q){var r=[],d=Math.max(n.length,m.length),z=(nz||mz)?new Array(d+1).join("0"):"",n=Number(n),m=Number(m); if(n<=m){for(;n<=m;n++)r.push(p+(z+n).slice(-d)+q);}else{for(;n>=m;n--)r.push(p+(z+n).slice(-d)+q);} return r.join("\n")}); if(q!==p)return q }]);

<syntaxhighlight lang="javascript" copy>

f.push(["空白文字を除去","s",function(_){ //2013-09-15

   return _.replace(/[ 　\t]+/g,"") }]);

</syntaxhighlight>

;★行頭行末／行頭／行末の空白を除去

<syntaxhighlight lang="javascript" copy>

f.push(["行頭行末の空白を除去","L",function(_){ //2013-09-15

   return _.replace(/^[ 　\t]+|[ 　\t]+$/gm,"") }]);

 

  return _.replace(/^[ 　\t]+$/gm,"") }]);

</syntaxhighlight>

 

:空白行（半角空白/全角空白/水平タブ/改行のみの行）を削除します。

<syntaxhighlight lang="javascript" copy>

f.push(["空白行を削除","L",function(_){ //2015-03-14

   return _.replace(/^[ 　\t]*$\n?/gm,"") }]);

</syntaxhighlight>

:連続する空白行を1行の空行に変換します。連続しない（＝1行の）空白行は削除します。

 

:空白行（半角空白/全角空白/水平タブ/改行のみの行）は例外とし、削除しません。

<syntaxhighlight lang="javascript" copy>

f.push(["重複行を単一化(空白行は除く)","L",function(_){ //2018-01-15

  var a=_.split("\n"),b=[],map={}; for(var i=0;i<a.length;i++){ if(/^[ 　\t]*$/.test(a[i])||!Object.prototype.hasOwnProperty.call(map,a[i])){map[a[i]]=true;b.push(a[i])} } return b.join("\n") }]);

   return _.replace(/(^.*$)\n(^\1$\n?)+/gm,"$2") }]);

 

  var a=_.split("\n"),b=[],k=0,map={}; for(var i=0;i<a.length;i++){ if(!Object.prototype.hasOwnProperty.call(map,a[i])){b[k]={dup:false,txt:a[i]};map[a[i]]=k++;}else{b[map[a[i]]].dup=true} } i=b.length;while(--i>=0){ if(b[i].dup){b[i]=b[i].txt}else{b.splice(i,1)} } return b.join("\n") }]);

 

 

  var p=Prompt("以下の文字列を含まない行を削除:",""); if(p)return _.replace(/^(.*)$\n?/gm,function(s,t){return (t.indexOf(p)>=0)? s:""}) }]);

 

f.push(["正規表現に一致する行を削除...","L",function(_){ //2019-06-01

  var p=Prompt("以下の正規表現に一致する行を削除:",""); if(p){ p=new RegExp(p); return _.replace(/^(.*)$\n?/gm,function(s,t){return p.test(t)? "":s}) } }]);

  var p=Prompt("以下の正規表現に一致しない行を削除:",""); if(p){ p=new RegExp(p); return _.replace(/^(.*)$\n?/gm,function(s,t){return p.test(t)? s:""}) } }]);

 

  var n=parseInt(Prompt("行頭から削除する字数: ※半角数字","")); if(n>0)return _.replace(new RegExp("^(?:[\\uD800-\\uDBFF][\\uDC00-\\uDFFF]|[^\\n]){0,"+n+"}","gm"),"") }]);

 

f.push(["ASCII文字を単語検索","",function(_,$){ //2017-05-28