Testando 'CopyTicks'. - página 18

 
fxsaber:
Se precisar de uma única fita (COPY_TICKS_TRADE - tempo_msc, último, volume e bandeiras), esta solução é completamente adequada - não são detectados bugs.
Não foram encontrados insetos! Outro bug revelado

Fórum sobre comércio, sistemas comerciais automatizados e estratégias comerciais de teste

Indicador de estoque misterioso

fxsaber, 2016.09.27 18:32

Todos os freios parecem estar ligados quando a entrada do CopyTicks não é zero.

Parece ser uma implementação muito tortuosa do CopyTicks neste modo, mesmo que os carrapatos desde a última chamada sejam solicitados. Parece que deveria voar, mas não voa.

 
Aguarde o beta desta semana, onde fizemos uma série de melhorias nas atualizações de carrapatos e tumblr.
 
Renat Fatkhullin:
Aguarde o beta desta semana, onde fizemos uma série de melhorias nas atualizações de carrapatos e tumblr.
1432 - muitos bugs resolvidos. Obrigado!
 
fxsaber:
1432 - Muitos bugs resolvidos. Obrigado!

Mas não todos.

Se o histórico adicionado for comparado ao histórico real, há discrepâncias no modo COPY_TICKS_ALL (TRADE e INFO - sem problemas). EA

#include <TypeToBytes.mqh> // https://www.mql5.com/ru/code/16280

string GetTickFlag( uint tickflag )
{
  string flag = "";

#define  TICKFLAG_MACRO(A) flag += ((bool)(tickflag & TICK_FLAG_##A)) ? " TICK_FLAG_" + #A : "";
  TICKFLAG_MACRO(BID)
  TICKFLAG_MACRO(ASK)
  TICKFLAG_MACRO(LAST)
  TICKFLAG_MACRO(VOLUME)
  TICKFLAG_MACRO(BUY)
  TICKFLAG_MACRO(SELL)
#undef  TICKFLAG_MACRO

  if (flag == "")
    flag = " FLAG_UNKNOWN (" + (string)tickflag + ")";
     
  return(flag);
}

#define  TOSTRING(A) " " + #A + " = " + (string)Tick.A

string TickToString( const MqlTick &Tick )
{
  return(TOSTRING(time) + "." + (string)IntegerToString(Tick.time_msc %1000, 3, '0') +
         TOSTRING(bid) + TOSTRING(ask) + TOSTRING(last)+ TOSTRING(volume) + GetTickFlag(Tick.flags));
}

// Дописывает свежие тики после предыдущего запуска
int AddFreshTicks( MqlTick &Ticks[], const string Symb = NULL, const uint flags = COPY_TICKS_ALL )
{
  int Res = 0;
  const int Amount = ArraySize(Ticks);
  
  MqlTick NewTicks[];  
  const int NewAmount = (Amount == 0) ? CopyTicks((Symb == NULL)? Symbol() : Symb, NewTicks, flags, (ulong)(TimeCurrent() - 100) * 1000) :
                                        CopyTicks((Symb == NULL)? Symbol() : Symb, NewTicks, flags, Ticks[Amount - 1].time_msc);
  
  if (NewAmount > 0)
  {
    if (Amount > 0)
    {
      // Взяли крайнее время из предыдущей истории
      const long LastTime = Ticks[Amount - 1].time_msc;
      
      int Count = 1;
      
      // Находим (Count) в предыдушей истории количество тиков со временем LastTime
      for (int i = Amount - 2; i >= 0; i--)
      {
        if (Ticks[i].time_msc < LastTime)
          break;
          
        Count++;
      }

      if ((Count < Amount) && (Count < NewAmount))      
        Res = ArrayCopy(Ticks, NewTicks, Amount, Count);
    }
    else
      Res = ArrayCopy(Ticks, NewTicks);
  }
  
  return(Res);
}

#define  TOSTRING2(A) #A + " = " + (string)(A) + " "

template <typename T>
bool ArrayEqual( const T &Array1[], const T &Array2[] )
{
  const int Amount = MathMin(ArraySize(Array1), ArraySize(Array2));
  bool Res = (Amount > 0);

  if (Res)
    for (int i = 0; i < Amount; i++)
      if (_R(Array1[i]) != Array2[i]) // https://www.mql5.com/ru/code/16280
      {
        Print(TOSTRING2(i) + TOSTRING2(ArraySize(Array1)) +TOSTRING2(ArraySize(Array2)));
        Print(TOSTRING2(TickToString(Array1[i])) + "\n" + TOSTRING2(TickToString(Array2[i])) + "\n");
        
        Res = false;

        break;
      }

  return(Res);
}

