07 Şubat 2018, 22:58
#1 Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Badnick badnick.db varsa guest yapsın
Yardimci olurmusunuz.
Asagidaki koda +b atiyor badnick istedigim su badnick guest cevrilsin atilmasin.
bndizin badnickleri cekiyor yapmak istedim +b yerine nicki degistirsin.
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
bind join - * sv2_badnick_55
proc sv2_badnick_55 { nick uhost hand chan } {
global botnick sv2
if { $sv2 ( bndurum ) == "on" } {
if { $nick == $botnick } { return 0 }
if {[ isop $nick $chan ]} { return 0 }
if {[ ishalfop $nick $chan ]} { return 0 }
if {[ onchan $nick $sv2 ( adminc )] || [ onchan $nick $sv2 ( operc )] || [ onchan $nick $sv2 ( opc )] || [ onchan $nick $sv2 ( helpersc )]} { return 0 }
if {[ botisop $chan ]} {
if {[ info exists :: muaflist ]} {
foreach mf $:: muaflist {
if {[ string match - nocase $mf $nick ! $uhost ]} { return 0 }
}
}
set r [ lindex $sv2 ( renk ) [ rand [ llength $sv2 ( renk )]]]
set input "[open " $sv2 ( bndizin ) " r]"
set lines "[split [subst -nocommands [read $input ]] \n]"
catch { close $input }
foreach line $lines {
if { $line != "" } {
if {[ string match " $line " [ string tolower $nick ]]} {
putquick "MODE $chan +b $line "
putquick "KICK $chan $nick \003 $r$sv2 (badnickmsg)\003"
##putquick "PRIVMSG $sv2(logc) \026 BadNick \026 \003$r\002$nick\002 nickini \002$line\002 olarak değiştirdiği için \002$chan\002 odasından uzaklaştırıldı.\003"
}
}
}
}
}
}
bind nick - * sv2_rbadnick_55
proc sv2_rbadnick_55 { nick uhost hand chan newnick } {
global botnick sv2
if { $sv2 ( bndurum ) == "on" } {
if { $newnick == $botnick } { return 0 }
if {[ isop $newnick $chan ]} { return 0 }
if {[ ishalfop $newnick $chan ]} { return 0 }
if {[ botisop $chan ]} {
if {[ onchan $newnick $sv2 ( adminc )] || [ onchan $newnick $sv2 ( operc )] || [ onchan $newnick $sv2 ( opc )] || [ onchan $newnick $sv2 ( helpersc )]} { return 0 }
if {[ info exists :: muaflist ]} {
foreach mf $:: muaflist {
if {[ string match - nocase $mf $newnick ! $uhost ]} { return 0 }
}
}
set r [ lindex $sv2 ( renk ) [ rand [ llength $sv2 ( renk )]]]
set input "[open " $sv2 ( bndizin ) " r]"
set lines "[split [subst -nocommands [read $input ]] \n]"
catch { close $input }
foreach line $lines {
if { $line != "" } {
if {[ string match " $line " [ string tolower $newnick ]]} {
putquick "MODE $chan +b $line "
putquick "KICK $chan $newnick \003 $r$sv2 (badnickmsg)\003"
#putquick "PRIVMSG $sv2(logc) \026 BadNick \026 \003$r\002$newnick\002 nickini \002$line\002 olarak değiştirdiği için \002$chan\002 odasından uzaklaştırıldı.\003"
}
}
}
}
}
}
#Badnick Sonu