Unnamed

on *:text:!swedish*:#: {
  var %r, %s .fseek -r dict /\b $+ $2- $+ \b/i
  .fopen dict EngSwe.txt
  %s
  while ($fread(dict)) {
    msg $chan $v1
    inc %r | if (%r > 5) { msg $chan Max 5 results. Sorry. | break }
    %s
  }
  .fclose dict
}