void OnTick( void )
{
 static MqlTick PrevTicks[];
  
  // Дописываем свежие тики после предыдущего вызова
  AddFreshTicks(PrevTicks, _Symbol, COPY_TICKS_ALL);
  
  MqlTick Ticks[];
  
  if (ArraySize(PrevTicks) > 0)
  {
    // Взяли историю тиков
    Print(CopyTicks(_Symbol, Ticks, COPY_TICKS_ALL, PrevTicks[0].time_msc, 100000));
    
    // Проверка на совпадение собираемой истории с самой историей
    Print(ArrayEqual(Ticks, PrevTicks) ? "Equal" : "Not Equal");
  }
}

Resultado

2016.09.29 10:36:23.722 Test10 (Si-12.16,M1)    Not Equal
2016.09.29 10:36:23.722 Test10 (Si-12.16,M1)    
2016.09.29 10:36:23.722 Test10 (Si-12.16,M1)    TickToString(Array2[i]) =  time = 2016.09.29 10:36:20.547 bid = 64353.0 ask = 64354.0 last = 64353.0 volume = 4 TICK_FLAG_BID 
2016.09.29 10:36:23.722 Test10 (Si-12.16,M1)    TickToString(Array1[i]) =  time = 2016.09.29 10:36:20.546 bid = 64353.0 ask = 64354.0 last = 64353.0 volume = 1 TICK_FLAG_LAST TICK_FLAG_VOLUME TICK_FLAG_SELL 
2016.09.29 10:36:23.722 Test10 (Si-12.16,M1)    i = 57 ArraySize(Array1) = 59 ArraySize(Array2) = 58 
2016.09.29 10:36:23.722 Test10 (Si-12.16,M1)    59
 
fxsaber:

Mas não todos.

Se o histórico adicionado for comparado ao histórico real, há discrepâncias no modo COPY_TICKS_ALL (TRADE e INFO - sem problemas). EA

Resultado

Eu registrei o código acima e descobri as razões. Se CopyTicks (de > 0) receber carrapatos até o mais recente, pode perder alguns.

Exemplo.

Carrapatos solicitados a partir de = 2016.09.29 11:05:55.564. Recebi três carrapatos em resposta

2016.09.29 11:05:58.724 Test10 (Si-12.16,M1)    2:  time = 2016.09.29 11:05:55.580 bid = 64380.0 ask = 64382.0 last = 64381.0 volume = 4 TICK_FLAG_BID TICK_FLAG_ASK
2016.09.29 11:05:58.724 Test10 (Si-12.16,M1)    1:  time = 2016.09.29 11:05:55.576 bid = 64379.0 ask = 64381.0 last = 64381.0 volume = 4 TICK_FLAG_LAST TICK_FLAG_VOLUME TICK_FLAG_BUY
2016.09.29 11:05:58.724 Test10 (Si-12.16,M1)    0:  time = 2016.09.29 11:05:55.564 bid = 64379.0 ask = 64381.0 last = 64380.0 volume = 1 TICK_FLAG_BID TICK_FLAG_ASK

Algum tempo depois eu pedi o histórico do tick de longe e recebi um tick, que o CopyTicks perdeu antes.

2016.09.29 11:05:58.732 Test10 (Si-12.16,M1)    time = 2016.09.29 11:05:55.579 bid = 64380.0 ask = 64382.0 last = 64381.0 volume = 16 TICK_FLAG_LAST TICK_FLAG_VOLUME TICK_FLAG_BUY 

Que insecto!

Parece ser algum tipo de conflito entre a escrita e a leitura do banco de dados de carrapatos em paralelo.

 
Outro bug, agora em todos os modos COPY_TICKS_*

Fórum sobre comércio, sistemas comerciais automatizados e estratégias comerciais de teste

Indicador de estoque misterioso

fxsaber, 2016.09.30 15:09

Foi capaz de localizar um dos insetos causando divergências no indicador. Trata-se novamente do CopyTicks.

Acontece que, se coletarmos a história em partes, ela pode não coincidir com a história real. O Consultor Especialista o mostra

#include <TypeToBytes.mqh> // https://www.mql5.com/ru/code/16280

long LastTime = 0; // time_msc-время последнего тика (самого свежего), полученного из истории
int Count = 0;     // Количество тиков в последенем запросе, у которых time_msc == LastTime

