Expert Advisor öffnet viele kleine Positionen gleichzeitig

Kay7667 2019.02.18 08:44

Guten Tag leute, und zwar habe ich folgendes Problem,

und zwar tut der EA was er machen soll, er geht bei bestimmten Kerzenformationen Long/Short, nur eröffnet er nicht eine einzige, sondern viele kleine Positionen gleichzeitig.

Den EA habe ich hier downgeloaded und für meine zwecke geändert.

Nur weiß ich nicht, was im Code falsch geschrieben sein soll,

HIer der EA

#include <OCL_Patterns\RevPatterns.mqh>
#include <Trade\Trade.mqh>
#include <OCL_Patterns\Duration.mqh>
// input parameters
input int      inp_ref     =   100;
input int      inp_tp      = 29927;    // Take Profit in Punkten
input int      inp_sl      = 34043;    // Stop Loss in Punkten
input int      inp_timeout =   2534;   // Zeit in Stunden
input double   inp_lot_size= 0.1;      // Lot Anzahl

input bool     inp_bullish_pattern = true;
input bool     inp_bearish_pattern = true;
input bool     inp_bullish_pattern_2 = true;
input bool     inp_bearish_pattern_2 = true;
input bool     inp_bullish_pattern_3 = true;
input bool     inp_bearish_pattern_3 = true;
input bool     inp_bullish_pattern_4 = true;
input bool     inp_bearish_pattern_4 = true;
input bool     inp_bullish_pattern_5 = true;
input bool     inp_bearish_pattern_5 = true;
input bool     inp_bullish_pattern_6 = true;
input bool     inp_bearish_pattern_6 = true;
input bool     inp_bullish_pattern_7 = true;
input bool     inp_bearish_pattern_7 = true;


CTrade      trade;      // trading class
CDuration   time;       // class for working with the duration between reference points
uint        p_flags;    // pattern flags
double      distSL,     // SL distance as price
            distTP;     // TP distance as price
double      calcSL,     // SL calculated as price
            calcTP;     // TP calculated as price

//+------------------------------------------------------------------+
int OnInit()
  {
   time.Start();
   p_flags=0;
   if(inp_bullish_pattern)      p_flags|=PAT_BULLISH_PATTERN;
   if(inp_bearish_pattern)      p_flags|=PAT_BEARISH_PATTERN;
   if(inp_bullish_pattern_2)    p_flags|=PAT_BULLISH_PATTERN_2;
   if(inp_bearish_pattern_2)    p_flags|=PAT_BEARISH_PATTERN_2;
   if(inp_bullish_pattern_3)    p_flags|=PAT_BULLISH_PATTERN_3;
   if(inp_bearish_pattern_3)    p_flags|=PAT_BEARISH_PATTERN_3;
   if(inp_bullish_pattern_4)    p_flags|=PAT_BULLISH_PATTERN_4;
   if(inp_bearish_pattern_4)    p_flags|=PAT_BEARISH_PATTERN_4;
   if(inp_bullish_pattern_5)    p_flags|=PAT_BULLISH_PATTERN_5;
   if(inp_bearish_pattern_5)    p_flags|=PAT_BEARISH_PATTERN_5;
   if(inp_bullish_pattern_6)    p_flags|=PAT_BULLISH_PATTERN_6;
   if(inp_bearish_pattern_6)    p_flags|=PAT_BEARISH_PATTERN_6;
   if(inp_bullish_pattern_7)    p_flags|=PAT_BULLISH_PATTERN_7;
   if(inp_bearish_pattern_7)    p_flags|=PAT_BEARISH_PATTERN_7;
   
   distSL=inp_sl*_Point;
   distTP=inp_tp*_Point;

   return(INIT_SUCCEEDED);
  }

//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
   time.Stop();
   Print("Test lasted "+time.ToStr());
  }

//+------------------------------------------------------------------+
bool IsNewBar(void)
  {
   static datetime tprev=0;
   datetime tcur=iTime(_Symbol,_Period,0);
   if(tprev!=tcur)
     {
      tprev=tcur;
      return true;
     }
   else
      return false;
  }

