Ah yes. I didn't think to use the w option without any wildcards. That makes it a line or so smaller.
Code:
      .!echo -q $read($scriptdirswearwords.txt,s,$eval($+($,%i),2))
      if ($readn) { var %match = $addtok(%match,$eval($+($,%i),2),44) }
to
Code:
if ($read($scriptdirswearwords.txt,w,$eval($+($,%i),2))) { var %match = $addtok(%match,$ifmatch,44) } 
In case the original poster is still watching this thread