Konu: Tcl Arşivi
Tekil Mesaj gösterimi
Alt 16 Aralık 2007, 22:39   #20
Çevrimdışı
AsiL
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Tcl Arşivi




İnviter Koruma

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#########################################################################
#                                                         mirchane.com  #
#   _|_|_|_|_|                                        _|            _| #
#       _|      _|_|_|  _|  _|_|    _|_|_|  _|    _|        _|_|_| #
#       _|    _|    _|  _|_|      _|    _|  _|    _|  _|  _|        _|  #
#       _|    _|    _|  _|        _|    _|  _|    _|  _|  _|        _|  #
#       _|      _|_|_|  _|          _|_|_|    _|_|_|  _|    _|_|_|  _|  #
#                                                 _|                    #
#                                             _|_|   _|_|          _|   #
#                                                  _|   _|       _|  _| #
#                                                      _|        _|  _| #
#                                                    _|          _|  _| #
#                                                  _|_|_|_|   _|   _|   #
#                                                                       #
#########################################################################
#########################################################################
# inviterlerin serverdan nasıl atılacagını belirler.                    #
# Kline için "kline" ; Kill için "kill" yazınız.                        #
#                                                                       #
  
set atma "kline"
  
set ktime "+3600"
#########################################################################
# inviterlerin serverdan  atılırken yazılacak mesajı belirler.          #
#                                                                       #
  
set txt "1Reklam/Küfür tespit edildi. Auto Kline!"
#########################################################################
# Kanaldan cıkıp kanala girme zamanını belirler. (Dakika turunden)      #
#                                                                       #
  
set cikgir 5
#########################################################################
# host gizlemede kullanılacak ipyi belirler.                            #
# ornek : 1342A7A7.45327A5C.55774CAB1.IP                                #
#                                                                       #
 
set host "Scanner"
#########################################################################
# Botun nicki confdaki nickle aynı olmalıdır.                           #
#                                                                       #
 
set bnick H-B
#########################################################################
#                                                                       #
#                          !! DIKKAT !!                                 #
#      Burdan sonrasında oynama yapmayınız. Botunuzun hatalı            #
#             çalışmasına sebebiyet verebilirsiniz.                     #
#                                                                       #
#########################################################################
set hst 1
set host Scanner
set colornum 0
bind msgm 
"*s*e*r*v*e*r*" tara
bind msgm 
"*i*r*c*.*" tara
bind msgm 
"*w*w*w*.*" tara
bind msgm 
"h*t*t*p*:*/*" tara
bind msgm 
"*.*c*o*m*" tara
bind msgm 
"*.*n*e*t*" tara
bind msgm 
"*i*r*c*.*k*i*t*l*e*.*n*e*t*" tara
bind msgm 
"*.tr*" tara
bind msgm 
"*******" tara
bind msgm 
"*p0rn0*" tara
bind msgm 
"film" tara
bind msgm 
"***" tara
bind msgm 
"seks" tara
timer $hst host
proc host 
{} {
 global 
bnick host
  putserv 
"chghost $bnick $host"
  
putserv "mode $bnick +H"
}
timer $cikgir cikgir
proc cikgir 
{} {
 global 
cikgir
 
foreach kanal [channels] {
  
putserv "part $kanal"putserv "join $kanal"timer $cikgir cikgir
 
}
}
proc tara {nick uhost hand thinks} {
global 
colornum txt atma botnick ktime
   putserv 
"$atma $nick $ktime$txt"
}
#########################################################################
# Tarayici Version 2.0                                                  #
putlog "Tarayici 2.0 =- By mirchane.com -= yuklendi."
# Tarayici Version 2.0                                                  #
######################################################################### 


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver