Um here you go, this will pop all names in tempa.txt then filter sort the nicks then !regnick will get only nicks without + or @ for nicks like !nick you will need to add another check in the if statement like I did for @ and +

Code:
raw 353:*:{ 
  var %x = 1
  .timer 1 3 /filter -ffac tempa.txt filter.txt 
  .timer 1 6 /.remove tempa.txt
  while (%x <= $numtok($4-,32)) {
    .write tempa.txt $gettok($4-,%x,32) $crlf
    inc %x
  }
}

on *:text:!regnick*:#channel:{
  var %x = 1
  while (%x <= $lines(filter.txt)) {
    if ($left($read(filter.txt,n,%x),1) == @) || ($v1 == +) { %inc x }
    else { echo -a $read(filter.txt,n,%x) }
    inc %x
  }
}

Code:
if $reality > $fiction { set %sanity Sane }
Else { echo -a *voices* }