Code: Select all
BBC - Science & Nature - Planet Earth @ http://www.bbc.co.uk/nature/animals/planetearth/ | Earth @ http://seds.lpl.arizona.edu/nineplanets/nineplanets/earth.html | </p><p class=g><a href="/url?q=http://ww @ /search?q=planet+earth+clothing&revid=2076090134&sa=X&oi=revisions_inline&ct=revision&cd=1>planet
Code: Select all
# !google [define:|spell:] <search terms> <1+1> <1 cm in ft> #
# <patent ##> <weather city|zip> <??? airport> #
# !images <search terms> #
# !groups <search terms> ------------------ currently broken #
# !news <search terms> #
# !local <what> near <where> #
# !localuk <what> near <where> #
# !book <search terms> -------------------- currently broken #
# !video <search terms> #
# !fight <word(s) one> vs <word(s) two> #
# !youtube <search terms> #
# !atomfilms <search terms> --------------- currently broken #
# !ifilms <search terms> ------------------ currently broken #
# !gamespot <search terms> #
# !gamefaqs <system> in <region> #
# !blog <search terms> #
# !ebay <search terms> #
# !ebayfight <word(s) one> vs <word(s) two> #
# !wikipedia <search terms> #
# !locate <ip or hostmask> #
# !review <gamename> [@ <system>] #
# !torrent <search terms> #
# !top <system> #
# !popular <system> #
Code: Select all
<speechles> !g planet earth
<sp33chy> 68,800,000 results | Earth @ http://seds.lpl.arizona.edu/nineplanets/nineplanets/earth.html | BBC - Science & Nature - Planet Earth @ http://www.bbc.co.uk/nature/animals/planetearth/ | BBC - Science & Nature - Planet Earth @ http://www.bbc.co.uk/sn/tvradio/programmes/planetearth/ | Earth - Wikipedia, the free encycloped @ http://en.wikipedia.org/wiki/Earth
<speechles> !v funny
<sp33chy> 901,643 videos | Funny Animals (... Clips of an @ http://video.google.com/videoplay?docid=-6768191643962653988 | Funny Commercials II (So many fo @ http://video.google.com/videoplay?docid=-4686887310667479716 | Asian Backstreet Boys Funny Vid @ http://video.google.com/videoplay?docid=-5721216010568488162 | NTU Student survey - Funny comment @ http://video.google.com/videoplay?docid=4677717832230761610
Code: Select all
} elseif {[string len $game] > 1} {
append output "${incith::google::seperator}${game}"
#append output ",${game}"
}
Code: Select all
} elseif {[string len $game] > 1} {
#append output "${incith::google::seperator}${game}"
append output "- ${game}"
}
The way it should be depends on taste, you have yours, and I have mine.. at least we agree on somethingwith date and game for each date(The way it should be):
(19:58:07) <@incith> !g planet earth
(19:58:09) <@visitant> BBC - Science & Nature - Planet Earth @ http://www.bbc.co.uk/nature/animals/planetearth/ | Earth @ http://seds.lpl.arizona.edu/nineplanets ... earth.html | Planet Earth Clothing @ http://www.planetearthstreetwear.com/index.php | Planet Earth Clothing: Planet Earth @ http://www.skatewarehouse.com/MAPLANETEARTH.html
This is much closer to the actual google results (yes, I have subresults enabled, I like them<speechles> !g planet earth
<sp33chy> 111,000,000 results | Earth @ http://seds.lpl.arizona.edu/nineplanets ... earth.html | BBC - Science & Nature - Planet Earth @ http://www.bbc.co.uk/nature/animals/planetearth/ | BBC - Science & Nature - Planet Earth @ http://www.bbc.co.uk/sn/tvradio/programmes/planetearth/ | Earth - Wikipedia, the free encycloped @ http://en.wikipedia.org/wiki/Earth
Code: Select all
--- incith-google.tcl 2007-02-27 01:12:26.000000000 -0700
+++ eggdrop/scripts/incith-google.tcl 2007-03-02 16:39:17.000000000 -0700
@@ -1048,6 +1048,7 @@
regexp -nocase -- {^(.+?) near (.+?)$} $input - search location
# for the rest
regsub -all -- {\+} $input {%2B} input
+ regsub -all -- {\"} $input {%22} input
regsub -all -- { } $input {+} input
# GOOGLE
@@ -1092,7 +1093,7 @@
# beware, changing the useragent will result in differently formatted html from Google.
set ua "Lynx/2.8.5rel.1 libwww-FM/2.14 SSL-MM/1.4.1 OpenSSL/0.9.7e"
set http [::http::config -useragent $ua]
- set http [::http::geturl $query -timeout [expr 1000 * 10]]
+ set http [::http::geturl "$query" -timeout [expr 1000 * 10]]
set html [::http::data $http]
# generic pre-parsing