;; /mmode #channel +/- o/h/v
alias mmode {
var %i = $nick($1,0),%x,%n
while (%i) {
%n = $nick($1,%i)
if (%n == $me) { dec %i | %n = $nick($1,%i) }
if (%n $iif($2 == +,!) $+ $replace($3,o,isop,h,ishop,v,isvoice) $1) {
%x = $addtok(%x,%n,32)
if ($numtok(%x,32) == $modespl) {
mode $1-2 $+ $str($3,$modespl) %x
%x = ""
}
}
dec %i
}
if (%x) {
mode $1-2 $+ $str($3,$numtok(%x,32)) %x
}
}