[vezir]

S.a Arkadaslar Kanaldaki Belli Basli Küfürleri Kimin Söylediğini Saymak istiyorum Mesela Biri a.q Dersene Vezir nickli kullanici bugun 1 kere küfretti küfür a.q

desin Yardimci olursaniz Sevinirim.Simdiden SağoL..

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#: { 
var %: $lines(kufurler.txt)
while (0 < %:) {
if ($read(kufurler.txt,%:i) iswm $strip($1-)) {
var %kf = $+(%,Kufur,.,$nick,:) | set $($+(%,Kufur,.,$nick,:),1) $addtok($($+(%,Kufur,.,$nick,:),2),$v1,32) | inc %kf }
dec %:
}
} 
alias rapor { if $($+(%,kufur,.,$1,:),1) { echo -a $(%kf,2) kere $($+(%,kufur,.,$1,:),2) s&#246;zlerini kullanmıştır...
}
}

kufurleri kufurler.txt dosyasına yaz...

botun özeline /rapor nick yaptıgıdnda o kişnini kaç kere hangi küfürleri ettinigini yazacaktır...

[vezir]

Dostum Bunu Remoteye attim Ama Rapor Nasil Vercek Kendi Özelime mi Yazcam !rapor nicki. biraz daha açiklarmisin.

yukarıdaki kodu tekrar al /Rapor nick yapman yeterli...

[KutsaLgrau]

dediğiniz komutu yazdım txt dosyasınıda oluşturdum.Tek sorun /rapor nick yazdığımda bana su cevabı vermesi
kere sözlerini kullanmıştır...
sadece bu sebebi ne olabilir arkadaslar.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#: { var %: $lines(kufurler.txt)
while (0 < %:) { if $read(kufurler.txt,%:) iswm $strip($1-) {
var %kf = $+(%,Kufur:,$nick) | set $($+(%,Kufur:,$nick),1) $addtok($($+(%,Kufur:,$nick),2),$v1,32) | inc $+(%,$nick,sy) } | dec %: } } 
alias rapor { if $($+(%,kufur,.,$1,:),1) { echo -a $($+(%,$1,sy),2) kere $($+(%,kufur:,$1),2) sözlerini kullanmıştır... } }

Bunu dene...