AlertyEmail

//+------------------------------------------------------------------+
//|     Àëåêñàíäð Ñòðó÷êîâ vk.com/alexandr_struchkov straaml@mail.ru |
//|                        vk.com/alexandr_struchkov straaml@mail.ru |
//+------------------------------------------------------------------+
#property copyright "Àëåêñàíäð Ñòðó÷êîâ vk.com/alexandr_struchkov straaml@mail.ru"
#property link      " vk.com/alexandr_struchkov straaml@mail.ru"
#property version   "1.00"
#property strict
extern string sym="EURUSD,EURJPY,GBPUSD,NZDUSD,USDJPU,Ger30Sep14,Fra40Sep14,Ita40Sep14,UK100Sep14,HKIndSep14,Jp225Sep14";//Ñïèñîê ñèìâîëîâ, ñ êîòîðûìè ðàáîòàåì. Ðàçäåëèòåëü ","(ÇÀÏßÒÀß)
extern bool sendmail=false;  // Îòïðàâëÿòü ëè ñîîáùåíèå íà ïî÷òó?
extern int per1=100;         //Ïåðèîä áûñòðîãî ìóâèíãà
extern int per2=200;         //Ïåðèîä ìåäëåííîãî ìóâèíãà
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
enum tmfrm       // Ðåàëèçàöèÿ âûáîðà òàéìôðåéìà èç ñïèñêà
  {
   tmfrm1=1,     // Ì1
   tmfrm2=5,     // Ì5
   tmfrm3=15,    // Ì15
   tmfrm4=30,    // Ì30
   tmfrm5=60,    // H1
   tmfrm6=240,   // H4
   tmfrm7=1440,  // D1
   tmfrm8=10080, // W1
   tmfrm9=43200, // MN
  };
extern tmfrm timeframe=15;//Òàéìôðåéì

double ma1;
double ma2;
double ma11;
double ma22;
//+------------------------------------------------------------------+
//|Ôóíêöèÿ îïðåäåëåíèÿ òî÷êè èçìåíåíèÿ òðåíäà ñ èñïîëüçîâàíèåì ÌÀ    |
//+------------------------------------------------------------------+
string ma(string symb)
  {
   ma1=iMA(symb,timeframe,per1,0,MODE_EMA,PRICE_CLOSE,1);
   ma2=iMA(symb,timeframe,per2,0,MODE_EMA,PRICE_CLOSE,1);
   ma11=iMA(symb,timeframe,per1,0,MODE_EMA,PRICE_CLOSE,2);
   ma22=iMA(symb,timeframe,per2,0,MODE_EMA,PRICE_CLOSE,2);
   if(ma11>ma22&&ma1<=ma2) return ("Short");else if(ma11<ma22&&ma1>=ma2) return ("Long"); else return("0");
  }
//+------------------------------------------------------------------+
//|Ôóíêöèÿ Alert + îòïðàâêà ñîîáùåíèÿ íà ýëåêòðîííóþ ïî÷òó           |
//+------------------------------------------------------------------+
int alert(string symbol,string pos,bool mail)
  {
   if(pos=="Short")
      Alert("Short","  ",symbol,"  ",Hour(),":",Minute());
   if(mail==true) SendMail("Short","Short"+"  "+symbol+"  "+IntegerToString(Hour(),10,' ')+":"+IntegerToString(Minute(),10,' '));

   if(pos=="Long")
      Alert("Long","  ",symbol,"  ",Hour(),":",Minute());
   if(mail==true) SendMail("Long","Long"+"  "+symbol+"  "+IntegerToString(Hour(),10,' ')+":"+IntegerToString(Minute(),10,' '));
   return(0);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int b;
int c;
string sym_arr[1000];
string time[1000];
string bar_control;
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void OnTick()
  {
   if(bar_control!=(string)iTime("EURUSD",timeframe,1)) // Ïðîâåðÿåì, ïîÿâèëñÿ ëè íîâûé áàð, ÷òîáû íå âûïîëíÿòü âû÷èñëåíèÿ êàæäûé òèê
     {
      bar_control=(string)iTime("EURUSD",timeframe,1); // Ïðèñâàèâàåì íîâîå çíà÷åíèå ïåðåìåííîé äëÿ êîíòðîëÿ ïîÿâëåíèÿ íîâîãî áàðà
      b=StringSplit(sym,StringGetCharacter(",",0),sym_arr); // "Äåëèì" ñòðîêó ñ ñèìâîëàìè íà îòäåëüíûå ÷àñòè è ñîõðàíÿåì äàííûå â ìàññèâ
      if(b>0) // Ïðîäîëæàåì ðàáîòó, åñëè âî âõîäíûõ ïàðàìåòðàõ óêàçàíà õîòÿ áû îäíà âàëþòíàÿ ïàðà
        {
         for(int i=0;i<b;i++)                                                        //   Ïðîâåðÿåì âñå óêàçàííûå âàëþòíûå ïàðû íà                         
           {                                                                         //   ïðåäìåò ñìåíû òðåíäà. À òàêæå êîíòðîëèðóåì,
            if(time[i]!=(string)iTime(sym_arr[i],timeframe,1) && ma(sym_arr[i])!="0")//   áûëà ëè óæå ïðîâåðêà íà ýòîì áàðå.
              {
               alert(sym_arr[i],ma(sym_arr[i]),sendmail);time[i]=(string)iTime(sym_arr[i],timeframe,1); // Âûïîëíÿåì ôóíêöèþ Alert è îòïðàâêó ñîîáùåíèÿ íà ýë. ïî÷òó â ñëó÷àå ñìåíû òðåíäà.
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+