on *:text:$($buyukharfuyari($1-)):#:msg # $nick , lutfen buyuk harf kullanmayiniz.
alias buyukharfuyari {
  var %txt = $strip($1-), %karsay = $countcs(%txt,A,B,C,Ç,D,E,F,G,Ğ,H,I,İ,J,K,L,M,N,O,Ö,P,R,S,Ş,T,U,Ü,V,Y,Z,W,X)
  if ($len(%txt) > 7 && $calc(%karsay / $len(%txt) * 100) >= 70) return *
}