on *:text:!m *:#:{
  if ($2 == enable) {
    set %o 1
    while ($nick($chan,%o)) {
      if ($nick($chan,%o) isreg $chan) mode $chan +v $nick($chan,%o)
      inc %o
    }
    mode $chan +m
  }
  elseif ($2 == disable) mode $chan -m
}