!7

sS stefansUniverse = "yjzyfnudvuejejtf";

p {
  final File file = getProgramFile(#1007478, "my-universe.txt");
  final JTextField tf = jtextfield(trim(loadTextFile(file, stefansUniverse)));
  showForm("Choose your universe", tf, r {
    pcall-messagebox {
      S myUniverse = assertPossibleGlobalID(getTextTrim(tf));
      saveTextFile(file, myUniverse);
      RemoteDB db = new RemoteDB(#1006463, true); // auto start AI Concepts
      L<RC> l = db.xlist("AIConcept");
      print("Found " + n(l, "concepts"));
      for (RC rc : l) {
        S u = rc.getString("originatingUniverse");
        print(rc.id + ": " + u);
        if (empty(u)) {
          print("  => Adopting to " + myUniverse + "!");
          rc.set(originatingUniverse := myUniverse);
        }
      }
      db.close();
      print("Done!");
    }
  });
}