Code:
ON @*:text:*:*:{
   var %i = 1
   while (%i <= $0) {  
       if ($read(swear.txt, ns, $eval($chr(36) $+ %i,2))) {
         .kick $chan $nick Swearing is not allowed
         break   
      }   
      inc %i
   }
}


And yes I do work on UnrealIRCd.