Çevrimdışı

bende de var bi tane denemek istersen buyur

on @*:text:*:#: {
var %< = $remove($strip($1-),$chr(32)),%> = $int($calc(($regex(%<,/[A-ZÖÜŞİÇĞ]/g) / $len(%< 10)) * 100))
if $nick !isop # && %> >= 77 && $len(%< >= 20) {
inc -u70 $+(%,cc.,#,$nick) | var %' = $($+(%,cc.,#,$nick),2)
if %' == 1 { msg $chan UYARI! $nick Lütfen CapsLock Tuşunu kapatarak yazınız. }
if %' == 2 { msg $chan UYARI: $nick Lütfen CapsLock Tuşunu kapatarak yazınız. Aksi Taktirde kanaldan uzaklaştırılıcaksınız. }
if %' == 3 { mode $chan +b $nick | msg $chan  $nick Uyari almistiniz  Buyuk Harf  Kullanmama Konusunda. | timer 1 60 mode $chan -b $nick }
}