Bibliotheken: BestInterval - Seite 29

[Dmitrii Verevkin]

Hallo!

Bei der Kompilierung tritt ein Fehler auf. Ist jemandem dieser Fehler schon einmal aufgefallen?

Ich habe das Forum durchsucht, aber ich glaube nicht, dass es schon diskutiert wurde.

[fxsaber]

Dmitrii Verevkin #:

bei der Kompilierung ein Fehler auftritt.

Fügen Sie diese Zeilen zu Deal.mqh hinzu.

#include "Deal_Base.mqh"

struct DEAL : public DEAL_BASE
{
  int Index;

  void ToNull( DEAL &Deals[] ) const
  {
  #ifdef __MQL5__
    Deals[this.Index].DEAL_BASE::ToNull();
  #else // __MQL5__ - https://www.mql5.com/ru/forum/322209#comment_13314616
    Deals[this.Index].ToNull();
  #endif // __MQL5__

    return;
  }
  
  void operator =( const DEAL_BASE &bDeal )
  {
    /*das.*/ DEAL_BASE::operator=(bDeal); // https://www.mql5.com/ru/forum/1111/page3368#comment_48437633
    
    return;
  }  
};

[Dmitrii Verevkin]

Dmitrii Verevkin #:

Hallo!

Ich erhalte einen Fehler beim Kompilieren, ist das jemandem aufgefallen?

Ich habe das Forum durchsucht, ich glaube nicht, dass es diskutiert wurde.

Das hat geholfen.

Danke!

[1005829945]

Bitte helfen Sie mir Wie kann ich dieses Problem lösen? Nach der Kompilierung treten Fehler auf.

[fxsaber]

1005829945 #:
Bitte helfen Sie mir Wie kann ich dieses Problem lösen? Nach der Kompilierung treten Fehler auf.

Die Funktion OnTick fehlt.

[fxsaber]

https://www.mql5.com/ru/blogs/post/771302

[fxsaber]

fxsaber #:
https://www.mql5.com/ru/blogs/post/771302

Die Berechnungen wurden erheblich beschleunigt.

#include <fxsaber\Benchmark\Benchmark.mqh> // https://www.mql5.com/de/code/31279

#define  ORDER_COMMISSION 0
#include <fxsaber\Virtual\Virtual.mqh> // https://www.mql5.com/de/code/22577
#include <fxsaber\BestInterval\BestInterval.mqh> // https://www.mql5.com/de/code/22710

// Benchmark-Skript
void OnStart()
{
  if (VIRTUAL::SelectByHandle(VIRTUAL::Create("BestInterval.mqh.virt"))) // https://c.mql5.com/3/492/BestInterval_mqh.zip
  {
    BESTINTERVAL_INPUT Inputs;

    Inputs.AmountDeleteIntervals = 5;
    Inputs.MinPF = 1.0;
    Inputs.OnlyDelete = false;
    Inputs.Method = METHOD_WEEK;
    
    Inputs.Length = 0.8;
    Inputs.Amount = 10;
            
    BESTINTERVAL BestInterval;
    
    _B(BestInterval.FullCalculate(Inputs), 1);
    Print(BestInterval.ToStringConst());
  }  
}

So war es.

Alert: Bench_Stack = 0, 1 <= Time[Test6.mq5 174 in OnStart: BestInterval.FullCalculate(Inputs)] = 6724116 mcs.

Jetzt.

Alert: Bench_Stack = 0, 1 <= Time[Test6.mq5 174 in OnStart: BestInterval.FullCalculate(Inputs)] = 394778 mcs.

Die Optimierung beschleunigt den Prozess um ein Vielfaches.

[hini]

Welche Dateien wurden aktualisiert?

[fxsaber]

hini #:
Welche Dateien wurden aktualisiert?

Holiday.mqh
Deal_Base.mqh
Deal.mqh
Interval.mqh
BestInterval.mqh

[HimOrik]

fxsaber #:

Kompilierungsfehler.

Berater

 #include <MT4Orders.mqh> // https://www.mql5.com/de/code/16006
 
 //#include <fxsaber\Virtual\Virtual.mqh> // https://www.mql5.com/de/code/22577

#define  BESTINTERVAL_ONTESTER // Optimierungskriterium – Gewinn des besten Intervalls.
#include <fxsaber\BestInterval\BestInterval.mqh> // Ermittlung des besten Handelszeitraums

 //#include <..\Experts\Examples\MACD\MACD Sample.mq5> // Beliebiger Expert Advisor
long tiket = -1;

void OnTick()
{    
MqlTick t;

if(SymbolInfoTick(_Symbol, t))
    {
    if(tiket < 0)
        {
        double lot = ::NormalizeDouble(SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_MIN), 2);
        double price = ::NormalizeDouble(t.ask, _Digits); 
              
        ResetLastError();
        
        tiket = OrderSend(_Symbol, 0, lot, price, 0, 0, 0, "666", 666); 
        
        if(tiket > -1)
           {
            Sleep(1000);
            return;
           }
        else
           {
           Print("\nopenSL:  Fehler bei der BUY-Handelsanfrage  Fehler ", (string)_LastError);
           }        
        }
    else
        {
        
        for(int i = OrdersTotal() - 1; (bool)i--; )    
           {
            if(OrderSelect(i, SELECT_BY_POS) && OrderMagicNumber() == 666 && OrderType() == 0)
                {

                ResetLastError();
                
                if(OrderClose(OrderTicket(), OrderLots(), ::NormalizeDouble(t.bid, _Digits), 0))
                    ExpertRemove();
                
                else
                    {
                    Print("\ncloseB: Fehler bei der BUY-Schließungsanfrage  Fehler ", (string)_LastError);
                    }                    

                } 
           }            
        }
    }
}  

Ich weiß nicht, wie man das alles zusammenfassen kann, deshalb ist es etwas umständlich

Danke.