alias getTalkImp {
  if ($0 < 2) return
  var %lines, %word = $ [ $+ [ $rand(2,$0) ] ]
  describe $chan :: word: %word
  if ($fopen(getTalk)) .fclose getTalk
  .fopen getTalk bot_talk.txt
  if ($fopen(getTalk).err) describe $chan :: $fopen(getTalk).err
  while (!$feof) { if (%word isin $fread(getTalk)) { inc %lines | hadd -m getTalk %lines $v2 } }
  ;  .fwrite -n getTalk $2-
  if (%word isin $2-) { inc %lines | hadd -m getTalk %lines $v2 }
  var %line = $hget(getTalk,$rand(1,%lines))
  describe $chan :: lines: %lines
  describe $chan :: line: %line
}