Büyük Harf Uyarı Diyaloqu
on @*:text:*:#:{
var %< = $remove($strip($1-),$chr(32)),%> = $int($calc(($regex(%<,/[A-ZÖÜŞİÇĞ]/g) / $len(%<)) * 100))
if $nick isreg # && %> >= 75 && $len(%< >= 20) {
inc -u600 $+(%,cc.,#,$nick) | var %' = $($+(%,cc.,#,$nick),2)
if %' == 1 { msg $nick UYARI! 4Lütfen 4CapsLock 4Tuşunu 4Kapatarak 4Yazınız. 4ßüyük 4Harf 4Kullanmayınız.. }
if %' == 2 { msg $chan UYARI: $nick 4UYARI! 4Lütfen 4CapsLock 4Tuşunu 4Kapatarak 4Yazınız.4ßüyük 4Harf 4Kullanmayınız. 4Aksi 4Taktirde 4Kanaldan 4Uzaklaştırılıcaksınız. }
if %' >= 3 { ban -ku600 # $nick 2 <kickban mesajı> | unset $+(%,cc.,#,$nick) }
}
} Herşey Çok qüzeL Istediqim qißi ßir Kod.. Fakat; 3. Uyarıda ßanLamıyor Yanı 3.Uyarıda Sorun var Sanırım.. Yardımcı oLursanız Sevinirim. |