!7

static JTextArea ta;
static IVar<S> text;
static Class recognizer;

p-subst {
  recognizer = hotwire(#1009816);
  
  text = persistentVar("Text");
  ta = bindTextAreaToVar(text, jwordwraptextarea());
  showFrame(fontSize(20, ta));
  moveCaretToEnd(ta);

  set(recognizer, onUtterance := voidfunc(S utterance) {
    if (match("turn off", utterance))
      call(recognizer, 'stopRecognition);
    appendToTextAreaAndMoveCaret(ta, utterance + "\n");
  });
  
  set(recognizer, startRecognition := true);
  callMain(recognizer);
  call(recognizer, 'botsToSendTo, ll());
}

Began life as a copy of #1009884