// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); 
_SECTION_END();
//**************\\3 Dimension//********************************************// 
side=1;
increment = Param("EMA<-><+>",2, 1, 10, 1 ); 
for( i = 10; i < 80; i = i + increment ) 
{ 
 up = MA( C, i ); 
 down = MA( C, i + increment ); 
 if( ParamToggle("Color Effect", "Light|Dark", 1 ) ) 
   side =  IIf(up<=down AND Ref( up<=down, 1 ), 1, 0.6 ); 
 PlotOHLC( up,up,down,down, "MA"+i, ColorHSB( 3*(i - 10), 
           Param("Saturation", 128, 0, 255 ),
           side * Param("Brightness", 255, 0, 255 ) ), styleCloud | styleNoLabel ); 
} 
//**************\\3 Dimension//********************************************//

//Use Parameter accordingly.
//Peruse mar ketlogy.com for better unique AFL codes