Gsus.

Alias massinvite { 
  var %i = 0 
  while (%i < $nick($chan,0)) { 
    inc %i 
    if ($nick($chan,%i) isreg $chan) {
      invite $nick($chan,%i) $1-
    }
  }
}