Mine

on *:voice:#worldofpc:{
  write voices.txt $vnick
  write voices.txt $address($vnick,2)
  notice $vnick You have been added to the auto-voice list!
  notice $nick 7 $+ $vnick was successfuly added to the auto-voice list!
}
on *:join:#worldofpc:{
  if ($read(voices.txt,w,$nick)) && ($read(voices.txt,w,$address($nick,2))) {
    mode $chan +v $nick
  }
  else {
    halt
} }