Merhaba sevgili IF üyeleri misafirleri: bu kod büyük sunucularda işinize yarayabilir maksat neden atın olayları var ben size basit olarak küfür edenleri tek bir pencereye ve küfürlog.txt listesine toplar size yönetim neden atın derse log kaydına veya kufurpenceresine bakıp logu atabilirsiniz..
Kod: Kodu kopyalamak için üzerine çift tıklayın!
; Küfür listesi
var %kufurListesi = küfür1 küfür2 küfür3
on *:TEXT:*:#KanalAdı:{
var %mesaj = $strip($1-,L)
var %kufur = $hfind(%kufurListesi,%mesaj,0,wm)
if (%kufur) {
var %kufurKelime = $hget(%kufurListesi,%kufur).data
window -m @KufurPenceresi
aline @KufurPenceresi $nick: %kufurKelime - %mesaj
; Küfürü log dosyasına yazma
writeini kufurlog.txt Kufurler $nick $ctime $+(:,%kufurKelime) $+ (,%mesaj)
}
}
Bu script, on TEXT olayını izler ve belirli bir kanalda gönderilen mesajları kontrol eder. #KanalAdı kanalındaki her mesajı inceler ve küfürListesi içindeki kelime listesine karşı eşleşme arar. Eğer bir eşleşme bulunursa, @KufurPenceresi adında bir pencere açar ve küfür eden kullanıcının adını, küfür kelimesini ve küfürlü mesajı bu pencerede listeler.
Ayrıca, aynı zamanda bu script, bulunan küfürlü mesajları kufurlog.txt adında bir dosyaya da kaydeder. Bu dosya, kullanıcı adı, tarih-saat, kullanılan küfür kelimesi ve küfürlü mesajı içeren bir log dosyasıdır.
Scriptte küfür1 küfür2 küfür3 gibi bir liste yerine gerçek küfürleri içeren bir liste kullanmalısınız. Bu scripti ihtiyacınıza uygun şekilde düzenleyerek kullanabilirsiniz...