anchor.diff:    StopGame(gr_Silent);
   
     FreeAndNil(fTimerUI);
  -  if fCampaigns <> nil then fCampaigns.SaveProgress(ExeDir + SAVES_FOLDER_NAME + PathDelim + 'Campaigns.dat');
     FreeThenNil(fCampaigns);
     FreeThenNil(fGameSettings);
     FreeThenNil(fMainMenuInterface);
  
positive.code:       gGame.SaveCampaignScriptData(fCampaigns.ActiveCampaign.ScriptData);
  
        if aMsg = gr_Win then
          fCampaigns.UnlockNextMap;
      end;
    end;
  
  
negative.code:     fOnGameStart: TKMGameModeChangeEvent;
      fOnGameEnd: TKMGameModeChangeEvent;
  
      procedure SaveCampaignsProgress;
      procedure GameLoadingStep(const aText: UnicodeString);
      procedure LoadGameAssets;
      procedure LoadGameFromSave(const aFilePath: UnicodeString; aGameMode: TGameMode);
  