!7

sclass RememberAllWords > DynPrintLog {
  new MultiSet<S> wordSet; // synchronized
  int interval = 5000;
  
  void start {
    doEveryAndNow(interval, r doIt);
  }
  
  void doIt {
    temp enter();
    please include function getText.
    for (Component c : allComponentsInWindows()) {
      S text = callOpt(mc(), 'getText, c); // Reflection abuse!
      if (nempty(text))
        wordSet.addAll(words2(text));
    }
    print(n2(uniqueSize(), "word") + ", " + n2(ms.size(), "occurrence"));
  }
}