Something

ALIASES: massmodes.ini

massmode {
  if ($1 ischan) && ($regex($1-,/^(.+ [\+-] [ohv])$/)) {
    var %i = $nick($1,0),%d = 0,%x
    while (%i) {
      if ($nick($1,%i) $iif($2 == +,!) $+ $replace($3,o,isop,h,ishop,v,isvoice) $1) && ((!$q.net) || (? !iswm $nick($1,%i))) && ($me != $nick($1,%i)) {
        %x = $addtok(%x,$nick($1,%i),32)
        if ($numtok(%x,32) == $modespl) {
          $iif(%d,.timer 1 %d) mode $1-2 $+ $str($3,$modespl) %x
          %x = ""
          inc %d
        }
      }
      dec %i
    }
    if (%x) { $iif(%d,.timer 1 %d) mode $1-2 $+ $str($3,$numtok(%x,32)) %x }
  }
  else { kte_error -a wrong parameters }
}

POPUPS:

-
.&Mass modes
..$style(2) $+([,$iif($nick(#,0) == 1,1 user,$nick(#,0) users),]):x
..-
..$iif($me !isop $chan && o !isin $usermode,$style(2)) Mass &Op:massmode $$chan + o
..$iif($me !isop $chan && o !isin $usermode,$style(2)) Mass &DeOp:massmode $$chan - o
..-
..$iif(% isin $prefix,$iif($me !isop $chan && o !isin $usermode,$style(2)) Mass &HalfOp):massmode $$chan + h
..$iif(% isin $prefix,$iif($me !isop $chan && o !isin $usermode,$style(2)) Mass D&eHalfOp):massmode $$chan - h
..-
..$iif($me !isop $chan && $me !ishop $chan && o !isin $usermode,$style(2)) Mass &Voice:massmode $$chan + v
..$iif($me !isop $chan && $me !ishop $chan && o !isin $usermode,$style(2)) Mass DeVo&ice:massmode $$chan - v
-