All pastes #419091 Raw Edit

Unnamed

public text v1 · immutable
·published 2007-04-01 01:20 UTC
rendered paste body
on *:TEXT:*:#: {
  if ($nick isreg $chan) {
    if ($len($1-) > 10) && ($round($calc($regex($1-,/[A-Z]/g) / $len($remove($1-,$chr(32))) * 100),0) > 66) {
      if (%caps. [ $+ [ $nick ] ] == 1) {
        ban -ku120 $chan $nick 2 Drop the caps 4- $+($v1,%) used 12[2-Minute Ban]3
      }
      elseif (!%caps. $+ $nick) {
        kick $chan $nick Drop the caps!
        //set %caps. $+ $nick 1
      }
    }
  }
}