_Fast2





//+------------------------------------------------------------------+
//|                                                       _Fast2.mq4 |
//|                      Copyright © 2008, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2008, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"

#property indicator_separate_window
#property indicator_buffers 7
#property indicator_color1 LightSeaGreen
#property indicator_color2 Green
#property indicator_color3 Red
#property indicator_color4 White
#property indicator_color5 Red
#property indicator_color6 Blue
extern int    ma1=3;
extern int    ma2=9;
extern bool   sound=true;
extern bool   alert=false;
extern bool   comment=true;

//---- buffers
double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
double ExtMapBuffer4[];
double ExtMapBuffer5[];
double ExtMapBuffer6[];
double Outbuf[];
static int prevtime = 0 ;        // Âðåìÿ ïîñëåäíåãî áàðà
double spr,stop;
string simv;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
   SetIndexStyle(0,DRAW_HISTOGRAM);
   SetIndexBuffer(0,ExtMapBuffer1);
   SetIndexStyle(1,DRAW_LINE,0,2);
   SetIndexBuffer(1,ExtMapBuffer2);
   SetIndexStyle(2,DRAW_LINE,0,2);
   SetIndexBuffer(2,ExtMapBuffer3);
   SetIndexStyle(3,DRAW_NONE);
   SetIndexBuffer(3,Outbuf);
   SetIndexStyle(4,DRAW_ARROW);
   SetIndexArrow(4,236);
   SetIndexBuffer(4,ExtMapBuffer5);
   SetIndexEmptyValue(4,0.0);
   SetIndexStyle(5,DRAW_ARROW);
   SetIndexArrow(5,238);
   SetIndexBuffer(5,ExtMapBuffer6);
   SetIndexEmptyValue(5,0.0);
//----
Outbuf[1]=0;
simv = (Symbol());
  if (simv == "EURUSD") 
     {
     spr = MarketInfo("EURUSD",MODE_SPREAD); 
     stop = MarketInfo("EURUSD",MODE_STOPLEVEL);
     }
  if (simv == "GBPUSD") 
     {
     spr = MarketInfo("GBPUSD",MODE_SPREAD); 
     stop = MarketInfo("GBPUSD",MODE_STOPLEVEL);
     }
  if (simv == "EURJPY") 
     {
     spr = MarketInfo("EURJPY",MODE_SPREAD); 
     stop = MarketInfo("EURJPY",MODE_STOPLEVEL);
     }
  if (simv == "GBPJPY") 
     {
     spr = MarketInfo("GBPJPY",MODE_SPREAD); 
     stop = MarketInfo("GBPJPY",MODE_STOPLEVEL);
     }
  if (simv == "USDJPY") 
     {
     spr = MarketInfo("USDJPY",MODE_SPREAD); 
     stop = MarketInfo("USDJPY",MODE_STOPLEVEL);
     }
  if (simv == "EURCHF") 
     {
     spr = MarketInfo("EURCHF",MODE_SPREAD); 
     stop = MarketInfo("EURCHF",MODE_STOPLEVEL);
     }
  if (simv == "GBPCHF") 
     {
     spr = MarketInfo("GBPCHF",MODE_SPREAD); 
     stop = MarketInfo("GBPCHF",MODE_STOPLEVEL);
     }
  if (simv == "USDCHF") 
     {
     spr = MarketInfo("USDCHF",MODE_SPREAD); 
     stop = MarketInfo("USDCHF",MODE_STOPLEVEL);
     }
  if (simv == "USDCAD") 
     {
     spr = MarketInfo("USDCAD",MODE_SPREAD); 
     stop = MarketInfo("USDCAD",MODE_STOPLEVEL);
     }
  if (simv == "AUDUSD") 
     {
     spr = MarketInfo("AUDUSD",MODE_SPREAD); 
     stop = MarketInfo("AUDUSD",MODE_STOPLEVEL);
     } 
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
Comment("  ");    
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
//----
int    counted_bars=IndicatorCounted();
//----
   if(counted_bars>0)
        counted_bars--;
     
   int limit=Bars-counted_bars;
   for(int i=0;i<Bars;i++)
   {
   ExtMapBuffer1[i]=((Close[i]-Open[i])+((Close[i+1]-Open[i+1])/MathSqrt(2))+((Close[i+2]-Open[i+2])/MathSqrt(3)))/Point;
  // ExtMapBuffer1[i]=((Close[i]-Open[i])+((Close[i+1]-Open[i+1])/MathSqrt(2))+((Close[i+2]-Open[i+2])/MathSqrt(3))+((Close[i+3]-Open[i+3])/MathSqrt(5))+((Close[i+4]-Open[i+4])/MathSqrt(8)))/Point;

   }
   for(i=0;i<Bars;i++)
   {
   ExtMapBuffer2[i]=iMAOnArray(ExtMapBuffer1,Bars,ma1,0,MODE_LWMA,i);
   ExtMapBuffer3[i]=iMAOnArray(ExtMapBuffer1,Bars,ma2,0,MODE_LWMA,i);
   }
