dynamic_zone_rsi_of_macd_nmc.mq5

#property indicator_separate_window
#property indicator_buffers 4
#property indicator_color1  DeepSkyBlue
#property indicator_color2  LimeGreen
#property indicator_color3  DimGray
#property indicator_color4  Red
#property indicator_style3  STYLE_DOT
#property indicator_width1  2
#property indicator_minimum   0
#property indicator_maximum 100

#import "dynamicZone.dll"
   double dzBuy(double& sourceArray[],double probabiltyValue, int lookBack, int bars, int i );
   double dzSell(double& sourceArray[],double probabiltyValue, int lookBack, int bars, int i );
#import

extern string TimeFrame              = "current time frame";
extern int    MacdFastPeriod         =  12;
extern int    MacdSlowPeriod         =  26;
extern int    MacdPrice              =  PRICE_CLOSE;
extern int    RsiPeriod              =  14;
extern bool   DzShowZeroLine         = true;
extern int    DzLookBackBars         = 60;
extern double DzStartBuyProbability  = 0.10;
extern double DzStartSellProbability = 0.10;
extern double OBLevel                = 90;
extern double OSLevel                = 10;
extern bool   Interpolate            = true;

double Rsi[];
double upBuffer[];
double miBuffer[];
double dnBuffer[];
double macd[];

int    timeFrame;
string IndicatorFileName;
bool   CalculatingRsi;
bool   ReturningBars;

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

int deinit()
{
   return(0);
}

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

   if(counted_bars < 0)   return(-1);
   if(counted_bars > 0)   counted_bars--;
           limit = MathMin(Bars-counted_bars,Bars-1);
           if (ReturningBars)  { Rsi[0] = limit+1; return(0); }

   if (CalculatingRsi || timeFrame==Period())
   {  
      for(i=limit; i>=0; i--)
      {
         macd[i]  = iMACD(NULL,0,MacdFastPeriod,MacdSlowPeriod,1,MacdPrice,MODE_MAIN,i);
         double macdU = 0;
         double macdD = 0;
            if (macd[i]>macd[i+1]) macdU = macd[i]-macd[i+1];
            if (macd[i]<macd[i+1]) macdD = macd[i+1]-macd[i];

         double up = Wilders(macdU,0,RsiPeriod,i);
         double dn = Wilders(macdD,2,RsiPeriod,i);
            if ((up+dn)!=0) 
                  Rsi[i] = 100.0*up/(dn+up);
            else  Rsi[i] =  50.0;             

         if (DzStartBuyProbability  > 0) dnBuffer[i] = dzBuy (Rsi, DzStartBuyProbability,  DzLookBackBars, Bars, i);
         if (DzStartSellProbability > 0) upBuffer[i] = dzSell(Rsi, DzStartSellProbability, DzLookBackBars, Bars, i);
         if (DzShowZeroLine)
         {
            miBuffer[i] = dzSell(Rsi,0.5,DzLookBackBars,Bars,i);
               if (Rsi[i]>OBLevel) miBuffer[i] = 100;
               if (Rsi[i]<OSLevel) miBuffer[i] =   0;
         }               
      }

      return(0);
   }

   limit = MathMax(limit,MathMin(Bars-1,i

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