anchor.diff:                    CT_NetOp_GetAccount : Begin
                       if (HeaderData.header_type=ntp_request) then begin
                         if TNetData.NetData.IpInfos.ReachesLimits(Client.RemoteHost,CT_NetTransferType[HeaderData.header_type],TNetData.OperationToText(HeaderData.operation),HeaderData.buffer_data_length,
  -                        TArray<TLimitLifetime>.Create(TLimitLifetime.Create(60,60,0))) then DisconnectInvalidClient(False,Format('Reached limit %s',[TNetData.OperationToText(HeaderData.operation)]))
  +                        TArray<TLimitLifetime>.Create(TLimitLifetime.Create(30,60,0))) then DisconnectInvalidClient(False,Format('Reached limit %s',[TNetData.OperationToText(HeaderData.operation)]))
                         else DoProcess_GetAccount_Request(HeaderData,ReceiveDataBuffer)
                       end else TLog.NewLog(ltdebug,Classname,'Received old response of: '+TNetData.HeaderDataToText(HeaderData));
                     end;
  
positive.code:               end;
              end;
              If Not TNode.Node.AddNewBlockChain(Self,operationsComp,bacc,errors) then begin
                // Really is a new block? (Check it)
                if (operationsComp.OperationBlock.block=TNode.Node.Bank.BlocksCount) then begin
                  // Received a new invalid block... perhaps I'm an orphan blockchain
  
negative.code:                   CT_NetOp_GetBlockHeaders : Begin
                      if HeaderData.header_type=ntp_request then begin
                        if TNetData.NetData.IpInfos.ReachesLimits(Client.RemoteHost,CT_NetTransferType[HeaderData.header_type],TNetData.OperationToText(HeaderData.operation),HeaderData.buffer_data_length,
                          TArray<TLimitLifetime>.Create(TLimitLifetime.Create(30,30,0))) then DisconnectInvalidClient(False,Format('Reached limit %s',[TNetData.OperationToText(HeaderData.operation)]))
                        else DoProcess_GetOperationsBlock_Request(HeaderData,ReceiveDataBuffer)
                      end else TLog.NewLog(ltdebug,Classname,'Received old response of: '+TNetData.HeaderDataToText(HeaderData));
                    End;
                    CT_NetOp_NewBlock, CT_NetOp_NewBlock_Fast_Propagation : Begin
                      DoProcess_NewBlock(HeaderData,ReceiveDataBuffer);
                    End;
                    CT_NetOp_GetBlockchainOperations : Begin
                      if HeaderData.header_type=ntp_request then begin
  