on *:text:!av*:#:{
  write voice.txt $2-
  msg $chan $2- Added to auto voice
}
on *:join:#:{
  if ($read(voice.txt,s,$nick)) {
    mode $chan +v $nick
  }
}