frama of rsi - fl.mq5

#property strict

#property indicator_separate_window
#property indicator_buffers 9
#property indicator_color1  clrSilver
#property indicator_color2  clrDeepSkyBlue
#property indicator_color3  clrSandyBrown
#property indicator_color4  clrSilver
#property indicator_color5  clrSilver
#property indicator_color6  clrDeepSkyBlue
#property indicator_color7  clrDeepSkyBlue
#property indicator_color8  clrSandyBrown
#property indicator_color9  clrSandyBrown
#property indicator_width5  2
#property indicator_width6  2
#property indicator_width7  2
#property indicator_width8  2
#property indicator_width9  2
#property indicator_style1  STYLE_DOT
#property indicator_style2  STYLE_DOT
#property indicator_style3  STYLE_DOT

enum enPrices
{
   pr_close,      // Close
   pr_open,       // Open
   pr_high,       // High
   pr_low,        // Low
   pr_median,     // Median
   pr_typical,    // Typical
   pr_weighted,   // Weighted
   pr_average,    // Average (high+low+open+close)/4
   pr_medianb,    // Average median body (open+close)/2
   pr_tbiased,    // Trend biased price
   pr_haclose,    // Heiken ashi close
   pr_haopen ,    // Heiken ashi open
   pr_hahigh,     // Heiken ashi high
   pr_halow,      // Heiken ashi low
   pr_hamedian,   // Heiken ashi median
   pr_hatypical,  // Heiken ashi typical
   pr_haweighted, // Heiken ashi weighted
   pr_haaverage,  // Heiken ashi average
   pr_hamedianb,  // Heiken ashi median body
   pr_hatbiased   // Heiken ashi trend biased price
};
enum enFilterWhat
{
   flt_prc,  // Filter the rsi
   flt_val,  // Filter the frama
   flt_both  // Filter both
};
enum colorOn
{
   clrOnSlope, // Color change on slope change
   clrOnZero,  // Color change on "zero" cross
   clrOnLevel  // Color change on levels cross
};

extern int          RsiPeriod     = 14;         // RSI period
extern enPrices     RsiPrice      = pr_close;   // RSI price
extern int          FramaPeriod   = 14;         // Frama period
extern double       Filter        = 0;          // Filter to use for filtering (<=0 - no filtering)
extern int          FilterPeriod  = 0;          // Filter period (0<= use frama period)
extern enFilterWhat FilterOn      = flt_val;    // Apply filter to :
extern int          LevelPeriod   = 35;         // Floating levels period
extern double       LevelUp       = 90;         // Floating level up
extern double       LevelDown     = 10;         // Floating level down
extern colorOn      ColorChangeOn = clrOnSlope; // Color change on : 

double rsi[],frmBuffer[],frmBufferua[],frmBufferub[],frmBufferda[],frmBufferdb[],state[],prices[],flu[],fld[],flm[];

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

int deinit()
{
   return(0);
}

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

#define framaInstances 1
double workFrama[][framaInstances*2];
double iFrama(double price, int fperiod, int i, int instanceNo=0)
{
   if (fperiod<=1) return(price);
   if (ArrayRange(workFrama,0)!=Bars) ArrayResize(workFrama,Bars); int r = Bars-i-1; instanceNo*=2;

   workFrama[r][instanceNo+0] = price;
   if (r<1) workFrama[r][instanceNo+1] = price;
   else
   {  

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