!7

set flag hotwire_here.
sS osID = #1016478;

mainClassName DialogKit p-pcall {
  ret if javaXStandalone_init(args);
  
  Component c = selectJavaXVirtualSpace(vf<File> select);
  JButton useDefault = jbutton("Use default directory", r {
    thread { select(javaxVirtualDir("default")); }
    disposePIFrame(c);
  }
  addToWindow(c, withMargin(useDefault)));
  focus(useDefault);
  hideConsole();
}

svoid select(File virtualHome) {
  showConsole();
  File mainJar = getMainJarLocation();
  File unpackDir = newFile(virtualHome, "unpacked");
  ret if standalone_start(null, "DialogKit instance", virtualHome, mainJar, unpackDir);
  
  standalone_runOSWithInitialModules(osID, tlftj([[
    #1018866/SystemPrintLog
    #1019954/TaskBar_dev
    // TODO
  ]]));
}