// Æäåì, êîãäà ñôîðìèðóåòñÿ íîâûé áàð
   if (Time[0] == prevtime) return(0);
   prevtime = Time[0];
   Outbuf[1]=0;  
//--------------------   
      if (((ExtMapBuffer2[2] > ExtMapBuffer3[2])&&(ExtMapBuffer2[1] < ExtMapBuffer3[1])&&(ExtMapBuffer2[0] < ExtMapBuffer3[0]))
             &&((ExtMapBuffer2[2]>0)&&(ExtMapBuffer3[2]>0))&&((ExtMapBuffer1[1]<=0)&&(ExtMapBuffer1[0]<0)))
             {
             ExtMapBuffer6[1]=(ExtMapBuffer1[1]+ExtMapBuffer2[1]); 
         if (sound==true)PlaySound("alert.wav");             
         if (alert==true) Alert (Symbol());  
         if (comment==true)Comment(Symbol(),TimeToStr(TimeCurrent(),TIME_DATE|TIME_SECONDS),"\n","SELL    SL= ",MathAbs(ExtMapBuffer1[1]-Close[1]));
             Outbuf[1]=1;
             Outbuf[2]=(MathAbs(ExtMapBuffer1[1]-Close[1]));
             if (Outbuf[2]<stop) Outbuf[2] =(MathAbs(ExtMapBuffer1[1]-Close[1]))+ stop;
             } else { ExtMapBuffer6[1]= 0.0; }
      if (((ExtMapBuffer2[2] < ExtMapBuffer3[2])&&(ExtMapBuffer2[1] > ExtMapBuffer3[1])&&(ExtMapBuffer2[0] > ExtMapBuffer3[0]))
             &&((ExtMapBuffer2[2]<0)&&(ExtMapBuffer3[2]<0))&&((ExtMapBuffer1[1]>=0)&&(ExtMapBuffer1[0]>0)))
             {
             ExtMapBuffer5[1]=(ExtMapBuffer1[1]+ExtMapBuffer2[1]);
         if (sound==true)PlaySound("alert.wav");             
         if (alert==true) Alert (Symbol()); 
         if (comment==true)Comment(Symbol(),TimeToStr(TimeCurrent(),TIME_DATE|TIME_SECONDS),"\n","BUY     SL= ",MathAbs(ExtMapBuffer1[1]-Close[1]));
             Outbuf[1]=2;
             Outbuf[2]=(MathAbs(ExtMapBuffer1[1]-Close[1]));
             if (Outbuf[2]<stop) Outbuf[2]=(MathAbs(ExtMapBuffer1[1]-Close[1]))+ stop;
             } else {  ExtMapBuffer5[1]= 0.0;  }    

   if ((ExtMapBuffer2[2] - ExtMapBuffer3[2]) > (ExtMapBuffer2[1] - ExtMapBuffer3[1]))
         {
         if (sound==true)PlaySound("alert2.wav");
         if (comment==true)Comment(TimeToStr(TimeCurrent(),TIME_DATE|TIME_SECONDS),"\n","Close !!!",(Close[1]));
          Outbuf[1]=3;
         }

   
   
   
   
      
//----
   return(0);
  }
//+------------------------------------------------------------------+



Sample





Analysis



Market Information Used:

Series array that contains close prices for each bar
Series array that contains open prices of each bar
Series array that contains open time of each bar


Indicator Curves created:

Implements a curve of type DRAW_HISTOGRAM

Implements a curve of type DRAW_LINE
Implements a curve of type DRAW_NONE
Implements a curve of type DRAW_ARROW

Indicators Used:

Moving average indicator


Custom Indicators Used:

Order Management characteristics:

Other Features:

It plays sound alerts