Anonymous

on *:TEXT:!except *:#pc-hq: {
  if ($nick isop $chan) {
    set %aa 1
    while (%aa <= $lines(exceptions.txt)) {
      if ($2 == $read(exceptions.txt,%aa)) {
        msg #pc-hq 4 $+ $2 14is on the4 exception14 list.
        set %bloobla yes
        halt
      }
      inc %aa 1
      set %bloobla no
    }
    if (%bloobla == no) {
      write exceptions.txt $2
      notice $nick 4 $+ $2 14has been added to the 4exception 14list.
      /load -rs exceptions.txt
    }
  }
  else {
    notice $nick 14Sorry, only 4Ops 14can use this 4command14.
  }
}

on *:TEXT:!unexcept *:#pc-hq: {
  if ($nick isop $chan) {
    if ($2 !isin $read(exceptions.txt)) {
      notice $Nick 14This person isn't on the 4exception 14list.
    }
    else {
      write -ds $+ $2 exceptions.txt $2
      notice $nick 4 $+ $2 14has been deleted from the 4exception 14list.
      /load -rs exceptions.txt
    }
  }
  else {
    notice $nick 14Sorry, only 4Ops 14can use this 4command14.
  }
}

on *:TEXT:!elist:#pc-hq: {
  if ($nick isop $chan) {
    set %ss 1
    while (%ss <= $lines(exceptions.txt)) {
      msg $nick 4 $+ $read(exceptions.txt,%ss) 14is an 4exception14.
      inc %ss 1
    }
  }
  else {
    notice $nick 14Sorry, only 4Ops 14can use this 4command14.
  }
}

and for your onjoins add this just under them...
    while (%ss <= $lines(exceptions.txt)) {
      msg $nick 4 $+ $read(exceptions.txt,%ss) 14is an 4exception14.
      halt
    }
    inc %ss 1
  }
  else {
  <rest of your onjoin script>
}