RSI_DPO_v1

#property indicator_separate_window
#property indicator_buffers   1
#property indicator_color1    LightBlue
#property indicator_width1    2 
#property indicator_level1    50
#property indicator_level2    30
#property indicator_level3    70
#property indicator_minimum 0
#property indicator_maximum 100

extern int       Price        =  0; //Applied Price(0-Close;1-Open;2-High;3-Low;4-Median;5-Typical;6-Weighted)
extern int       Length       = 14; // Period of evaluation
extern int       MA_Mode      =  2; // Mode of MA
extern int       Detrend_Mode =  0; // Detrender mode: 0-off,1-on

double RSI[];
double Bulls[];
double Bears[];
double MA1[];
double MA2[];

int init()
{
      // код доступен только после оплаты
   }

int start()
  {
      // код доступен только после оплаты
   }
   int      shift, limit, counted_bars=IndicatorCounted();
   double   Price1, Price2;

   if ( counted_bars < 0 ) return(-1);
   if ( counted_bars ==0 ) limit=Bars-1;

   if ( counted_bars < 1 ) 
   for(int i=1;i<Length-1;i++) 
   RSI[Bars-i]=0;    

   if(counted_bars>0) limit=Bars-counted_bars;
   limit--;

   for( shift=limit; shift>=0; shift--)
   {
      if(Detrend_Mode==0)
      {
      Price1 = iMA(NULL,0,1,0,0,Price,shift);
      Price2 = iMA(NULL,0,1,0,0,Price,shift+1); 
      }
      else
      {
      Price1 = iMA(NULL,0,1,0,0,Price,shift) - iMA(NULL,0,Length,Length*0.5+1,0,Price,shift); 
      Price2 = iMA(NULL,0,1,0,0,Price,shift+1) - iMA(NULL,0,Length,Length*0.5+1,0,Price,shift+1); 
      }

      if(shift <= Bars-2)
      {
      Bulls[shift] = 0.5*(MathAbs(Price1-Price2)+(Price1-Price2));
      Bears[shift] = 0.5*(MathAbs(Price1-Price2)-(Price1-Price2));
      }
      else
      {
    

Показано первые 50% кода (символов: 3094)