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

#                                                                                      #

#                  BNC KORUMASI v1.0 - Written By CLubber                              #

#                                                                                      #

# Bu scriptle eggdrop botlarınız hariç aynı ip'den bnc kullananları banlayabilirsiniz. #

#                                                                                      #

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

 
# Kullanacağınız sunucunun ip numarası

 
set bnc(ip) "1.1.1.1"

 
# Kill mesajı

 
set bnc(kill) "Kullandığınız ip sunucu ip'sidir, BNC (Bouncer) kullanarak sunucumuza bağlanamazsınız!"

 
# Bundan sonrasında herhangi bir değişikliğe gerek yok

 
bind raw * notice bnc:connect

proc bnc:connect {from keyword arg} {

  global botnick bnc

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

    set nick [lindex $arg 9]

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

    if {![string match -nocase "$bnc(ip)" $ip]} { return }

    if {[string match -nocase "Oyuncu" $nick] || [string match -nocase "KAOS" $nick] || [string match -nocase "Kelime" $nick]} { return }

    putquick "KILL $nick $bnc(kill)"

  }

}

 
 
putlog "BNC Koruması v1.0 - Written By CLubber"