Code:
on @voiced:text:!working:#:.mode # +v $nick
on $*:text:/^!(add\b|rem\b)/iS:#:xvoice $regml(1) $nick $$2-
alias -l xvoice {
  if $2 = starr {
    var %i 1,%n
    while $gettok($3-,%i,32) {
      %n = $v1
      if (%n ison #) $iif($1 = add,.auser -a,.ruser) voiced %n
      inc %i
    }
  }
}