set flag hotwire_here.

sclass Standalone_OSWithSplashScreens {
  S programName = "Unknown Program"; // doubles as virtualDirName
  S virtualDirName;
  S backgroundID = #1102649;
  S osID = #1016478; // version of Stefan's OS to use
  S mainIconID = #1102666;
  bool showTopInput = true;
  transient Runnable additionalUnpacking;
  transient bool standalone = true;
  
  S virtualDirName() { ret or2(virtualDirName, programName); }
  
  // name / module lib ID / name / module lib ID / ...
  new LS mainModules;
  LS helperModules = ll("Task Bar", "#1019954/TaskBar_dev");
  
  void run(S[] args) pcall {
    if (standalone && javaXStandalone_init(args, noConsole := true)) {
      print("exiting");
      ret;
    }
  
    autoVMExit();
    try {
      // TODO: shouldn't we call standalone_start2 first? it sets the resource loader which we need for loading the background image!
      temp tempWindow(standardSplashScreen(backgroundID, programName + " Loading"));
      ret if standalone_start2(standalone, programName, osID, virtualDirName());
      
      zip2dir_withPredicate_overwriteIfDifferentSize(getMainJarLocation(),
        actualUserDir("JavaX-Caches/#1002203"),
        //getCacheProgramDir("#1002203"), // x30.hotwire doesn't find this
          s -> regexpMatches(md5Regexp() + "\\.jar", s));
  
      callF(additionalUnpacking);
      
      saveTextFile(stefansOS_backgroundFile(), backgroundID);
      standalone_runOSWithInitialModules(osID,
        concatLists(oddEntries(mainModules), oddEntries(helperModules)),
        osParams := litparams(
          onStart := voidfunc(O os) { setOpt(os, minLoadScreenShowingTime := 20.0); },
          hideFeatures := stefansOS_technicalFeatures(),
          standardModules := mainModules,
          botName := "",
          osName := programName,
          +showTopInput,
          +mainIconID,
          shutdownConsole := r { standardSplashScreen(backgroundID, programName + " Shutting Down") },
      ));
    } catch print e { showConsole(); }
  }
}