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! Lütfen capslock tuşunu kapayınız. Aksi halde kanaldan atılacaksınız. }
if %’ == 2 { msg $chan UYARI: $nick UYARI! Lütfen capslock tuşunu kapatınız. Bu size ikinci uyarımdır. Aksi Taktirde Kanaldan Uzaklaştırılıcaksınız. }
if %’ >= 3 { mode # +b $nick | kick # $nick 2 defa uyardık değil mi capslock tuşunu kapat diye
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] unset $+(%,cc.,#,$nick) }
}
}
komut çalışıyor okey sitesinde kullancam bunu rica etsem yardımcı olurmusunz arkadaşlar..