PSAR_2B_Line

/*------------------------------------------------------------------+
 |                                                 PSAR_2B_Line.mq4 |
 |                                                 Copyright © 2011 |
 |                                             basisforex@gmail.com |
 +------------------------------------------------------------------*/
#property copyright "Copyright © 2011, basisforex@gmail.com"
#property link      "basisforex@gmail.com"
//-----
#property indicator_chart_window
#property indicator_buffers 4
#property indicator_color1 White
#property indicator_color2 Yellow
#property indicator_color3 Aqua
#property indicator_color4 Orange
//-----
extern int        VisualBars       = 500;
//-----
extern double     Step             = 0.02;
extern double     Maximum          = 0.2;
//-----
double s0[];
double s1[];
double s2[];
double s3[];
//-----
double s01[];
double s23[];
//+------------------------------------------------------------------+
int init()
 {
   IndicatorBuffers(6);
   SetIndexBuffer(0, s0);
   SetIndexBuffer(1, s1);
   SetIndexBuffer(2, s2);
   SetIndexBuffer(3, s3);
   //-----
   SetIndexBuffer(4, s01);
   SetIndexBuffer(5, s23);
   //-----
   SetIndexStyle(0, DRAW_LINE, EMPTY, 3);   
   SetIndexStyle(1, DRAW_LINE, EMPTY, 3);    
   SetIndexStyle(2, DRAW_LINE, EMPTY, 3); 
   SetIndexStyle(3, DRAW_LINE, EMPTY, 3);    
   //------
   return(0);
 }
//+------------------------------------------------------------------+
string GetNextTF(int curTF)
 {
   switch(curTF)
    {
      case 1:
        return("5");
        break;
      case 5:
        return("15=");
        break; 
      case 15:
        return("30=");
        break;
      case 30:
        return("60=");
        break;
      case 60:
        return("240=");
        break;
      case 240:
        return("1440=");
        break;        
    }
 }
//+------------------------------------------------------------------+ 
int start()
 {
   int limit;
   int counted_bars = IndicatorCounted();
   if(counted_bars < 0) return(-1);
   if(counted_bars > 0) counted_bars--;
   limit =  VisualBars;
   //-----
   string T = GetNextTF(Period());
   int tf1 = StrToDouble(StringSubstr(T, 0, StringFind(T, "=", 0)));
   //-----
   for(int i = limit - 1; i >= 0; i--)
    {
      s01[i]  = iSAR(NULL, 0, Step, Maximum, i);
      s23[i]  = iSAR(NULL, tf1, Step, Maximum, i / (tf1 / Period()));  
      if(s01[i] < iLow(NULL, 0, i)) s0[i] = s01[i];
      if(s01[i] > iHigh(NULL, 0, i)) s1[i] = s01[i]; 
      if(s23[i] < iLow(NULL, 0, i)) s2[i] = s23[i];
      if(s23[i] > iHigh(NULL, 0, i)) s3[i] = s23[i];   
    }  
   return(0);
 }