MeryWiki

「連続する重複行を削除」の版間の差分

← 古い編集
編集の要約なし
MSY-07 (トーク | 投稿記録)
2,331 回編集
SyntaxHighlightにcopyの追加
 
(2人の利用者による、間の9版が非表示)
1行目: 1行目:
;説明
このマクロはMeryのMacrosフォルダに同梱されています。
 
== 概要 ==
編集中の文書の重複する行を削除します。昇順・降順で並べ替えと併せて使用するとさらに効果的です。
編集中の文書の重複する行を削除します。昇順・降順で並べ替えと併せて使用するとさらに効果的です。


 
== ソースコード ==
;構文
<syntaxhighlight lang="javascript" copy>
<source lang="javascript">
// -----------------------------------------------------------------------------
// -----------------------------------------------------------------------------
// 連続する重複行を削除
// 連続する重複行を削除
//
//
// Copyright (c) Kuro. All Rights Reserved.
// Copyright (c) Kuro. All Rights Reserved.
// e-mail: admin@haijin-boys.com
// www:    https://www.haijin-boys.com/
// www:    http://www.haijin-boys.com/
// -----------------------------------------------------------------------------
// -----------------------------------------------------------------------------


if (document.selection.Text == "")
var sel = document.selection;
  document.selection.SelectAll();
if (sel.Text == "") {
var s1 = document.selection.Text.split("\n");
sel.SelectAll();
var s2 = new Array();
}
var s1 = sel.Text.split("\n");
var s2 = [];
for (var i = 0; i < s1.length; i++) {
for (var i = 0; i < s1.length; i++) {
  if (i == 0 || s1[i-1] != s1[i])
if (i == 0 || s1[i-1] != s1[i]) {
    s2.push(s1[i]);
s2.push(s1[i]);
}
}
}
document.selection.Text = s2.join("\n");
sel.Text = s2.join("\n");
document.selection.StartOfDocument();
sel.StartOfDocument();
</source>
</syntaxhighlight>
「https://www.haijin-boys.com/wiki/連続する重複行を削除」から取得
スポンサーリンク