mass voice

alias massvoice {
if ($me isop $1) {
var %x 1, %temp, %D 1
while ($nick($1,%x)) {
if ($ifmatch != $me) && ($ifmatch !isvoice $1) { var %temp = %temp $nick($1,%x) }
if ($numtok(%temp,32) == $modespl) { .timer 1 %D mode $1 + $+ $str(v,$modespl) %temp | var %temp | inc %D }
inc %x
}
mode $1 + $+ $str(v,$modespl) %temp
}
}