Çevrimdışı

arkadaslar baya bir zaman önce yine burdan bir kod aldım ama son zamanlarda kullanmak nasip oldu kodun anlamı kanalda bir kullanıcı badnicke geciş yapıca onu algılayıp atması ama bişi dikkatimi cekti
mesela a.txt de badnickleri yazmışım orda misal veriyorum abaza nicki var bir kullanıcı abaza degilde nickini az yapınca yine atıyor yani badnickin içindeki kelimeye göre atıyor diger bi örnek gotcu bir kullanıcı nicki ot yapınca yine kod badnicke gectigini algılayarak atıyor

kod;
menu status,menubar,channel {
.(V)Nick Badnicke Dönme
..Açık:.enable #badarama | .echo -a 9,1Badnicke Dönme Koruma Açıldı 
..Kapalı:.disable #badarama | .echo -a 13,1Badnicke Dönme Koruma Kapatıldı 
}
#badarama on
on @*:nick:{
if $read(a.txt,w,$addtok(* $+ $newnick,*,0)) {
set %nickc 0
:start
inc %nickc
if ($comchan($newnick,%nickc) != $null) {
mode $comchan($newnick,%nickc) +b $newnick
kick $comchan($newnick,%nickc) $newnick 0,1 Badnicke Gecmek KesinLikLe Yasaktır. 14,1/nick y€ninick
goto start
}
}
}
#badarama end

kod bana ait degil alıntıdır ben sadece enable disable ekledim her zaman calışmasın diye
a.txt de alt alta
eklemişim badnickleri şöyle

travesti
soyun
yalar
gotcu
abaza

kullanıcı nickini ot yapsada calışıyor az yapsada calışıyor yani içinde gecen bişi olsa bile calışıyor yardımlarınız için şimdiden tşkler