Pagerank Sorgulama

Eylül 19, 2008 at 11:40 am Yorum bırakın

Kod hakkında bilgiler;

; Bu Satırdan sonra yapıcağınız değişiklikler çalışmamasına sebep olabilir
; PR Değerleri PageRank.Gen.TR’den Alınmaktadır
; http://www.mIRCDb.Com / http://www.mIRCCafe.Net
; CipriXCem@GmaiL.Com
alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ) | return %x } }
on *:sockopen:pr:{
sockwrite -n $sockname GET /pagerank-sorgula/ $+ %site HTTP/1.1
sockwrite -n $sockname Host: pagerank.gen.tr $+ $crlf $+ $crlf
}
on *:sockread:pr:{
var %prdeger
sockread %prdeger
if (<br><h2> isin %prdeger) echo -a *** Sitenizin PageRank Değeri 410 Üzerinden: $+ 4 $remove(%prdeger,<br><h2>,</h2>,/,10,$chr(9)) | .unset %site
}
alias pr {
if $1 == $null {
.echo -a Hata! 4Lütfen Bir Site Belirtin.. ÖRN: /pr http://www.mIRCCafe.Net
}
if $1 == http://www.google.com {
.echo -a *** Sitenizin PageRank Değeri 410 Üzerinden:4 10
}
else {
.set %site $1
.sockclose pr
.sockopen pr http://www.pagerank.gen.tr 80
}
}
on *:load:{
.echo -a 2Google Pagerank Sonucuna hoş geldiniz..
.echo -a 2Kullanımı:
.echo -a 7/pr www.site.com şeklindedir
.echo -a 7ÖRN: /pr www.mIRCCafe.Net
.echo -a 7Kesin Sonuç almak istiyorsanız sitenin başına www. ekleyiniz
.echo -a 2CipriX Coding©
.echo -a 2www.mIRCDb.Com // http://www.mIRCCafe.Net
}

Entry filed under: mIRC Hazır Kodlar. Tags: .

IP’ye Tıklayarak K:line Atmak Oto Nick Identify

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

Trackback this post  |  Subscribe to the comments via RSS Feed


Takvim

Eylül 2008
P S Ç P C C P
    Eki »
1234567
891011121314
15161718192021
22232425262728
2930  

Most Recent Posts


%d blogcu bunu beğendi: