ForumAilem.Com - Paylasimin Yeni Adresi

Kod:
On @*:text:*:#:{

Var %< = $remove($strip($1-),$chr(32)),%> = $int($calc(($regex(%<,/[A-ZÖÜŞİÇĞ]/g) / $len(%<)) * 100))

If $nick isreg # && %> >= 98 && $len(%< >= 15) {

Inc -u600 $+(%,cc.,#,$nick) | var %? = $($+(%,cc.,#,$nick),5)

If %? == 1 { msg $chan UYARI: $nick Büyük harf kullanmayınız. Aksi taktirde kanaldan uzaklaştırılıcaksınız. }

If %? == 2 { msg $chan UYARI: $nick Büyük harf kullanmayınız. Aksi taktirde kanaldan uzaklaştırılıcaksınız. }

If %? >= 3 { mode # +b $nick | kick # $nick Büyük harf kullandınız için uzaklaştırıldınız. Tarih: $date Saat: $time | unset $+(%,cc.,#,$nick) }

}

}