Laguerre PPO

#property description "Laguerre PPO"
#property description "made by mladen"
#property description "for more visit www.forex-station.com"

#property indicator_separate_window
#property indicator_buffers 8
#property indicator_color1  clrSilver
#property indicator_color2  clrSilver
#property indicator_color3  clrGreen
#property indicator_color4  clrLimeGreen
#property indicator_color5  clrOrangeRed
#property indicator_color6  clrSandyBrown
#property indicator_color7  clrDarkGray
#property indicator_color8  clrDarkGray
#property strict

extern ENUM_TIMEFRAMES TimeFrame = PERIOD_CURRENT; // Time frame
extern int    LookBack        = 200;          // Look back period
extern double GammaFast       = 0.4;          // Fast Laguerre gamma value
extern double GammaSlow       = 0.8;          // Slow Laguerre gamma value 
extern ENUM_APPLIED_PRICE Price = PRICE_MEDIAN; // Price
extern double Percent1        = 80;           // Lower percent to use
extern double Percent2        = 90;           // Higher percent to use
extern bool   alertsOn        = false;        // Turn alerts on?
extern bool   alertsOnCurrent = true;         // Alerts on current (still opened) bar?
extern bool   alertsMessage   = true;         // Alerts should show pop-up message?
extern bool   alertsSound     = false;        // Alerts should play alert sound?
extern bool   alertsPushNotif = false;        // Alerts should send push notification?
extern bool   alertsEmail     = false;        // Alerts should send email?
extern int    barsWidth       = 2;            // Bars width for display
extern bool   Interpolate     = true;         // Interpolate data in multi time frame mode?

double pctRankT[],pctRankB[],histnu[],histnd[],histd[],histdd[],histu[],histuu[],ppoT[],ppoB[],stateu[],stated[];
string indicatorFileName;
bool   returnBars;

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

int start()
{
      // код доступен только после оплаты
   }
   if (Bars<=2) return(0);
   int counted_bars=IndicatorCounted();
      if(counted_bars<0) return(-1);
      if(counted_bars>0) counted_bars--;
         int limit = MathMin(Bars-counted_bars,Bars-1);
         if (returnBars) { histnu[0] = limit+1; return(0); }
         if (TimeFrame != _Period)
         {
            limit = (int)MathMax(limit,MathMin(Bars-1,iCustom(NULL,TimeFrame,indicatorFileName,-99,0,0)*TimeFrame/_Period));
            for (int i=limit; i>=0; i--)   
            {
               int y = iBarShift(NULL,TimeFrame,Time[i]);
               pctRankT[i] = iCustom(NULL,TimeFrame,indicatorFileName,PERIOD_CURRENT,LookBack,GammaFast,GammaSlow,Price,Percent1,Percent2,alertsOn,alertsOnCurrent,alertsMessage,alertsSound,alertsPushNotif,alertsEmail, 6,y);
               pctRankB[i] = iCustom(NULL,TimeFrame,indicatorFileName,PERIOD_CURRENT,LookBack,GammaFast,GammaSlow,Price,Percent1,Percent2,alertsOn,alertsOnCurrent,alertsMessage,alertsSound,alertsPushNotif,alertsEmail, 7,y);
               stateu[i]   = iCustom(NULL,TimeFrame,indicatorFileName,PERIOD_CURRENT,LookBack,GammaFast,GammaSlow,Price,Percent1,Percent2,alertsOn,alertsOnCurrent,alertsMessage,alertsSound,alertsPushNotif,alertsEmail,10,y);
               stated[i]   = iCustom(NULL,TimeFrame,indicatorFileName,PERIOD_CURRENT,LookBack,GammaFast,GammaSlow,Price,Percent1,Percent2,alertsOn,alertsOnCurrent,alertsMessage,alertsSound,alertsPushNotif,alertsEmail,11,y);
               histnd[i]   = EMPTY_VALUE;
               histnu[i]   = EMPTY_VALUE;
               histu[i]    = EMPTY_VALUE;
               histd[i]    = EMPTY_VALUE;
               histuu[i]   = EMPTY_VALUE;
               histdd[i]   = EMPTY_VALUE;
               if (!Interpolate || (i>0 && y==iBarShift(NULL,TimeFrame,Time[i-1]))) continue;

               int n,j; datetime time = iTime(NULL,TimeFrame,y);
                  for(n = 1; (i+n)<Bars && Time[i+n] >= time; n++) continue;	
                  for(j = 1; j<n && (i+n)<Bars && (i+j)<Bars; j++)
                  {
                     pctRankT[i+j] = pctRankT[i] + (pctRankT[i+n] - pctRankT[i])*j/n;
                     pctRankB[i+j] = pctRankB[i] + (pctRankB[i+n] - pctRankB[i])*j/n;
                  }
            }
            for (int i=limit; i>=0; i--)   
            {
                  if (stateu[i]== 1) {  histd[i]  = pctRankT[i]; histnd[i] = pctRankB[i]; }
                  if (stateu[i]== 2) {  histdd[i] = pctRankT[i]; histnd[i] = pctRankB[i]; }
                  if (stated[i]==-1) {  histu[i]  = pctRankB[i]; histnd[i] = pctRankT[i]; }
     

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