anchor.diff:  
   
   function TKMNetPlayersList.GetConnectedCount: Integer;
  -var I: Integer;
  +var
  +  I: Integer;
   begin
     Result := 0;
     for I := 1 to fCount do
  
positive.code: 
  
  function TKMNetPlayersList.GetConnectedPlayersCount: Integer;
  var I: Integer;
  begin
    Result := 0;
    for I := 1 to fCount do
  
negative.code: 
  
  function TKMNetPlayersList.GetAICount: Integer;
  var
    I: Integer;
  begin
    Result := 0;
    for I := 1 to fCount do
      if fNetPlayers[I].PlayerNetType = nptComputer then
        Inc(Result);
  end;
  
  
  function TKMNetPlayersList.GetClosedCount: Integer;
  var
    I: Integer;
  begin
    Result := 0;
    for I := 1 to fCount do
      if fNetPlayers[I].PlayerNetType = nptClosed then
        Inc(Result);
  end;
  
  
  function TKMNetPlayersList.GetSpectatorCount: Integer;
  var
    I: Integer;
  begin
    Result := 0;
    for I := 1 to fCount do
  