!7

p {
  if (confirmYesNo("Import some AI concepts from the server first?"))
    importStandardAIConcepts_desktop();
    
  set aiConceptsMap_silent;
  ai();
  swing {
    veryBigConsole();
    clearConsole();
  }
  repeat with sleep 2 {
    S q = makeQuestion();
    //print(q);
    print(toUpper(conceptLanguageToEnglish_xyz_noquote(q)));
  }
}

static Pair<S> randomDifferentConcepts() {
  S a = randomAIConcept();
  for i to 1000: {
    S b = randomAIConcept();
    if (neq(a, b)) ret pair(a, b);
  }
  null;
}

sS makeQuestion() {
  Pair<S> p = randomDifferentConcepts();
  if (p == null) null;
  S adj = randomAdjective();
  ret joinWithSpaces("psrgtxwtfzmfzhsx", p.a, adj, p.b); // is X more Y than Z?
}

sS randomAdjective() {
  ret oneOf(splitAtSpace("dinrgdnbbyfqaogm vyegxexdfpmewhlh bdctgxvpjiavress lrbdjovphoezwgfk ffrmkrbgokesaihw sxewqdexaamizwhd rsabdjeujjzirvzf");
}