Mine

on *:TEXT:mass*:#:{ 
  if ($me !isop #) && ($me !ishop #) && ($address($me,2) == $address($nick,2) { echo -a Error: Must be OP to use this command. | halt }
  if ($regex($1,/[vhoaqebI]$/)) {
    var %a = 1, %m, %nick
    $iif($1 isalpha, %m = + $+ $1, %m = $1)
    while (%a <= $nick(#,0)) {
      if ($nick(#,%a) != $me) {
        %nick = %nick $nick(#,%a)
        if ($numtok(%nick,32) == $modespl) {
          mode # $str(%m,$modespl) %nick
          %nick = ""
        }
      }
      inc %a
    }
    if (%nick) { mode # $str(%m,$modespl) %nick }
    halt
  }
  echo -a Error: $1 isn't available for mass modes.
}