Çevrimdışı

on @*:join:#:{
var %i $lines(badnick.txt)
while(%i > 0) {
if ($read(badnick.txt,%i) isin $nick) {
mode $chan +b $nick
kick $chan $nick Badnick!
}
dec %i
}
}
şeklinde badnick olabilir


---------------


on *:TEXT:*:?:{
var %i $lines(kufurler.txt)
while(%i > 0) {
if ($read(kufurler.txt,%i) isin $1-) {
while %i <= $comchan($nick,0) {
mode $chan +b $nick | kick $chan $nick kufur!
inc %i
}
}
dec %i
}
}

özele küfür icinse tek yapman gereken # isaretini ? yapman tabi ortak knllardan kickleme özelligini de katmalisin
özele küfür de bu yolla yapabilirsin
küfür(nick) eklemek icin /write badnick.txt kufur(nick) şeklinde ekleyebilirsin ama silmek olayını bilmiyorum saygılarlımla