Proxomitron フィルター作成スレッド Part3

>>519-520 のフィルタを元に汎用型にしたフィルタ。
395氏、>>519氏に感謝。

[Patterns]
Name = "Google Add Link (2005-09-29)"
Active = TRUE
URL = "www.google.co(m|.jp)/search\? $TYPE(htm)"
Limit = 1024
Match = "(<a\sclass=$AV(fl) href=$AV(http://[^/]+/search\?q\=cache:[^:]+:([^+]+)\0\+*)>[^<]+</a>)\1"
Replace = "\1\n - <a class="fl" href="http://web.archive.org/web/*/http://\0">Internet Archive</a>"
"\n - <a class="fl" href="http://www.excite.co.jp/world/english/web/?wb_url=http://\0">Excite Translation</a>\n"

[Patterns]
Name = "Google Add Link [+2ch search] (2005-09-29)"
Active = TRUE
URL = "www.google.co(m|.jp)/search\? $TYPE(htm)"
Limit = 1024
Match = "$URL(*[?&]ie=s(hift|)[_-]+jis&*[?&]q=([^&]+)\0)"
"(<font size=$AV(-1)>)\#<b>(<a href=$AV(/intl/ja/options/) class=$AV(q)>[^<]+</a>)\#</b>"
"$SET(#=    \n"
"<a style="color: #008844" href="http://ttsearch.net/s.cgi?k=\0&o=r">ttsearch.net</a>\n)|"
"(<a[%20]class=$AV(fl) href=$AV(http://[^/]+/search\?q\=cache:[^:]+:([^+]+)\0\+*)>[^<]+</a>)\#"
"$SET(#=\n - <a class="fl" href="http://web.archive.org/web/*/http://\0">Internet Archive</a>"
"\n - <a class="fl" href="http://www.excite.co.jp/world/english/web/?wb_url=http://\0">Excite Translation</a>\n)"
Replace = "\@"

上は、Internet Archive, Excite翻訳 のリンクの追加のみ。
2chスレッド検索は検索バーから検索するから要らないという人のため。
下は、上に追加して ttsearch.net (2chスレッド検索) のリンクの追加。
395氏のフィルタと同じく、2chスレッド検索はエンコード形式が Shift_JIS の時のみ有効。
これを使う人はGoogleのエンコード形式を Shift_JIS にするであろうから、半角文字のみの場合の処理は省略。