......//+------------------------------------------------------------------+
//| F-X-M_MACD.mq4 |
//| Copyright © 2007, Fore-x-man |
//| Fore-x-man@ukr.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2007, Fore-x-man"
#property link "Fore-x-man@ukr.net"
//---- indicator settings
#property copyright "Copyright © 2007, Fore-x-man"
#property link "Fore-x-man@ukr.net"
//---- indicator settings
#property indicator_separate_window
#property indicator_buffers 3
#property indicator_color1 Silver
#property indicator_color2 Green
#property indicator_color3 Red
#property indicator_width1 2
#property indicator_width2 2
#property indicator_width3 2
//---- indicator parameters
extern int FastEMA=12;
extern int SlowEMA=26;
int SignalSMA=1;
//---- indicator buffers
double MacdBuffer[];
double SignalBuffer[];
double DiverBuffer[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicator buffers mapping
SetIndexStyle(0,DRAW_HISTOGRAM);
SetIndexBuffer(0,MacdBuffer);
SetIndexStyle(1,DRAW_HISTOGRAM);
SetIndexBuffer(1,SignalBuffer);
SetIndexStyle(2,DRAW_HISTOGRAM);
SetIndexBuffer(2,DiverBuffer);
//SetIndexDrawBegin(2,DiverBuffer);
//---- name for DataWindow and indicator subwindow label
IndicatorShortName("Fore-x-man MACD("+FastEMA+","+SlowEMA+")");
//---- initialization done
return(0);
}
//+------------------------------------------------------------------+
//| Moving Averages Convergence/Divergence |
//+------------------------------------------------------------------+
int start()
{
int limit;
int counted_bars=IndicatorCounted();
//---- last counted bar will be recounted
if(counted_bars>0) counted_bars--;
limit=Bars-counted_bars;
//---- macd counted in the 1-st buffer
for(int i=0; i<limit; i++)
MacdBuffer=iMA(NULL,0,FastEMA,0,MODE_EMA,PRICE_CLOSE,i)-iMA(NULL,0,SlowEMA,0,MODE_EMA,PRICE_CLOSE,i);
//---- signal line counted in the 2-nd buffer
for(i=0; i<limit; i++){
if (MacdBuffer > 0) {
if (MacdBuffer > MacdBuffer && MacdBuffer > MacdBuffer && i != 0 ){
SignalBuffer=MacdBuffer;
}
else SignalBuffer=0;
}
if (MacdBuffer < 0) {
if (MacdBuffer < MacdBuffer && MacdBuffer < MacdBuffer && i != 0){
SignalBuffer=MacdBuffer;
}
else SignalBuffer=0;
}
if (MacdBuffer == 0) SignalBuffer = 0;
}
//---- counted in the 2-d buffer
for(i=0; i<limit; i++){
int j;
double p1,p2,m1,m2;
if (SignalBuffer != 0){
p1 = Close;
m1 = SignalBuffer;
for (j = i+1; j < limit; j++) {
if (SignalBuffer != 0) {
p2 = Close;
m2 = SignalBuffer;
break;
}
}
if ((m1 > m2 && p1 < p2) || (m1 < m2 && p1 > p2)) DiverBuffer = MacdBuffer;
else DiverBuffer = 0;
}
else DiverBuffer = 0;
}
//Comment("Error number = ", GetLastError());
//---- done
return(0);
}
//+------------------------------------------------------------------+........
