Translate from text for pari

on *:TEXT:*:#nick1:{
  if ($read(english.txt,nw,$1-) != $null) {
    msg $chan $read(german.txt,$readn)
      }
  elseif ($read(german.txt,nw,$1-) != $null) {
    msg $chan $read(english.txt,$readn)
  }
}