IRCDForum.COM - IRC ve mIRC dünyasının forumu!   Reklam Alanı


  IRCDForum.COM - IRC ve mIRC dünyasının forumu! IF - Unreal, Services ve Botlar Eggdrop, BNC ve Socket Botlar TCL Scriptler


Like Tree1Teşekkürler;
  • 1 Post By No_FeaR

Yeni Konu   Cevap Yaz

 
LinkBack Seçenekler Stil
Alt 22 Mart 2015, 14:11   #1
 
No_FeaR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 27 Ocak 2015
Bulunduğu yer: Denizli
Mesajlar: 130
WEB Sitesi: www.AlemTR.com
IRC Sunucusu: www.AlemTR.com
İlgi Alanı:
Alınan Beğeni: 62
Standart Delay Join TCL v2.0 - Online IRC Tor/Proxy Taraması

* Bu TCL ile, sunucunuza bağlanan kullanıcılara tarama yaptırarak sunucunuzun güvenliğinizi kolayca sağlayabilirsiniz.

* Delay Join ve Proxy Koruması birleştirilmiştir, Kısacası kullanıcı sunucunuza bağlandığında bot kanallara almadan online web sitesinden tor/proxy olup olmadığına bakar.

* Proxy/Tor olarak algıladığı kullanıcıyı uzaklaştırır, temiz bulduğu kullanıcıları tor(kanal) olarak belirlediğiniz kanallara çeker.

* Temiz bulduğu kullanıcılara mesaj atıp, belirttiğiniz süre zarfı sonunda "5 - 10 sn." kanallara çeker.

* Kanallara alınmadan kullanıcı tarandığı için kanal genelinde herhangi bir karmaşa/kirlilik olmaz.

* TCL Yapımcısı: CLubber


* Not: $time[list bu bölümdeki $time ile [ arasında boşluk olması gerekmektedir, aksi taktirde bot çalışmaz.

Kod:
  
   
###############   K O M U T L A R  B Ö L Ü M Ü   #############

##                                                          ##

##     Botumuzun sunucu üzerindeki çalıştıran komutlarını   ##

##      kendinize özel yapabilir yada asla değiştirmeden    ##

##             mevcut hali ile kullanabilirsiniz            ##

##                                                          ##

##############################################################





set tor(kanal) "#Sohbet,#Radyo,#Oyun"

set tor(sure) "5"



bind raw * notice tor:connection

proc tor:connection {from keyword arg} {

  global tor

  if {[string match -nocase "*Client connecting on port*" $arg]} {

    set nick [lindex $arg 9]

    set port [string range [lindex [split [lindex $arg 8] ":"] 0] 0 end]

    set ident [string range [lindex [split [lindex $arg 10] "@"] 0] 1 end]

    set ip [string range [lindex [split [lindex $arg 10] "@"] 1] 0 end-1]

    if {![regexp {[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}} $ip]} {

      set ip [dnslookup $ip dienes]

    }

    set connect [::http::geturl http://rbls.org/$ip] 

    set files [::http::data $connect] 

    if {[string match -nocase "*listed in*other blacklists*" $files]} {

      putquick "GLINE *@$ip 12h Tor Koruması v3.0 Coded By CLubber"

      ::http::cleanup $files 

    }

    if {[string match -nocase "*not listed in any blacklists*" $files]} {

      utimer $tor(sure)[list putquick "sajoin $nick $tor(kanal)"]

      ::http::cleanup $files 

    }

  }

}



proc dienes {ip host status} { 

  if {!$status} {return}

  return $ip

}



putlog "Delay Join TCL v2.0 - Written By CLubber"

DİPNOT ; TCL'nin Yapım Tarihi 2011 Olduğundan Dolayı Proxy Çektiği Site Kapanmış veya Güncellenmemiş Olabilir, Gerekli Kontrolleri Yapabilirsiniz.
Entrance bu mesaja teşekkür etti






Aynı Dünyada Yaşamamalı Cellatlar Ve Çocuklar .
Ya Ölmeli Cellatlar,Yada Hiç Doğmamalı Çocuklar...!

Konu No_FeaR tarafından (22 Mart 2015 Saat 14:14 ) değiştirilmiştir.
 No_FeaR isimli Üye şimdilik offline konumundadır   Alıntı

Yeni Konu   Cevap Yaz

Etiketler
delay, irc, join, online, taraması, tcl, tor or proxy, v20


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

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 Açık
Pingbacks are Açık
Refbacks are Açık





Powered by vBulletin®
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Chat - Sohbet