//+------------------------------------------------------------------+
void OnTick()
  {
                                                      // handle open positions
   int total= PositionsTotal();
   for(int i=0;i<total;i++)
     {
      PositionSelect(_Symbol);
      datetime t0=datetime(PositionGetInteger(POSITION_TIME));
      if(TimeCurrent()>=(t0+(inp_timeout*3600)))
        {
         trade.PositionClose(PositionGetInteger(POSITION_TICKET));
        }
      else
         break;
     }

   if(IsNewBar()==false)
      return;

   ENUM_PATTERN pat=IsPattern(p_flags,inp_ref);       // check if the pattern is present
   if(pat==PAT_NONE)
      return;

   double candleSize=iHigh(_Symbol,_Period,1)-        // höhe der Kerze 1 berechnen
                     iLow (_Symbol,_Period,1);
                                                      // open positions
   double ask=SymbolInfoDouble(_Symbol,SYMBOL_ASK);
   double bid=SymbolInfoDouble(_Symbol,SYMBOL_BID);

  
  
  
   if((pat&(PAT_BULLISH_PATTERN))!=0)
      {  // buy
         calcSL=NormalizeDouble(ask-distSL,_Digits);
         calcTP=NormalizeDouble(ask+distTP,_Digits);
         trade.Buy (inp_lot_size,_Symbol,ask,calcSL,calcTP);
      }
   else
      {  // sell
         calcSL=NormalizeDouble(bid+distSL,_Digits);
         calcTP=NormalizeDouble(bid-distTP,_Digits);
         trade.Sell(inp_lot_size,_Symbol,bid,calcSL,calcTP);
      }
      
 
 
 
 
 
 
 
  if((pat&(PAT_BULLISH_PATTERN_2))!=0)
      {  // buy
         calcSL=NormalizeDouble(ask-distSL,_Digits);
         calcTP=NormalizeDouble(ask+distTP,_Digits);
         trade.Buy (inp_lot_size,_Symbol,ask,calcSL,calcTP);
      }
   else
      {  // sell
         calcSL=NormalizeDouble(bid+distSL,_Digits);
         calcTP=NormalizeDouble(bid-distTP,_Digits);
         trade.Sell(inp_lot_size,_Symbol,bid,calcSL,calcTP);
      }
      
 
 
 
 
 
 
 
  if((pat&(PAT_BULLISH_PATTERN_3))!=0)
      {  // buy
         calcSL=NormalizeDouble(ask-distSL,_Digits);
         calcTP=NormalizeDouble(ask+distTP,_Digits);
         trade.Buy (inp_lot_size,_Symbol,ask,calcSL,calcTP);
      }
   else
      {  // sell
         calcSL=NormalizeDouble(bid+distSL,_Digits);
         calcTP=NormalizeDouble(bid-distTP,_Digits);
         trade.Sell(inp_lot_size,_Symbol,bid,calcSL,calcTP);
      }
   
 
 
 
 
 
 
  if((pat&(PAT_BULLISH_PATTERN_4))!=0)
      {  // buy
         calcSL=NormalizeDouble(ask-distSL,_Digits);
         calcTP=NormalizeDouble(ask+distTP,_Digits);
         trade.Buy (inp_lot_size,_Symbol,ask,calcSL,calcTP);
      }
   else
      {  // sell
         calcSL=NormalizeDouble(bid+distSL,_Digits);
         calcTP=NormalizeDouble(bid-distTP,_Digits);
         trade.Sell(inp_lot_size,_Symbol,bid,calcSL,calcTP);
      }
      
  
  
  
  
  
  
  
  
  if((pat&(PAT_BULLISH_PATTERN_5))!=0)
      {  // buy
         calcSL=NormalizeDouble(ask-distSL,_Digits);
         calcTP=NormalizeDouble(ask+distTP,_Digits);
         trade.Buy (inp_lot_size,_Symbol,ask,calcSL,calcTP);
      }
   else
      {  // sell
         calcSL=NormalizeDouble(bid+distSL,_Digits);
         calcTP=NormalizeDouble(bid-distTP,_Digits);
         trade.Sell(inp_lot_size,_Symbol,bid,calcSL,calcTP);
      }
      
   
   
  
  
  
  
  
   if((pat&(PAT_BULLISH_PATTERN_6))!=0)
      {  // buy
         calcSL=NormalizeDouble(ask-distSL,_Digits);
         calcTP=NormalizeDouble(ask+distTP,_Digits);
         trade.Buy (inp_lot_size,_Symbol,ask,calcSL,calcTP);
      }
   else
      {  // sell
         calcSL=NormalizeDouble(bid+distSL,_Digits);
         calcTP=NormalizeDouble(bid-distTP,_Digits);
         trade.Sell(inp_lot_size,_Symbol,bid,calcSL,calcTP);
      }
      
      
      
 
 
 
  if((pat&(PAT_BULLISH_PATTERN_7))!=0)
      {  // buy
         calcSL=NormalizeDouble(ask-distSL,_Digits);
         calcTP=NormalizeDouble(ask+distTP,_Digits);
         trade.Buy (inp_lot_size,_Symbol,ask,calcSL,calcTP);
      }
   else
      {  // sell
         calcSL=NormalizeDouble(bid+distSL,_Digits);
         calcTP=NormalizeDouble(bid-distTP,_Digits);
         trade.Sell(inp_lot_size,_Symbol,bid,calcSL,calcTP);
      }
  }

