/*
リストに沿って一括置換をするマクロ。
"検索文字列","置換文字列",	の順で書く。
リストの上から順に置換していくので、順番に注意。
*/

var word = new Array(

//HTML文書で & < >を実体参照化する場合
"&","&amp;",
"<","&lt;",
">","&gt;",

//HTML文書で実体参照文字から戻す場合
/*
"&lt;","<",
"&gt;",">",
"&amp;","&",
*/


"","");	//この行はいじらない

//文字列を選択していなければ全文を選択する
if (document.selection.Text == "")
	document.selection.SelectAll();

var tx = document.selection.Text;
for (i = 0; i < word.length; i += 2) {
	var r = new RegExp(word[i], "mg");
	tx = tx.replace(r, word[i+1]);
}
document.selection.Text = tx;

//キャレットを選択範囲の先頭に移動（無効化するとキャレットは選択範囲の末尾に居座る）
document.selection.StartOfDocument();