Mine

on *:TEXT:!avoice*:#:{
  if ($nick ishop $chan) || ($nick isop $chan) {
    if (%avs == false) { HALT }
    write avlist.txt $2
    msg $chan $2 Added To The $Chan Auto-Voice List, To Remove $2 Please Type !d-av $2 $+.
  } 
  else {
    notice $nick Hey!, You Must Be At Least A Half-Op To Auto-Voice Someone.
  }
}

on *:TEXT:!d-av*:#:{
if ($nick ishop $chan) || ($nick isop $chan) {
write -ds $+ $2 avlist.txt
msg $chan $2 Removed From The $chan Auto-Voice List.
}
else {
notice $nick Hey!, You Must Be At Least A Half-Op To Remove Someones Auto-Voice.
}
}

on*:TEXT:!Av-On:#:{
  if ($nick ishop $chan) || ($nick isop $chan) {
    msg $chan The Auto Voice Script Has Been Enabled For $chan.
   unest %avs
  } 
  else {
    notice $nick Hey!, You Must Be At Least A Half-Op To Turn This Script On/Off.
  }
}

on*:TEXT:!Av-Off:#:{
  if ($nick ishop $chan) || ($nick isop $chan) {
    msg $chan The Auto Voice Script Has Been Disabled For $chan.
    set %avs False
  } 
  else {
    notice $nick Hey!, You Must Be At Least A Half-Op To Turn This Script On/Off.
  }
}

on *:JOIN:#:{
 if (%avs != false) && ($nick isin $read(avlist.txt)) {
mode $chan +v $nick
 }