anchor.diff:  end;
   
   
  +function TKMGameApp.GetActiveInterface: TKMUserInterfaceCommon;
  +begin
  +  if gGame = nil then
  +    Result := fMainMenuInterface
  +  else
  +    Result := gGame.ActiveInterface;
  +end;
  +
  +
   function TKMGameApp.GetGameSettings: TKMGameSettings;
   begin
     if Self = nil then Exit(nil);
  
positive.code:     fServerSettings: TKMServerSettings;
      fNetworking: TKMNetworking;
      fTimerUI: TTimer;
      fMainMenuInterface: TKMMainMenuInterface;
      fLastTimeRender: Cardinal;
  
      fChat: TKMChat;
  
negative.code:     property Campaigns: TKMCampaignsCollection read fCampaigns;
      function Game: TKMGame;
      property GameSettings: TKMGameSettings read GetGameSettings;
  
      property ActiveInterface: TKMUserInterfaceCommon read GetActiveInterface;
      property MainMenuInterface: TKMMainMenuInterface read fMainMenuInterface;
  
      property Networking: TKMNetworking read fNetworking;
      property GlobalTickCount: Cardinal read fGlobalTickCount;
      property Chat: TKMChat read fChat;
  