// Возвращает следующие тики (после предыдущего вызова)
int GetFreshTicks( MqlTick &Ticks[], const uint flags = COPY_TICKS_TRADE, const uint count = 100000 )
{
  int Res = 0;

  MqlTick NewTicks[];
  const int NewAmount = CopyTicks(Symbol(), NewTicks, flags, LastTime, count);

  if ((NewAmount > 0) && (Count < NewAmount))
  {
    Res = ArrayCopy(Ticks, NewTicks, 0, Count);

    // Взяли крайнее время из текущей истории
    LastTime = Ticks[Res - 1].time_msc;
    Count = 1;

    // Находим (Count) в текущей истории количество тиков со временем LastTime
    for (int i = Res - 2; i >= 0; i--)
    {
      if (Ticks[i].time_msc < LastTime)
        break;

      Count++;
    }
  }
  
  return(ArrayResize(Ticks, Res));
}

// Сравнение двух массивов
template <typename T>
bool ArrayEqual( const T &Array1[], const T &Array2[] )
{
  const int Amount = MathMin(ArraySize(Array1), ArraySize(Array2));
  bool Res = (Amount > 0);

  if (Res)
    for (int i = 0; i < Amount; i++)
      if (_R(Array1[i]) != Array2[i]) // https://www.mql5.com/ru/code/16280
      {
        Res = false;
        
        ExpertRemove();

        break;
      }

  return(Res);
}

void OnTick()
{
  // возьмем тики с начала утренней сессии
  Count = 0;
  LastTime = (TimeCurrent() - (TimeCurrent() % (24 * 3600))) * 1000;
  
  MqlTick Ticks[];    // История, собранная по частям
  MqlTick NewTicks[]; // массив для следующей части тиков
  
  // Собираем историю по частям  
  while (GetFreshTicks(NewTicks, COPY_TICKS_TRADE, 100000) > 0)
    ArrayCopy(Ticks, NewTicks, ArraySize(Ticks));
    
  if (ArraySize(Ticks) > 0)    
  {
    // Взяли ВСЮ историю тиков
    Print(CopyTicks(_Symbol, NewTicks, COPY_TICKS_TRADE, Ticks[0].time_msc, 10000000)); // 10000000 - большое число, чтобы все выкачать.
    
    // Проверка на совпадение собранной по частям истории с самой историей
    Print(ArrayEqual(NewTicks, Ticks) ? "Equal" : "Not Equal");
  }    
}

O resultado

2016.09.30 16:02:54.661 Test (Si-12.16,M1)      Not Equal
2016.09.30 16:02:54.661 Test (Si-12.16,M1)      ExpertRemove() function called
2016.09.30 16:02:54.621 Test (Si-12.16,M1)      333740
2016.09.30 16:02:54.121 Test (Si-12.16,M1)      Equal
2016.09.30 16:02:54.071 Test (Si-12.16,M1)      333736
2016.09.30 16:02:53.791 Test (Si-12.16,M1)      Equal
2016.09.30 16:02:53.741 Test (Si-12.16,M1)      333723

Este EA também mostra um bug fraco. Descobri que o histórico coletado em partes pode estar faltando algumas partes que duram vários minutos. Apenas uma reprodução concisa e clara sob a forma de um código não foi inventada. E não adianta colocar complexos, porque ninguém vai nem olhar.

Em geral, não há como derrotar os bugs no CopyTicks. E note que o Expert Advisor trabalha em modo fita adesiva (COPY_TICKS_TRADE). Portanto, não pode sequer funcionar com fitas.


 
fxsaber:
Outro bug, agora em todos os modos COPY_TICKS_*

Você já tentou obter carrapatos tanto a partir de um certo ponto como de um certo número, por exemplo, fixo?

A partir do código, parece um certo número (100000) desde o último momento. E se você receber apenas carrapatos N. Haverá pulos também?

Deixe-me dizer-lhe desde já, eu mesmo ainda não experimentei muito carrapatos...

 
Alexey Kozitsyn:

Você já tentou obter carrapatos tanto a partir de um certo ponto como de um certo número, por exemplo, fixo?

A partir do código, parece um certo número (100000) desde o último momento. E se você receber apenas carrapatos N. Haverá pulos também?

Deixe-me dizer-lhe desde já, eu mesmo ainda não experimentei muito carrapatos...

Experimentei-o.

Hoje eles estão prometendo uma nova construção para a demonstração. Portanto, temos que esperar.

 
fxsaber:

Experimentei-o.

Hoje eles prometem uma nova construção para demonstração. É por isso que eu tenho que esperar.

Espero que, CopyTicks() seja corrigido.

A propósito, desde que o CopyTicks() apareceu eu pedi aos desenvolvedores que adicionassem a função de sobrecarga como em outras funções Copy...(). Eles me disseram que sim. И... silêncio...

 
Alexey Kozitsyn:

A propósito, desde que o CopyTicks() apareceu, pedi aos desenvolvedores que adicionassem função de sobrecarga, como para outras funções Copy...(). Eles me disseram que sim. И... silêncio...

Você pode acrescentar suas próprias sobrecargas.