on *:TEXT:!massv:#: { 
  if ($nick isop $chan) || ($nick ishop $chan) { 
    var %f = 1 
    while (%f <= $nick($chan,0)) { 
      if ($nick($chan,%f) isreg $chan) { 
        mode $chan +v $nick($chan,%f) 
        inc %f 
      } 
      else inc %f 
    } 
  } 
}