0-0-TANGO





//+------------------------------------------------------------------+
//|                                                    0-0-TANGO.mq4 |
//|                                        Copyright © 2009, MetaQL. |
//|                                            mrexpertforex@mail.ru |
//+------------------------------------------------------------------+
#property copyright "MetaQL"
#property link "mrexpertforex@mail.ru" 
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
#property indicator_chart_window
#property indicator_buffers 3
#property indicator_color1  Yellow
#property indicator_color2  Blue
#property indicator_color3  Red
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
extern int      X=20;
extern double   POROG=20;
extern int      GJIYBUHA=100;
extern int      COUNTED_BARS=1000;
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
double buf_1[];
double buf_2[];
double buf_3[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
  SetIndexBuffer(0,buf_1);
  SetIndexStyle(0,DRAW_ARROW,0,2);
  SetIndexArrow(0,233);
  
  SetIndexBuffer(1,buf_2);
  SetIndexStyle(1,DRAW_ARROW,0,2);
  SetIndexArrow(1,234);
  
  SetIndexBuffer(2,buf_3);
  SetIndexStyle(2,DRAW_ARROW,0,2);
  SetIndexArrow(2,111);
//----
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
{
 int counted_bars=IndicatorCounted();
 int limit=0;
 if(counted_bars>0)counted_bars--;
 limit=Bars-counted_bars; 
 if(limit>COUNTED_BARS)
 limit=COUNTED_BARS;
 for(int i=1;i<=limit;i++)
 {
  //++++++++++++++++++++++
  int rezult=0;
  //--
  double HI_RSI=iRSI(NULL,0,X,0,i);
  double LO_RSI=iRSI(NULL,0,X,0,i);
  //--
  int HI_RSI_b=i;
  int LO_RSI_b=i;
  //--
  double RSI_1=iRSI(NULL,0,X,0,i);
  //--
  for(int b1=i+1;b1<=i+GJIYBUHA;b1++)
  {
   //++++++++++++++++++++++++++++++
   double RSI_2=iRSI(NULL,0,X,0,b1);
   //--
   if(RSI_2>HI_RSI)
   {
    HI_RSI=RSI_2;
    HI_RSI_b=b1;
   } 
   //---
   if(RSI_2<LO_RSI)
   {
    LO_RSI=RSI_2;
    LO_RSI_b=b1;
   }
   //---
   if( (Close[b1]<Close[i] && RSI_2>=RSI_1)||(Close[b1]>=Close[i] && RSI_2<RSI_1) )
   {
    //--
    double UP=HI_RSI-((HI_RSI-LO_RSI)/100)*POROG;
    //--
    if(RSI_2>=UP)
    {
     rezult=1;
    }
    //---
    double DOWN=LO_RSI+((HI_RSI-LO_RSI)/100)*POROG;
    //--
    if(RSI_2<=DOWN)
    {
     rezult=-1;
    }
    //--
    if( RSI_2>DOWN && RSI_2<UP )
    {
     rezult=0;
    }
    //---
    break;
   }
   //++++++++++++++++++++++++++++++
  }
  //---
  if(rezult>0)
  {
   buf_1[i]=Low[i];
   buf_2[i]=EMPTY_VALUE;
   buf_3[i]=EMPTY_VALUE;
  }
  //---
  if(rezult<0)
  {
   buf_1[i]=EMPTY_VALUE;
   buf_2[i]=High[i];
   buf_3[i]=EMPTY_VALUE;
  }
  //---
  if(rezult==0)
  {
   buf_1[i]=EMPTY_VALUE;
   buf_2[i]=EMPTY_VALUE;
   buf_3[i]=Close[i];
  }
  //---
  //++++++++++++++++++++++
 }
//----
}



Sample





Analysis



Market Information Used:

Series array that contains close prices for each bar
Series array that contains the lowest prices of each bar
Series array that contains the highest prices of each bar


Indicator Curves created:


Implements a curve of type DRAW_ARROW

Indicators Used:

Relative strength index


Custom Indicators Used:

Order Management characteristics:

Other Features: