Индикаторы: WPRSI signal - страница 3

[gumgum]

//+------------------------------------------------------------------+
//|                                  WPRSI signal V2(SoundAlarm).mq4 |
//|                                                           gumgum |
//|                                           [e-mail] |
//+------------------------------------------------------------------+
#property copyright "gumgum"
#property link      "[e-mail]"
#property  indicator_separate_window
#property indicator_buffers 5
#property indicator_color1 Gray
#property indicator_color2 Blue
#property indicator_color3 Red
#property indicator_color4 Blue
#property indicator_color5 Red
#property  indicator_width1  5
//---- input parameters
extern int WPRSIperiod  =27;
extern int Waytoway     =27;
extern int filterUP     =10;
extern int filterDN     =10; 
extern bool UseSound   =false;
extern string SoundFile  ="Alert.wav";
//---- buffers
double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
double ExtMapBuffer4[];
double ExtMapBuffer5[];
//----
double alert; 
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
SetIndexStyle(2,DRAW_HISTOGRAM,0,0);   
SetIndexBuffer(2, ExtMapBuffer3);
//----
SetIndexStyle(0,DRAW_HISTOGRAM,0,0);  
SetIndexBuffer(0, ExtMapBuffer1);
//----
SetIndexStyle(1,DRAW_HISTOGRAM,0,0);   
SetIndexBuffer(1, ExtMapBuffer2);
//----
SetIndexStyle(3,DRAW_ARROW,0,0);   
SetIndexArrow(3, 233);
SetIndexBuffer(3, ExtMapBuffer4);
//----
SetIndexStyle(4,DRAW_ARROW,0,0); 
SetIndexArrow(4, 234);
SetIndexBuffer(4, ExtMapBuffer5);
//---- name for DataWindow and indicator subwindow label
   IndicatorShortName("WPRSI sinal v.2("+WPRSIperiod+","+Waytoway+","+filterUP+","+filterDN+")");
//----
  
   return(0);
  }
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
   int limit;
   int counted_bars=IndicatorCounted();
//---- check for possible errors
   if(counted_bars < 0)
      return(-1);
//---- last counted bar will be recounted
   if(counted_bars > 0)
      counted_bars--;
   limit=Bars - counted_bars;
//----
   for(int i=1; i < limit; i++)
     {
      //---                     
               double upsum=0;
               int up1;
               if(((iWPR(NULL,0,WPRSIperiod,i)>-50)&&(iRSI(NULL,0,WPRSIperiod,PRICE_MEDIAN,i)<50))||((iWPR(NULL,0,WPRSIperiod,i)<-50)&&(iRSI(NULL,0,WPRSIperiod,PRICE_MEDIAN,i)>50)))
               {
               upsum=0;
               for(up1=0;up1<=Waytoway;up1++)
               {
               upsum=(Close[i+up1]-Open[i+up1])/(High[i+up1]-Low[i+up1])+upsum;
               }
               ExtMapBuffer1[i]=logic(upsum);
               }
      //----
      if((iWPR(NULL,0,WPRSIperiod,i)>-50)&&(iRSI(NULL,0,WPRSIperiod,PRICE_MEDIAN,i)>50))
      {
               upsum=0;
               for(up1=0;up1<=Waytoway;up1++)
               {
               upsum=(Close[i+up1]-Open[i+up1])/(High[i+up1]-Low[i+up1])+upsum;
               }
               ExtMapBuffer2[i]=logic(upsum);
      }
      //----
      if( (iWPR(NULL,0,WPRSIperiod,i)>-20)&&(iWPR(NULL,0,WPRSIperiod,i+1)<-20)&&(iRSI(NULL,0,WPRSIperiod,PRICE_MEDIAN,i)>50)           )
         {
         double z=0;
         for(int k=2;k<=filterUP+2;k++)
         {
         
         if(iWPR(NULL,0,WPRSIperiod,k+i)>-20){z=1;  }
         
         }
         
               if(z==0)
               {
               upsum=0;
               for(up1=0;up1<=Waytoway;up1++)
               {
               upsum=(Close[i+up1]-Open[i+up1])/(High[i+up1]-Low[i+up1])+upsum;
               }
               ExtMapBuffer4[i]=logic(upsum);
                  if(i==1&&(alert!=Time[1]))
                  {
                  if(UseSound){PlaySound(SoundFile);Alert("Start Long");}
                  }
                  alert=Time[1];
               }
               }
      //----
      if((iWPR(NULL,0,WPRSIperiod,i)<-50)&&(iRSI(NULL,0,WPRSIperiod,PRICE_MEDIAN,i)<50))
      {
               upsum=0;
               for(up1=0;up1<=Waytoway;up1++)
               {
               upsum=(Close[i+up1]-Open[i+up1])/(High[i+up1]-Low[i+up1])+upsum;
               }
               ExtMapBuffer3[i]=logic(upsum);
      }
      //----
      if( (iWPR(NULL,0,WPRSIperiod,i+1)>-80)&&(iWPR(NULL,0,WPRSIperiod,i)<-80)&&(iRSI(NULL,0,WPRSIperiod,PRICE_MEDIAN,i)<50)           )
         {
         double h=0;
         for(int c=2;c<=filterDN+2;c++)
         {
         
         if(iWPR(NULL,0,WPRSIperiod,c+i)<-80){h=1;  }
         
         }
         
               if(h==0)
               {
               upsum=0;
               for(up1=0;up1<=Waytoway;up1++)
               {
               upsum=(Close[i+up1]-Open[i+up1])/(High[i+up1]-Low[i+up1])+upsum;
               }
               ExtMapBuffer5[i]=logic(upsum);
                  if(i==1&&(alert!=Time[1]))
                  {
                  if(UseSound){PlaySound(SoundFile);Alert("Start Short");}
                  } 
                  alert=Time[1];
                  }
               }         
     }
//----
   return(0);
  }
double logic(double cinyan)//
{
return((MathExp(cinyan)-MathExp(-cinyan))/(MathExp(cinyan)+MathExp(-cinyan)));
}
//+------------------------------------------------------------------+

[gumgum]

Комрады . Отпишите пожалуйста насчет работы данных индикаторов(SoundAlarm, как работает).

[[Удален]]

gumgum:

Комрады . Отпишите пожалуйста насчет работы данных индикаторов(SoundAlarm, как работает).

отписалась в личку - всё гуд!

только звук издаёт два раза, но так даже лучше

[Roma]

а использование - секрет?

[dihard]

Не отображает полоску в подвале на текущем баре, как с этим бороться?