anchor.diff:      {$IFDEF Use_OpenSSL}
       GetResultObject.GetAsVariant('openssl').Value := IntToHex(OpenSSLVersion,8);
       {$ENDIF}
  -    nsaarr := TNetData.NetData.NodeServersAddresses.GetValidNodeServers(true,20);
  +    nsaarr := TNetData.NetData.NodeServersAddresses.GetValidNodeServers(true,10);
       for i := low(nsaarr) to High(nsaarr) do begin
         jso := GetResultObject.GetAsArray('nodeservers').GetAsObject(i);
         jso.GetAsVariant('ip').Value := nsaarr[i].ip;
  
positive.code:       ErrorNum := CT_RPC_ErrNum_NotAllowedCall;
        Exit;
      end;
      jsonresponse.GetAsVariant('result').Value := _RPCServer.WalletKeys.LockWallet;
      Result := true;
    end else if (method='unlock') then begin
      // Unlocks the Wallet with "pwd" password
  
negative.code:       ErrorDesc := 'Need param "pwd"';
        exit;
      end;
      FNode.OperationSequenceLock.Acquire;  // Use lock to prevent N_Operation race-condition on concurrent invocations
      try
        If Not _RPCServer.WalletKeys.IsValidPassword then begin
          _RPCServer.WalletKeys.WalletPassword:=params.AsString('pwd','');
        end;
        jsonresponse.GetAsVariant('result').Value := _RPCServer.WalletKeys.IsValidPassword;
        Result := true;
      finally
        FNode.OperationSequenceLock.Release;
      end;
    end else if (method='setwalletpassword') then begin
      // Changes the Wallet password with "pwd" param
      // Must be unlocked first
  