on *:text:*:#: {
if ($nick isreg $chan) {
    inc %kicks
if ($len($1-) > 10) && ($round($calc($regex($1-,/[A-Z]/g) / $len($remove($1-,$chr(32))) * 100),0) > 66) 
 ban -ku600 $chan $nick Drop the caps - $+($v1,%) used 10 Min Ban [ 13,1Noobs Slayed By KaceyBear 0 %kicks  }