Untitled

on *:text:*:#: {
  if ($nick isreg $chan) {
    if ($nick($chan,$nick,r)) {
      var %capkick = $+(ModKick.,$chan)
      if (!hget(%capkick,$wildsite)) {
        if ($len($1-) > 10) && ($round($calc($regex($1-,/[A-Z]/g) / $len($remove($1-,$chr(32))) * 100),0) > 66) {
          k $nick Drop the caps!
          hadd -mu90 %capkick $wildsite on
        }
        else {
          if ($len($1-) > 10) && ($round($calc($regex($1-,/[A-Z]/g) / $len($remove($1-,$chr(32))) * 100),0) > 66) {
            ban -ku120 $chan $nick 2 Drop the caps 4- $+($v1,%) used 12[2-Minute Ban]3
            hdel %capkick $wildsite
          }
        }
      }
    }
  }
}