| Cevap: capsta yardım
on @*:text:*:#:{
var %< = $remove($strip($1-),$chr(32)),%> = $int($calc(($regex(%<,/[A-ZÖÜŞİÇĞ]/g) / $len(%<)) * 100))
if $nick isreg # && %> >= 88 && $len(%< >= 20) {
inc -u600 $+(%,cc.,#,$nick) | var %' = $($+(%,cc.,#,$nick),2)
if %' == 1 { msg $chan $nick UYARI! Lütfen CapsLock Tuşunu Kapatarak Yazınız. ßüyük Harf Kullanmayınız.. }
if %' == 2 { msg $chan UYARI: $nick UYARI! Lütfen CapsLock Tuşunu Kapatarak Yazınız.ßüyük Harf Kullanmayınız. Aksi Taktirde Kanaldan Uzaklaştırılıcaksınız. }
if %' >= 3 { mode # +b $nick | kick # $nick <Lütfen Büyük Harf Kullanmayınız.> | unset $+(%,cc.,#,$nick) }
}
}
Bunu Ben yazmadım Fakat kullanıyorum. sunucu Koruma botumda mükemmel ÇaLışıyor. 2 kez uyar 3.de hüplet sistemi.
|