heartbroken Op

Joined: 23 Jun 2011 Posts: 106 Location: somewhere out there
|
Posted: Mon Jan 02, 2012 2:56 pm Post subject: pr info script |
|
|
hey ..
i just want to make a script for to triggering !pr www.somewebpage.com to the bot.
| Code: | bind pub -|- !pr pr:pr
package require http
proc pr:pr {nick host handle chan content} {
set channel "#kanalınız"
set hiz "googlePS"
set pagerank "googleP"
set alexaUsira "alexaC"
set alexaDsira "alexaG"
set ggblink "googleB"
set ggindex "googleI"
set face "facebook"
set dmozreg "dmoz"
set yahobl "yahooB"
set bingindex "bingI"
set content [http::data [http::geturl "http://www.sitebilgi.net"]]
if {[regexp "<td><span>...</span></td>" $content match pr] } {
regsub -all {<alt>} $match {} match
putserv "PRIVMSG $channel : \002\0034,1 $nick sitebilgi.net adresinden bilgi bekleniyor.\003\002"
putserv "PRIVMSG $channel : \002\0034,1 Sayfa hızı skoru $hiz \0030,1:: \0034,1Google pagerank $pagerank Alexa dünya sırası $alexaDsira \0030,1::\0034,1 Alexa ülke sırası $alexaUsira \003\002"
putserv "PRIVMSG $channel : \002\0034,1 Google backlink $ggblink \0030,1:: \0034,1Google indeksi $ggindex Facebook'ta paylaşım $face \0030,1::\0034,1 DMOZ kaydı $dmozreg \003\002"
putserv "PRIVMSG $channel : \002\0034,1 Yahoo backlink $yahobl \0030,1:: \0034,1Bing indeks sayısı $bingindex \0030,1::\0034,1 bilgi alımı tamamlandı. \003\002"
}
}
|
i dont have any experience as you can see with coding.but i have try to creat somethings like this but i couldnt know how can i transfer data from this www.sitebilgi.net site.i dont know which part of this web site's source code i should use for to transfer data into this script.and i dont know how can i do this.
can someone help me for to creat socket with this site into this script please ?
thank you.. _________________ Life iS Just a dReaM oN tHE wAy to DeaTh |
|