SwamiRSI_v1

#property indicator_separate_window
#property indicator_buffers 4
#property indicator_color1  DarkOrchid
#property indicator_color2  Chocolate
#property indicator_color3  CLR_NONE
#property indicator_color4  CLR_NONE

#property indicator_width1  2
#property indicator_width2  2  

extern int     VisualMode     =        0;    //0-original,1-trend
extern int     Price          =        0;    //Applied Price(0-Close;1-Open;2-High;3-Low;4-Median;5-Typical;6-Weighted)
extern int     StartLength    =       12;    //RSI Start Period
extern int     EndLength      =       48;    //RSI End Period
extern int     SampleLength   =       48;    //Sample RSI Period(0-off)            
extern int     Smooth         =        5;    //Smoothing Period     
extern color   UpTrendColor   =     Lime;    //UpTrend Color 
extern color   DnTrendColor   =      Red;    //DownTrend Color
extern color   FlatColor      =   Yellow;    //Flat Color (if NONE-2 Color Mix)  
extern string  UniqueName     =    "RSI";    //
extern int     ScaleMode      =        1;    //0-J.Ehlers,1-0...100
extern int     SwamiBars      =      100;    //-1-off,0-all Bars,>0-any number 

double   RSI[];
double   sumRSI[];
double   upValue[];
double   loValue[];

int      draw_begin, win, upLineR, upLineG, upLineB, dnLineR, dnLineG, dnLineB, flLineR, flLineG, flLineB; 
string   short_name, uphex, dnhex;
double   swamiRSI[], ema[][2], price[2];
int      prevtime[], swamisize, trend[][2], prevtrendtime;
double   fuzzWidth, maxValue, minValue;           

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

void deinit()
{ 
   ObjectsDeleteAll(win,OBJ_RECTANGLE);  

   return(0);
}

int start()
{
      // код доступен только после оплаты
   }
   int   shift, limit, Color1, Color2, Color3, counted_bars=IndicatorCounted();
   win = WindowFind(short_name); 

   if (counted_bars > 0)  limit=Bars-counted_bars-1;
   if (counted_bars < 0)  return(0);
   if (counted_bars < 1)
   { 
   limit = Bars-1;   
   for(int i=limit;i>=0;i--) RSI[i] = EMPTY_VALUE; 
   ObjectsDeleteAll(win,OBJ_RECTANGLE);  
   }   

   for(shift=limit; shift>=0; shift--)
   {   
      if(prevtrendtime != Time[shift]) 
      {
      for(i=0;i<swamisize;i++) trend[i][1] = trend[i][0];
      price[1]      = price[0];
      prevtrendtime = Time[shift];
      }

   loValue[shift] = minValue;
 

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