// Downloaded From https://www.WiseStockTrader.com
Hellow,

Volume is added for MACD Colored indicator. It gives further clarity on trend.

1) Buy with Good volume above zero is strong buy.
2) Sell with Good volume below zero is strong sell.

Other buy sell signals are simple buy sell signals.

//===========Start of AFL ==================

_SECTION_BEGIN("MACD"); 
r1 = Param( "Fast avg", 12, 2, 200, 1 ); 
r2 = Param( "Slow avg", 26, 2, 200, 1 ); 
r3 = Param( "Signal avg", 9, 2, 200, 1 ); 

MACDstyle = ParamStyle("MACD style"); 
Signalstyle = ParamStyle("Signal style"); 
Histstyle = ParamStyle("Histogram style", styleHistogram | styleThick | styleNoLabel, maskHistogram ); 

MACDcolor = ParamColor( "Macd One Color", colorRed ); 
Signalcolor = ParamColor( "Signal Color", colorBlue ); 
Histcolor = ParamColor( "Histogram One Color", colorRed ); 

TitleText = StrFormat("MACD " + "(%g,%g)", r1, r2); 
PlotGrid( 0 ); 
_SECTION_END(); _SECTION_END (); 

_SECTION_BEGIN("MACD Color"); 
dyncolorswitch = ParamToggle("Macd Color","On,Off"); 
dynamic_color = IIf( MACD(r1, r2) > Ref(MACD(r1, r2),-1), ParamColor("Macd Up Color", colorGreen ), ParamColor("Macd Down Color", colorRed )); 
Plot( ml = MACD(r1, r2), TitleText, IIf(dyncolorswitch, MACDcolor , dynamic_color), MACDstyle ); 
Plot( sl = Signal(r1,r2,r3), "Signal" + _PARAM_VALUES(), Signalcolor, Signalstyle ); 
_SECTION_END(); _SECTION_END (); 

_SECTION_BEGIN("Histogram Color"); 
Histogramswitch = ParamToggle("Histogram Color","On,Off"); 
Histogram_color = IIf( ml-sl > Ref(ml-sl,-1), ParamColor("Hist Up Color", ColorRGB(0,0,100) ), ParamColor("Hist Down Color", colorDarkRed )); 
//Plot( ml-sl, "MACD Histogram", IIf(Histogramswitch, Histcolor , Histogram_color), styleNoTitle | Histstyle ); 
_SECTION_END(); _SECTION_END (); 

_SECTION_BEGIN("Buy Sell Arrows"); 
shapesSignalswitch = ParamToggle("Cross Signal Arrows","On,Off"); 
UPcolor = ParamColor( "UP Color", colorGreen ); 
DOWNcolor = ParamColor( "Down Color", colorRed ); 
Buy=Cross( MACD(), Signal() ); 
Sell=Cross( Signal(), MACD() ); 
shape = Buy * shapeUpArrow + Sell * shapeDownArrow; 
PlotShapes( IIf(shapesSignalswitch,-1e10,shape), IIf( Buy, UPcolor, DOWNcolor )); 
_SECTION_END(); 

_SECTION_BEGIN("Fill Color"); 
m = MACD(r1, r2); 
s = Signal(r1,r2,r3); 
Cloudswitch = ParamToggle("Fill Color","On,Off"); 
dynamic_color = IIf( m > s, ParamColor("Down Color", ColorRGB(0,0,100) ), ParamColor("Up Color", colorDarkRed )); 
PlotOHLC( IIf(Cloudswitch,-1e10,m),IIf(Cloudswitch,-1e10,m),IIf(Cloudswitch,-1e10,s),IIf(Cloudswitch,-1e10,m), "", dynamic_color, styleNoLabel | styleCloud ); 
_SECTION_END(); _SECTION_END (); 

Buy=Cross( MACD(), Signal() ); 
Sell=Cross( Signal(), MACD() ); 

//PlotShapes( IIf( Buy , shapeSmallCircle, shapeNone ),            colorWhite, 0, Graph1 , 0  );
//PlotShapes( IIf( Sell , shapeSmallCircle, shapeNone ),            colorRed, 0, Graph1 , 0  );

PlotShapes( IIf( Buy , shapeCircle, shapeNone ),            colorWhite, 0, Graph1 , 0  );
PlotShapes( IIf( Sell , shapeCircle, shapeNone ),            colorRed, 0, Graph1 , 0  );

// Volume Controls starts
_SECTION_BEGIN("VOLUME_Hight of Volume Bars Control");
PlotVOL = ParamToggle( "plot Volume?","No| Yes",1);
VolColor = (C>O OR (C==O AND (H-C)<=(C-L) ))*ParamColor( "VUpColor" ,colorGreen) +
(C<O OR (C==O AND
(H-C)>(C-L)) )*ParamColor( "VDnColor" ,colorRed) ;
VolScale = Param("1/Vol. Height (TimeBar chart)(fraction of
window) 5=1/5=20%",2, 1, 100, 1.0) ; // Timebars
if (PlotVOL >0) 
{
Vheight = VolScale;
Plot(Prec(Volume ,0),"V",VolColor,styleNoTitle| styleOwnScale| styleNoLabel|styleThick| ParamStyle( "VStyle", styleHistogram,maskHistogram| styleNoLabel) ,Vheight ); }
_SECTION_END();

// ========== End of AFL ====================