!7

module SpeechRecogConfirmation > DynPrintLogAndButtons {
  start {
    onSpeechRecognized_withoutMyUtterancesAndTyped(voidfunc(fS s) {
      print("\nI heard: " + quote(s));
      if (eq(s, "?")) {
        fS q = "Did you say anything?";
        print(q);
        showButtons(
          "Yes", r { log(s, q, 'yes); whatDidYouSay(s); },
          "No", r { log(s, q, 'no); print("Thanks"); });
      } else {
        fS q = "Did you say that?";
        print(q);
        showButtons(
          "Yes", r { log(s, q, 'yes); print("Thanks"); },
          "No", r { log(s, q, 'no); whatDidYouSay(s); });
      }
    });
  }
  
  void log(S heard, S question, S answer) {
    print("> " + upper(answer));
    logStructure(programLogFile(), litorderedmap(+heard, +question, +answer));
    hideButtons();
  }
  
  void whatDidYouSay(fS heard) {
    print("What did you say?");
    final JTextField tf = jTextField(heard);
    showButtons(textFieldAndButton(tf, "is what I said", voidfunc(S corrected) {
      print("> I said " + quote(upper(corrected)));
      logStructure(programLogFile(), litorderedmap(+heard, +corrected));
      hideButtons();
      print("Thanks");
    }));
    focus(tf);
  }
}