Twitter で引用返信する Greasemonkey

上から目線のコメント付き非公式 RT がうざいので、ちゃんと reply させるために書こうとしたが上手く書けくて飽きた。

// ==UserScript==
// @name          Twitter QuoteReply
// @namespace     http://d.hatena.ne.jp/worris2/
// @description   Make replies with quoting in Twitter
// @include       http://twitter.com/*
// ==/UserScript==

(function() {

var replyButton = document.evaluate("//span[@class='reply']/a", document, null, XPathResult.ORDERED_NODE_SNAPSHOT_TYPE, null);
var replyText = document.evaluate("//span[@class='entry-content']", document, null, XPathResult.ORDERED_NODE_SNAPSHOT_TYPE, null);
for (i=0;i<replyButton.snapshotLength;i++){
  var newButton=document.createElement('a');
  newButton.setAttribute('href',replyButton.snapshotItem(i).getAttribute('href').replace('%20',':%20'+replyText.snapshotItem(i).innerHTML+'%20').replace('=','=%20QT%20'));
  newButton.innerHTML='(QT)';
  replyButton.snapshotItem(i).parentNode.parentNode.appendChild(newButton);
}
})();