Mine

on *:text:.mute*:#:{ 
  if ($nick isop $chan) || ($nick ishop $chan) || ($address($nick,2) == $address($me,2) {
    mode $chan -v $2-
    set %dvc. [ $+ [ $address($2-,2) ] ] yo
    $iif(m !isincs $chan($chan).mode,mode $chan +m)
  }
  else notice $nick operator only command
}

on *:text:.unmute*:#:{ 
  if ($nick isop $chan) || ($nick ishop $chan) || ($address($me,2) == $address($nick,2)) { 
    unset %dvc. [ $+ [ $address($2-,2) ] ]
    mode $chan +v $2-
    $iif(!%dvc.*,mode $chan -m)
  }
}
on *:voice:#:{
  if (%dvc. [ $+ [ $address($vnick,2) ] ]) {
    mode $chan -v $vnick
    notice $nick $vnick is on mute list.
  }
}