Mosca - Arrows Alerts & Labels

#property description "Mosca - Arrows Alerts & Labels"

#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 Lime
#property indicator_width1 1
#property indicator_color2 Red
#property indicator_width2 1

extern bool    UseFilter       = False;

extern bool    UseTimer              = False;
extern int     AlertTimer            = 15;
extern int     AfterStartOrBeforeEnd = 0;
extern string  NoteIf0               = "0=Signals are given only X seconds after the beginning of a minute";
extern string  NoteIf1               = "1=Signals are given only X seconds before the end of a minute";

extern int     GannLookback    = 10;

extern int     MAPeriod        = 3;
extern int     MAMethod        = 1;
extern int     MAPrice         = PRICE_CLOSE;

extern int     MACDFast        = 5;
extern int     MACDSlow        = 13;
extern int     MACDPrice       = PRICE_CLOSE;
extern int     MACDLevel       = 0;

extern int     RSIPeriod       = 10;
extern int     RSIPrice        = PRICE_TYPICAL;
extern int     RSILevel        = 50;

extern int     BBPeriod        = 10;
extern double  BBDev           = 2.0;
extern int     BBMaMethod      = 0;
extern int     BBPrice         = PRICE_CLOSE;

extern double  ArrowsDisplacement = 0.8;
extern color   ArrowsUpColor      = Lime;
extern color   ArrowsDnColor      = Red;
extern int     ArrowsUpCode       = 233;
extern int     ArrowsDnCode       = 234;
extern int     ArrowsWidth        = 2;

extern bool    AlertsOn        = True;
extern bool    AlertsOnCurrent = True;
extern bool    AlertsMessage   = True;
extern bool    AlertsSound     = False;
extern bool    AlertsEmail     = False;
extern bool    AlertsPush      = False;

extern bool    ShowLabels      = False;
extern color   LabelColor      = Yellow;
extern int     LabelFontWidth  = 14;
extern int     LabelCorner     =  1;
extern int     LabelYDistance  =  0;
extern int     LabelXDistance  =  0;
extern string  MessageUp       = "Buy Signal";
extern string  MessageDn       = "Sell Signal";
extern string  UniqueID        = "Mosca";

double ArrowsBuy[];
double ArrowsSell[];
double trendGann[];
double trend[];

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

int deinit()
{
   DeleteLabels();
   return(0);
}

int start()
{
      // код доступен только после оплаты
   }
   int i,counted_bars = IndicatorCounted();
   if(counted_bars<0) return(-1);
   if(counted_bars>0) counted_bars--;
   int limit = MathMin(Bars-counted_bars,Bars-1);

   for(i=limit; i>=0; i--)
   {
      double EMA    = iMA   (NULL,0,MAPeriod,0,MAMethod,MAPrice,i);
      double MACD   = iMACD (NULL,0,MACDFast,MACDSlow,2,MACDPrice,MODE_MAIN,i);
      double RSI    = iRSI  (NULL,0,RSIPeriod,RSIPrice,i);
      double BB     = iBands(NULL,0,BBPeriod,BBDev,0,BBPrice,MODE_MAIN,i);
      double GannHi = iMA   (NULL,0,GannLookback,0,MODE_SMA,PRICE_HIGH,i+1);
      double GannLo = iMA   (NULL,0,GannLookback,0,MODE_SMA,PRICE_LOW, i+1);

      trendGann[i] = trendGann[i+1];
      trend[i]     = trend[i+1];

      if(Close[i] > GannHi) trendGann[i] =  1;
      if(Close[i] < GannLo) trendGann[i] = -1;

      if(UseTimer)
      {
         if(AfterStartOrBeforeEnd == 0)
         {
            if      (EMA >= BB && Close[i] >= BB && trendGann[i] ==  1 && MACD >= MACDLevel && RSI >= RSILevel && TimeSeconds(TimeCurrent()) < AlertTimer) trend[i] =  1;
            else if (EMA <= BB && Close[i] <= BB && trendGann[i] == -1 && MACD <= MACDLevel && RSI <= RSILevel && TimeSeconds(TimeCurrent()) < AlertTimer) trend[i] = -1;
            else                                                                                                                                           trend[i] =  0;
         }
  

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