Tarih: 06-12-2007, 20:21
Bu kod özele yazan nick
kayıtlı değilse ve
kufur.txt dosyasından herhangi bir kelimeyi kullandıysa, tüm kanallardan banlamak için kullanılır.
Kod:
on *:text:*:?: {
inc -e $+(%,t,$nick)
if $($+(%,t,$nick),2) == 1 {
.enable #u
.who $nick
}
else {
var %1 = 1,%2 = $lines(kufur.txt)
while %1 <= %2 {
if $+(*,$read(kufur.txt,%1),*) iswm $1- && $hmatch(nick,$nick) {
var %p = $nick
}
inc %1
}
var %s = 1,%ss = $comchan($me,0)
while %s <= %ss {
if $nick ison $comchan($me,%s) {
ban -ku900 $comchan($me,%s) %p 2 BAN SEBEBİ.
}
inc %s
}
}
}
#u off
raw *:*: {
if $numeric == 352 {
if r !isincs $7 {
haltdef
hadd -m nick $6 1
}
}
if $numeric == 315 {
haltdef
.disable #u
}
}
#u end