Code: Select all

if ((C1>O1)&&(C>O)&&(C>=C1)&&(O>=O1)&& ((C-O)>=(C1-O1))) {
if (Display_BULL_BULL == true) {
ObjectCreate(PatternText[shift], OBJ_TEXT, 0, Time[shift1], Low[shift1] - Range*1.5);
ObjectSetText(PatternText[shift], "BULL BULL", 9, "Times New Roman", Yellow);
upArrow[shift1] = Low[shift1] - Range*0.5;
}
if (shift == 0 && Show_Alert == true) {
pattern="BULL BULL pattern";
setalert = 1;
}

Code: Select all

 if(
       Close[i] > Open[i] && Close[i+1] > Open[i+1] &&
         Close[i]>Close[i+1] && Open[i]>Open[i+1] &&
         (Close[i]-Open[i])>(Close[i+1]-Open[i+1]))
        {
         LongBuffer[i]=Low[i]-Range;
         if(alertTag!=Time[0] && i==0 && useAlert==true)
           {
            Alert("BULL_BULL-Alert");
            alertTag=Time[0];
           }
        }

Code: Select all

//+------------------------------------------------------------------+
//|                                              WhatsThisCandle.mq4 |
//|                                        Copyright 2015, Deltabron |
//|                                          http://www.deltabron.nl |
//+------------------------------------------------------------------+
#property copyright "Copyright 2014, Deltabron, Paul Geirnaerdt"
#property link      "http://www.deltabron.nl"
#property version   "1.00"
#property strict
#property indicator_chart_window

enum ENUM_CANDLE_TYPES
{
   BULL,
   BEAR,
   DOJI
};
string candleType[] = { "BULLISH", "BEARISH", "DOJI" };


//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int OnInit()
{
   return(INIT_SUCCEEDED);
}

//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[])
{
   return(rates_total);
}

//+------------------------------------------------------------------+
//| ChartEvent function                                              |
//+------------------------------------------------------------------+
void OnChartEvent(const int id,
                  const long &lparam,
                  const double &dparam,
                  const string &sparam)
{
   if ( id == CHARTEVENT_CLICK )
   {
      int x = (int)lparam;
      int y = (int)dparam;
      datetime dt = 0;
      double price = 0;
      int window = 0;
      
      if ( ChartXYToTimePrice( 0, x, y, window, dt, price ) )
      {
         int shift = iBarShift( NULL, 0, dt );
         
         if ( High[shift] > price && price > Low[shift] )
         {
            // Candle hit!
            ENUM_CANDLE_TYPES candle;
            Print (candleType[candle], " candle is ", IsEngulfing( shift, candle, 2 ) ? "engulfing" : "NOT engulfing");
         
         }
      }
   }
}

ENUM_CANDLE_TYPES GetCandleType( int shift )
{
   ENUM_CANDLE_TYPES result = DOJI;
   
   if ( Close[shift] > Open[shift] ) result = BULL;
   
   else if ( Close[shift] < Open[shift] ) result = BEAR;
   
   return ( result );
}

bool IsEngulfing( int shift, ENUM_CANDLE_TYPES &candle, int count = 1 )
{
   bool result = true;
   
   candle = GetCandleType( shift );
   
   for ( int i = shift + 1; i <= shift + count; i++ )
   {
      switch ( candle )
      {
         case BULL:

            if ( GetCandleType( i ) == BULL ) result = false;

            if ( Open[i] < Open[shift] ) result = false;
            else if ( Close[i] > Close[shift] ) result = false;
            
            break;
         
         case BEAR:

            if ( GetCandleType( i ) == BEAR ) result = false;

            if ( Open[i] > Open[shift] ) result = false;
            else if ( Close[i] < Close[shift] ) result = false;
            
            break;
         
         case DOJI:
         default:
            
            result = false;
            break;
      }   
   }
   
   return ( result );
}