Otto Pauser 2019.02.18 09:26 #1

Musst du abfragen ob bereits Position offen

if(PositionSelect(_Symbol))
  {
    PositionVerwalten
  }
else
  {
    CheckAufPositionseröffnung
  }

Kay7667 2019.02.18 11:30 #2

Otto Pauser:

Musst du abfragen ob bereits Position offen

Vielen Dank, kriegt dieser Code eine eigene Zeile ? Oder muss etwas ersetzt werden ?

Mit freundlichen Grüßen.

Otto Pauser 2019.02.18 14:23 #3

Manchmal versteh ich euch wirklich nicht

amando 2019.02.18 15:48 #4

Otto Pauser:
Manchmal versteh ich euch wirklich nicht

Also ich finde Deine Antwort sehr eindeutig Otto, da sollten keine fragen offen bleiben

Kay7667 2019.03.31 11:39 #5

Guten Tag Leute, und zwar würde ich gerne wissen, ob mir da jemand weiter helfen kann, ich schreibe es ein, aber kriege ständig Errormeldungen, und bin langsam echt am Verzweifeln, an sich ist das ein guter EA, aber er soll nur max. 1 Position gleichzeitig eröffnen, kriege es einfach nicht hin, vielen Danke für jegliche Hilfe.

Mit freundlichen Grüßen.

Wo muss ich bei Von Hedging zu Netting Dreiecksformation

Otto Pauser 2019.03.31 18:07 #6

Kay7667:

Mit freundlichen Grüßen.

Falls es ein wirklich profitabler EA ist schick mir den Code und ich repariere ihn dir, aber bitte keinen mit 2 kreuzenden MAs.

Woher nimmst du an,daß es ein guter EA ist, wenn er nur Errormeldungen ausspuckt?

Ich schreibe kostenlos einen [Archiv!] Einen Ratgeber kostenlos Wie programmiert man?

Kay7667 2019.04.01 06:22 #7

Otto Pauser:

Falls es ein wirklich profitabler EA ist schick mir den Code und ich repariere ihn dir, aber bitte keinen mit 2 kreuzenden MAs.

Woher nimmst du an,daß es ein guter EA ist, wenn er nur Errormeldungen ausspuckt?

Also, an sich hat er auf einem Demo Konto gemacht, was ich wollte, im H4. Nun habe ich diese Strategie aber auch schon manuell im M5 getradet, aber automatisch eröffnet er zu viele Positionen gleichzeitig, wenn es dir passt, würde ich dir die Daten am Freitag schicken, da ich aktuell nicht daheim bin, vielen Dank, dass du dich meiner annimmst.

