//+------------------------------------------------------------------+
//| Silver MACD.mq4 |
//| Copyright © 2004, Viac |
//| http://www.viac.ru/ |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2004, Viac.ru"
#property link "http://www.viac.ru/"
//---- indicator settings
#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 ForestGreen
#property indicator_color2 Red
//---- indicator parameters
extern int FastEMA=9;
extern int SlowEMA=26;
extern int SignalSMA=9;
extern int Price=PRICE_WEIGHTED;
extern int Mode=MODE_EMA;
//---- indicator buffers
double green_buffer[];
double red_buffer[];
double MACD[];
double Signal[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- drawing settings
IndicatorBuffers(4);
SetIndexStyle(0,DRAW_HISTOGRAM,STYLE_SOLID,2);
SetIndexBuffer(0,green_buffer);
//----
SetIndexStyle(1,DRAW_HISTOGRAM,STYLE_SOLID,2);
SetIndexBuffer(1,red_buffer);
SetIndexBuffer(2,MACD);
SetIndexBuffer(3,Signal);
//---- sets drawing line empty value
SetIndexEmptyValue(0, 0.0);
SetIndexEmptyValue(1, 0.0);
SetIndexEmptyValue(2, 0.0);
SetIndexEmptyValue(3, 0.0);
//----
IndicatorDigits(Digits+1);
//---- name for DataWindow and indicator subwindow label
IndicatorShortName("SilverMACD("+FastEMA+","+SlowEMA+","+SignalSMA+")");
SetIndexLabel(0,"GreenMACD");
SetIndexLabel(1,"RedMACD");
//---- initialization done
return(0);
}
//+------------------------------------------------------------------+
//| Moving Averages Convergence/Divergence |
//+------------------------------------------------------------------+
int start()
{
int limit;
int counted_bars=IndicatorCounted();
int i;
//---- check for possible errors
if(counted_bars<0) return(-1);
//
if(counted_bars>0) counted_bars--;
limit=Bars-counted_bars;
Print("limit=",limit);
if (counted_bars==0) limit=Bars-SlowEMA;
//---- Âû÷èñëÿåì ìàññèâ MACD
for(i=0; i<limit; i++)
MACD[i]=iMA(NULL,0,FastEMA,0,Mode,Price,i)-iMA(NULL,0,SlowEMA,0,Mode,Price,i);
//---- Âû÷èñëÿåì ñèãíàëüíóþ ëèíèþ äëÿ MACD
for(i=0; i<limit; i++)
Signal[i]=iMAOnArray(MACD,0,SignalSMA,0,MODE_SMA,i);
//---- Åñëè MACD áîëüøå èëè ðàâíî ñèãíàëüíîé, òî çåëåíûé èíà÷å êðàñíûé
for (i=0; i<limit; i++)
{
if (MACD[i] >= Signal[i])
{
green_buffer[i] = MACD[i];
red_buffer[i] = 0.0;
}
else
{
green_buffer[i] = 0.0;
red_buffer[i] = MACD[i];
}
}
return(0);
}
Sample
Analysis
Market Information Used:
Indicator Curves created:
Implements a curve of type DRAW_HISTOGRAM
Indicators Used:
Moving average indicator
Custom Indicators Used:
Order Management characteristics:
Other Features: