IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  vaybe sohbet

>
+
Etiketlenen Kullanıcılar

19Beğeni(ler)
  • 8 Post By Alper
  • 2 Post By Alper
  • 1 Post By Alper
  • 5 Post By Forbidden
  • 3 Post By Forbidden

 
 
LinkBack Seçenekler Arama Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 29 Ocak 2018, 17:54   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
!gbt Nick/!gbtip IP




Merhaba Arkadaşlar,
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.

Kullanımı:
!gbt nick
!gbtip IP
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 } }



Konu YouMyCure tarafından (22 Eylül 2018 Saat 16:32 ) değiştirilmiştir. Sebep: Kod Güncelleme
 
Alıntı ile Cevapla

 

Etiketler
kayitli, nick, sorgulama


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Anope 2.0.6'da nick şifresini girmeyenlere default nick veremiyorum Root|0 Anope 6 25 Ocak 2018 03:28
!rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım? ircmsn mIRC Scripting Sorunları 30 20 Temmuz 2012 18:15
Nick renklendirici addon lazım sunucu sahibi nin nick rengi renkli olcak mesela iCe-t mIRC Scripting Sorunları 10 10 Kasım 2009 23:36