Mit freundlichen Grüßen.

Nachtrag zu EA öffnet Wie programmiert man? FX Sniper's Ergodic CCI

Kay7667 2019.04.05 11:20 #8

Otto Pauser:

Falls es ein wirklich profitabler EA ist schick mir den Code und ich repariere ihn dir, aber bitte keinen mit 2 kreuzenden MAs.

Woher nimmst du an,daß es ein guter EA ist, wenn er nur Errormeldungen ausspuckt?

Habe dir den Code geschickt, vielen Dank, werde ihn für euch testen, und dann die Ergebnisse hier vorweisen

Otto Pauser 2019.04.06 20:48 #9

Kay7667:
Habe dir den Code geschickt, vielen Dank, werde ihn für euch testen, und dann die Ergebnisse hier vorweisen

Hab mir den Code jetzt angesehen, das Problem sitzt in den 'elsen'. Die werden immer ausgeführt, falls eine Bedingung nicht zutrifft.

Im übrigen geht das alles viel einfacher mittels eines Signals. Du brauchst ja nur BUY, SELL oder NONE als Signal.

Ich repariere das.

eine Handelsstrategie auf der Fragen von Neueinsteigern zu Amerikas Verzug, auf Russisch.

Otto Pauser 2019.04.06 21:48 #10

Anbei die adaptierte Version.

Die OnTick() hat sich durch die Verwendung eines Signals dramatisch reduziert:

void OnTick()
{
   int total= PositionsTotal();                       // handle open positions
   for(int i=0;i<total;i++)
     {
      PositionSelect(_Symbol);
      datetime t0=datetime(PositionGetInteger(POSITION_TIME));
      if(TimeCurrent()>=(t0+(inp_timeout*3600)))
         trade.PositionClose(PositionGetInteger(POSITION_TICKET));
      else
         break;
     }

   if(IsNewBar()==false)
      return;

   ENUM_SIGNAL signal=IsPattern(p_flags,inp_ref);       // check if the pattern is present
   
   if(signal==SIGNAL_NONE)
      return;

   //double candleSize=iHigh(_Symbol,_Period,1)-        // höhe der Kerze 1 berechnen
   //                  iLow (_Symbol,_Period,1);
                                                        // open positions
   double ask=SymbolInfoDouble(_Symbol,SYMBOL_ASK);
   double bid=SymbolInfoDouble(_Symbol,SYMBOL_BID);

   switch(signal)
     {
      case SIGNAL_BUY :
         calcSL=NormalizeDouble(ask-distSL,_Digits);
         calcTP=NormalizeDouble(ask+distTP,_Digits);
         trade.Buy (inp_lot_size,_Symbol,ask,calcSL,calcTP);
        break;
      case SIGNAL_SELL:
         calcSL=NormalizeDouble(bid+distSL,_Digits);
         calcTP=NormalizeDouble(bid-distTP,_Digits);
         trade.Sell(inp_lot_size,_Symbol,bid,calcSL,calcTP);
        break;
     }
}

Die wesentlichen Änderungen wurden in RevPattern.mqh (sollte noch überarbeitet werden) durchgeführt.

//+------------------------------------------------------------------+
//| Signals                                                          |
//+------------------------------------------------------------------+
enum ENUM_SIGNAL
{
   SIGNAL_SELL = -1,
   SIGNAL_NONE =  0,
   SIGNAL_BUY  =  1
};

Und die Funktion Check(...) gibt jetzt das Signal und nicht ein Pattern zurück.

Im EURUSD für dieses Jahr im M1 zumindest keine Katastrophe, im USDJPY zB. schon.

Hat imho zumindest Potential.

Dateien:

RevPatterns.mqh 49 kb

RevPattern.mq5 9 kb

Duration.mqh 6 kb

Fragen von Neueinsteigern zu MT4 hat nicht mehr [ARCHIV!] Alle Fragen von

1 2

Neuer Kommentar