TP anhand der Ausbruchskerze setzen

Einloggen oder registrieren, um einen Kommentar zu schreiben
Kay7667
276
Kay7667  

Guten Abend Leute,


und zwar habe ich einen EA heruntergeladen, dieser funktioniert eigentlich super, nur würde ich gerne wissen, wie ich den TP so setze, dass

diese automatisch dann gesetzt wird, dass diese so hoch ist, wie die Ausbruchskerze.

Hier der Code, den ich übrigens Dank der Erfahrenen User hier gefunden habe.

MfG.

//+------------------------------------------------------------------+
//|                                                 RevPatTrader.mq5 |
//|                                  Copyright 2018, Serhii Shevchuk |
//|                           https://www.mql5.com/en/users/decanium |
//+------------------------------------------------------------------+
#property copyright "Copyright 2018, Serhii Shevchuk"
#property link      "https://www.mql5.com/en/users/decanium"
#property version   "1.00"

#include <OCL_Patterns\RevPatterns.mqh>
#include <Trade\Trade.mqh>
#include <OCL_Patterns\Duration.mqh>
//--- input parameters
input int      inp_ref=50;
input int      inp_tp=500;
input int      inp_sl=500;
input int      inp_timeout=5;
input bool     inp_bullish_pin_bar = true;
input bool     inp_bearish_pin_bar = true;
input bool     inp_bullish_engulfing = true;
input bool     inp_bearish_engulfing = true;
input double   inp_lot_size=1;
//--- trading class
CTrade trade;
//--- class for working with the duration between reference points
CDuration time;
//--- pattern flags
uint p_flags;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
   time.Start();
   p_flags=0;
   if(inp_bullish_pin_bar==true)
      p_flags|=PAT_PINBAR_BULLISH;
   if(inp_bearish_pin_bar==true)
      p_flags|=PAT_PINBAR_BEARISH;
   if(inp_bullish_engulfing==true)
      p_flags|=PAT_ENGULFING_BULLISH;
   if(inp_bearish_engulfing==true)
      p_flags|=PAT_ENGULFING_BEARISH;
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
   time.Stop();
   Print("Test lasted "+time.ToStr());
  }
//+------------------------------------------------------------------+
//| Check for a new bar                                              |
//+------------------------------------------------------------------+
bool IsNewBar(void)
  {
   static datetime tprev=0;
   datetime tcur=iTime(_Symbol,_Period,0);
   if(tprev!=tcur)
     {
      tprev=tcur;
      return true;
     }
   else
      return false;
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
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;
//--- check if the pattern is present
   ENUM_PATTERN pat=IsPattern(p_flags,inp_ref);
   if(pat==PAT_NONE)
      return;
//--- open positions
   double ask=SymbolInfoDouble(_Symbol,SYMBOL_ASK);
   double bid=SymbolInfoDouble(_Symbol,SYMBOL_BID);
   if((pat&(PAT_ENGULFING_BULLISH|PAT_PINBAR_BULLISH))!=0)//buy     
      trade.Buy(inp_lot_size,_Symbol,ask,NormalizeDouble(ask-inp_sl*_Point,_Digits),NormalizeDouble(ask+inp_tp*_Point,_Digits),DoubleToString(ask,_Digits));
   else//sell
   trade.Sell(inp_lot_size,_Symbol,bid,NormalizeDouble(bid+inp_sl*_Point,_Digits),NormalizeDouble(bid-inp_tp*_Point,_Digits),DoubleToString(bid,_Digits));
  }
Otto Pauser
1368
Otto Pauser  

Die Zeilen ganz unten mit Buy und Sell sind eine Katastrophe, weil praktisch nicht zu debuggen.

Ich hab das etwas aufgedröselt und die Berechnung der Kerzenhöhe davorgesetzt. Was immer du damit machen willst.

Die Parameter sind auf 2018 EURUSD optimiert. Hier kann man die '1 minute OHLC'-Daten verwenden.

//+------------------------------------------------------------------+
//|                                                 RevPatTrader.mq5 |
//|                                  Copyright 2018, Serhii Shevchuk |
//|                           https://www.mql5.com/en/users/decanium |
//+------------------------------------------------------------------+
#property copyright "Copyright 2018, Serhii Shevchuk"
#property link      "https://www.mql5.com/en/users/decanium"
#property version   "1.00"

#include <OCL_Patterns\RevPatterns.mqh>
#include <Trade\Trade.mqh>
#include <OCL_Patterns\Duration.mqh>
// input parameters
input int      inp_ref     =  70;
input int      inp_tp      = 270;
input int      inp_sl      = 175;
input int      inp_timeout =  25;
input bool     inp_bullish_pin_bar = true;
input bool     inp_bearish_pin_bar = true;
input bool     inp_bullish_engulfing = true;
input bool     inp_bearish_engulfing = true;
input double   inp_lot_size=1;

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_pin_bar)      p_flags|=PAT_PINBAR_BULLISH;
   if(inp_bearish_pin_bar)      p_flags|=PAT_PINBAR_BEARISH;
   if(inp_bullish_engulfing)    p_flags|=PAT_ENGULFING_BULLISH;
   if(inp_bearish_engulfing)    p_flags|=PAT_ENGULFING_BEARISH;

   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_ENGULFING_BULLISH|PAT_PINBAR_BULLISH))!=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);
      }
  }
Viel Erfolg damit.
Kay7667
276
Kay7667  
Otto Pauser:

Die Zeilen ganz unten mit Buy und Sell sind eine Katastrophe, weil praktisch nicht zu debuggen.

Ich hab das etwas aufgedröselt und die Berechnung der Kerzenhöhe davorgesetzt. Was immer du damit machen willst.

Die Parameter sind auf 2018 EURUSD optimiert. Hier kann man die '1 minute OHLC'-Daten verwenden.

Viel Erfolg damit.
Vielen vielen Dank, im live Trade macht er aktuell ne gute Performance, aber mal sehen wie lange :D
Kay7667
276
Kay7667  
Otto Pauser:

Die Zeilen ganz unten mit Buy und Sell sind eine Katastrophe, weil praktisch nicht zu debuggen.

Ich hab das etwas aufgedröselt und die Berechnung der Kerzenhöhe davorgesetzt. Was immer du damit machen willst.

Die Parameter sind auf 2018 EURUSD optimiert. Hier kann man die '1 minute OHLC'-Daten verwenden.

Viel Erfolg damit.
Vielen Dank für die Verbesserung, nun der EA tut was er soll, nur öffnet er mehr als eine Position gleichzeitig, was muss ich tun, damit er nur max eine Position gleichzeitig öffnen tut ?
Christian
2468
Christian  
Kay7667:
Vielen Dank für die Verbesserung, nun der EA tut was er soll, nur öffnet er mehr als eine Position gleichzeitig, was muss ich tun, damit er nur max eine Position gleichzeitig öffnen tut ?

Endlich mal anfangen SELBER was zu erlernen. Vergraul die Hilfsbereiten nicht mit einer Frageflut.

So lernst du es nicht.

Einloggen oder registrieren, um einen Kommentar zu schreiben