ON *:JOIN:#:{    
 msg $chan @duel $nick
 msg $chan @clan $nick
 notice $nick Once you have obtained Voice Status, Type !world to retrieve the pcw.
 if (%avs != false) && ($read(avlist.txt,w,$nick)) {
    mode $chan +v $nick
 }
} 

on *:TEXT:!avoice*:#:{
  if ($nick ishop $chan) || ($nick isop $chan) {
    if (%avs == false) { HALT }
    write avlist.txt $2
    mode $chan +v $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
    mode chan -v $2
    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) {
    msg $chan The Auto Voice Script Has Been Enabled.
    unset %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) {
    msg $chan The Auto Voice Script Has Been Disabled.
    set %avs False
  } 
  else {
    notice $nick Hey!, You Must Be At Least A Half-Op To Turn This Script On/Off.
  }
}