///////////////////\\\\\\\\\\\\\\\\\\
///////////////  STC  \\\\\\\\\\\\\\\
////////////  Fillellin  \\\\\\\\\\\\
///////////////////\\\\\\\\\\\\\\\\\\

#property     indicator_chart_window
#property     indicator_buffers                                    2
#property     description                                         "© True Cross HTF"
#property     copyright		                                       ""
#property     strict
#property     link				                                    ""

extern string ————————————————————————1———————————————————————— = "————————|  Settings for  Count Bars :";
input         int                 CountBars                     =  10;                //  Count Bars:

extern string ————————————————————————2———————————————————————— = "————————|  Settings for  TIME-Frame :";
input         ENUM_TIMEFRAMES     TimeFrame                     =  PERIOD_CURRENT;      //  Time Frame:

extern string ————————————————————————3———————————————————————— = "————————|  Settings for  Indicator Stochastic :";
input         int                 InpKPeriod                    =  5;                  //  %K Period
input         int                 InpDPeriod                    =  3;                   //  %D Period
input         int                 InpSlowing                    =  3;                   //  Slowing

input         string —————————————————————————————————————————— =  "";
input         int                 UpperLevel                    =  20;                  //  Overbought level:
input         int                 LowerLevel                    =  80;                  //  Oversold level:

extern string ————————————————————————4———————————————————————— = "————————|  Settings for  Arrows :";
input         int                 BullsTypes                    =  233;                 //  Upper Arrows type:
input         int                 BearsTypes                    =  234;                 //  Lower Arrows type:
input         color               BullArrows                    =  clrLime;             //  Bull Arrows color:
input         color               BearArrows                    =  clrRed;              //  Bear Arrows color:
input         int                 SizeArrows                    =  2;                   //  Arrows size:
input         int                 ShiftArrow                    =  0;                   //  Shifting Arrows from Extremes:

long          times;
int           heigh;
int           limit;
int           period;

double        ArrowBULL[];
double        ArrowBEAR[];
double        SignlBULL[];
double        SignlBEAR[];
double        htfMainsBuff[];
double        htfSignlBuff[];
double        MainsBuff[];
double        SignlBuff[];

bool          upSignal=false;
bool          dnSignal=false;

//————————————————————————————————————|

void OnChartEvent(const int     id,
                  const long   &lparam,
                  const double &dparam,
                  const string &sparam)
{
//————————————————————————————————————|

   if(id == CHARTEVENT_CLICK
   || id == CHARTEVENT_CHART_CHANGE)
   {
      // ChartSetSymbolPeriod(0,NULL,0);
   }
}

//——————————————————————————————————|

int OnInit()
{
   IndicatorBuffers(8);

   SetIndexBuffer(0,ArrowBULL);
   SetIndexBuffer(1,ArrowBEAR);
   SetIndexBuffer(2,htfMainsBuff);
   SetIndexBuffer(3,htfSignlBuff);
   SetIndexBuffer(4,SignlBULL);
   SetIndexBuffer(5,SignlBEAR);
   SetIndexBuffer(6,MainsBuff);
   SetIndexBuffer(7,SignlBuff);
   
   SetIndexArrow (0,BullsTypes);
   SetIndexArrow (1,BearsTypes);
   SetIndexStyle (0,DRAW_ARROW,EMPTY,SizeArrows,BullArrows);
   SetIndexStyle (1,DRAW_ARROW,EMPTY,SizeArrows,BearArrows);

   return(INIT_SUCCEEDED);
}

//—————————————————————————————————————————————————————————|

int OnCalculate(const int       rates_total,
                const int       prev_calculated,
                const datetime &time[],
                const double   &open[],
                const double   &high[],
                const double   &low[],
                const double   &close[],
                const long     &tick_volume[],
                const long     &volume[],
                const int      &spread[])
{
//——————————————————————————————————————————————|

   if(_Period < TimeFrame) period=TimeFrame;
   else                    period=PERIOD_CURRENT;

//———————————————————————————————————————————————————————————————|

          heigh =(int)ChartGetInteger(0,CHART_HEIGHT_IN_PIXELS,0);
   double WPMax = WindowPriceMax();
   double WPMin = WindowPriceMin();
   double distn = WPMax - WPMin;

//——————————————————————————————————————————————————————————|

   if(CountBars >= rates_total) limit=rates_total-InpKPeriod;
   else                         limit=CountBars;

//—————————————————————————————————————————————|

   for(int i = limit; i >= 0; i--)
   {
      SignlBULL[i]= 0;
      SignlBEAR[i]= 0;

      htfMainsBuff[i]= iStochastic(NULL,period,InpKPeriod,InpDPeriod,InpSlowing,MODE_SMA,0,MODE_MAIN,i);
      htfSignlBuff[i]= iStochastic(NULL,period,InpKPeriod,InpDPeriod,InpSlowing,MODE_SMA,0,MODE_SIGNAL,i);
      MainsBuff[i]= iStochastic(NULL,period,InpKPeriod,InpDPeriod,InpSlowing,MODE_SMA,0,MODE_MAIN,i);
      SignlBuff[i]= iStochastic(NULL,period,InpKPeriod,InpDPeriod,InpSlowing,MODE_SMA,0,MODE_SIGNAL,i);

//————————————————————————————————————————————————————————————————————————————————————————————————————|

      if(((htfMainsBuff[i]>htfSignlBuff[i] && MainsBuff[i]>= SignlBuff[i] && MainsBuff[i+1]<= SignlBuff[i+1]) || (MainsBuff[i]>= SignlBuff[i] && MainsBuff[i+1]<= SignlBuff[i+1])) ) {SignlBULL[i]= iLow(NULL,period,i)-(heigh!=0?(distn /(heigh /(10+ShiftArrow))):0);}
     
      if(((htfMainsBuff[i]<htfSignlBuff[i] && MainsBuff[i]<= SignlBuff[i] && MainsBuff[i+1]>= SignlBuff[i+1]) ||  (MainsBuff[i]<= SignlBuff[i] && MainsBuff[i+1]>= SignlBuff[i+1])) ){SignlBEAR[i]= iHigh(NULL,period,i)+(heigh!=0?(distn /(heigh /(10+ShiftArrow))):0);}
   }

//————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————|

       int y=0;
   for(int i=0; i<=limit; i++)
   {
      ArrowBULL[i]= 0;
      ArrowBEAR[i]= 0;

      if(period != PERIOD_CURRENT)
      {
         y = iBarShift(NULL,TimeFrame,Time[i]);

         if(SignlBULL[y]!= 0 && upSignal==false){upSignal=true; ArrowBULL[i]= SignlBULL[y];break;}
         if(SignlBULL[y]== 0 && upSignal==true){upSignal=false; ArrowBULL[i]= 0;break;}

         if(SignlBEAR[y]!= 0 && dnSignal==false){dnSignal=true; ArrowBEAR[i]= SignlBEAR[y];break;}
         if(SignlBEAR[y]== 0 && dnSignal==true){dnSignal=false; ArrowBEAR[i]= 0;break;}
      }
      else
      {
         if(SignlBULL[i]!= 0) {
            ArrowBULL[i]= low[i]-(heigh!=0?(distn /(heigh /(10+ShiftArrow))):0);
            break;
         }
         if(SignlBEAR[i]!= 0) {
         ArrowBEAR[i]= high[i]+(heigh!=0?(distn /(heigh /(10+ShiftArrow))):0);
         break;
         }
      }
   }

   return(rates_total);
}

//———————————————————————————————————| end of the algorithm |—————————————————————————————————————|