!7

static JPanel form;

p {
  fS concept = "kthpatohcsbblavt"; // a human
  print("IS:");
  Collection<S> pos = whatIs(concept);
  printAIConcepts(pos);
  print();
  print("ISN'T:");
  Collection<S> neg = whatIsNot(concept);
  printAIConcepts(neg);
  print();
  Collection<S> unknown = listMinusList(aiConceptIDs(), concatLists(pos, neg));
  print("UNKNOWN:");
  printAIConcepts(unknown);
  print();
  fS id = random(unknown);
  if (id != null) {
    final Lisp q = lisp("pyzgofzoejdprkow", id, concept);
    fS qq = "Is " + quote(conceptToName(id)) + " " + firstToLower(conceptToName(concept)) + "?";
    print(qq);
    showControls(vstackWithSpacing(jcenteredlabel(qq),
      jcenteredline(
        jbutton("Yes", r { answerWith(lisp("fgvvrzypbkqomktd", id, concept)) }),
        jbutton("No", r { answerWith(lisp("aajsjaczgasbazcu", id, concept)) }),
        jbutton("Question makes no sense", r { answerWith(lisp("lnxlavjirjaeeuil", q)) }),
        jbutton("Other...", r { other(q, qq) })
    )));
    consoleProgramTitle();
    sleepQuietly();
  }
}

svoid answerWith(final Lisp statement) {
  disableAllButtons(getControls());
  if (form != null) { disposeFrame(form); form = null; }
  thread {
    addTruth(statement);
    clearStatementCaches(10);
    clearConsole();
    runMain();
  }
}

svoid other(Lisp q, S qq) {
  if (form != null) ret;
  final new JTextField tf;
  form = showFormTitled("Your response",
    "Question", qq,
    "Your response", tf,
    r {
      answerWith(lisp("tlwrjpzuteopednt", q, getTextTrim(tf)))
    });
}