Adminler için kayıtlı nickleri sorgulamaya yarayan bir kod. İsteğe göre geliştirilebilir. Belirlediğiniz nickin kaç tane link nicki var girdiği ip'e kayıtlı kaç tane nick var ajoin listesindeki kanallar Ülke Şehir ISP bilgisi vs...
Eksiklik olabilir varsa düzenleme yaparım.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } }
on *:input:#:{
if $regex($1,/^[.!]gbt$/Si) {
if ($window(@GBT) == $null) { window -ne @GBT }
echo 2 -t @GBT 4-2 ****** $2 için Bilgiler Sıralanıyor ******
if (!$2) { .timer -h 1 500 echo 2 -t @GBT Nick belirtmedin ;) }
else { .set -u5 %nck1 $2 | .ns info $2 all | .enable #gbt }
}
if $regex($1,/^[.!]gbtip$/Si) {
if ($window(@GBT) == $null) { window -ne @GBT }
echo 2 -t @GBT 4-2 ****** $2 için Bilgiler Sıralanıyor ******
if (*.*.* !iswm $2) { .timer -h 1 500 echo 2 -at IP belirtmedin ;) }
else { .ns list $+(*@,$2) | .enable #gbt | var %:r = $r(1000,99999) | .sockopen $+(gbt,%:r)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(gbt,%:r) $2 }
}
}
#gbt off
on ^*:NOTiCE:*:*:{
if ($nick == NickServ) {
if (*Son gorulen adres* iswm $1-) || (*Online oldugu adres* iswm $1-) { .timerlinks 1 1 .ns listlinks %nck1 | .timerlist 1 2 .ns list $+(*@,$token($4,2,64)) | .timerajoin 1 3 .ns ajoin list %nck1 | var %:r = $r(1000,99999) | .sockopen $+(gbt,%:r)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(gbt,%:r) $token($4,2,64) }
}
if ($nick == NickServ) && (*kayitli*nick*degil* iswm $1-) {
if ($window(@GBT) == $null) { window -ne @GBT }
echo 2 -t @GBT 4- 2Arama yapmak istediğiniz nick kayıtlı değil. | .timerdis 1 1 .disable #gbt
halt
}
if ($nick == NickServ) && (*kayitli*nick*degil* !iswm $1-) {
if ($window(@GBT) == $null) { window -ne @GBT }
echo 2 -t @GBT 4-2 $1-
halt
}
}
#gbt End
on *:sockopen:gbt*:{
sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$sock($sockname).mark) HTTP/1.1
sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname Connection: keep-alive
sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36
sockwrite -nt $sockname $crlf
}
on *:sockread:gbt*:{
if ($sockerr) { .sockclose $sockname | return }
var %:gbt | sockread -f %:gbt
if (IP Country: isin %:gbt) {
if ($window(@GBT) == $null) { window -ne @GBT }
echo 2 -t @GBT 4- 2Ülke:4 $iif($token($htmlfree(%:gbt),2,58) == $null,Belirsiz,$token($htmlfree(%:gbt),2,58))
}
if (IP Region: isin %:gbt) {
if ($window(@GBT) == $null) { window -ne @GBT }
echo 2 -t @GBT 4- 2Bölge:4 $iif($token($htmlfree(%:gbt),2,58) == $null,Belirsiz,$token($htmlfree(%:gbt),2,58))
}
if (IP City: isin %:gbt) {
if ($window(@GBT) == $null) { window -ne @GBT }
echo 2 -t @GBT 4- 2Sehir:4 $iif($token($htmlfree(%:gbt),2,58) == $null,Belirsiz,$token($htmlfree(%:gbt),2,58))
}
if (ISP Provider: isin %:gbt) {
if ($window(@GBT) == $null) { window -ne @GBT }
echo 2 -t @GBT 4- 2ISP:4 $iif($token($htmlfree(%:gbt),2,58) == $null,Belirsiz,$token($htmlfree(%:gbt),2,58))
sockclose $sockname
.timerdis 1 5 .disable #gbt
}
}