!7

concept Statement {
  S globalID = aGlobalID(), text;
  S possibleEnglishTranslation;
}

static new Q q;

p-noconsole {
  SimpleCRUD crud = simpleCRUD(programTitle(), Statement);
  addMenu(crud.panel, "Menu!",
    "Show AI Concepts", r { startOrActivate(#1006463) },
    "Rebuild Translations", r { q.add(r { makeTranslations(true) }) });
  q.start();
  q.add(r { makeTranslations(false) });
}

svoid makeTranslations(bool all) {
  for (Statement s) {
    if (all || empty(s.possibleEnglishTranslation) || eq(s.possibleEnglishTranslation, "?"))
      cset(s, possibleEnglishTranslation := orQuestionMark2(f conceptLanguageToEnglish, s.text));
  }
}