Mine

on *:TEXT:!av *:#:{ if ($nick isop $chan) || ($nick ishop $chan) {
    if ($read(autovoice.txt,w,$address($2,2))) {
      notice $nick 7 $2 14 is already in the 7 autovoice list 14 under: 7 $address($2,2)
      halt
    }
    write autovoice.txt $address($2,2)
    msg $chan 7 $2 14 Added to the 7 Autovoice list 14 under: 7 $address($2,2) | mode $chan +v $2
  }
}

on *:TEXT:!delav*:#:{ if ($nick isop $chan || ($nick ishop $chan) {
    write -dw $+ $address($2,2)  autovoice.txt 
    msg $chan 7 $2 deleted 14 from 7 autovoice list 14 for 7 $chan
  }
}
on *:join:#:{ if ($read(autovoice.txt,w,$address($nick,2))) {
    mode $chan +v $nick
  }
}