; 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
; [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] / [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
;
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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 &#220;zerinden: $+ 4 $remove(%prdeger,<br><h2>,</h2>,/,10,$chr(9)) | .unset %site
}
alias pr {
if $1 == $null {
.echo -a Hata! 4L&#252;tfen Bir Site Belirtin.. &#214;RN: /pr [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
}
if $1 == [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] {
.echo -a *** Sitenizin PageRank Değeri 410 &#220;zerinden:4 10
}
else {
.set %site $1
.sockclose pr
.sockopen pr [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}
}
on *:load:{
.echo -a 2Google Pagerank Sonucuna hoş geldiniz..
.echo -a 2Kullanımı:
.echo -a 7/pr [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] şeklindedir
.echo -a 7&#214;RN: /pr [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
.echo -a 7Kesin Sonu&#231; almak istiyorsanız sitenin başına [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ekleyiniz
.echo -a 2CipriX Coding&#169;
.echo -a 2
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
color=red>[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
}


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Socketlerde Bana Yardımcı Olan: SeRDaR406'ya Teşekk&#252;r ederim..