on *:TEXT:!av*:#:{
  if ($me isop $chan || $me ishop $chan) || ($nick isop $chan || $nick ishop $chan) {
    write avoice.txt $address($2,2)
    mode $chan +v $2
    msg $chan $2 added to $chan auto voice list
}
  on *:JOIN*:#:{
    if ($address($nick,2) isin $read(avoice.txt) {
      mode $chan +v $nick
    }
  }