_SECTION_BEGIN("ZUMA TREND SYSTEM");
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() );
Per = Param("Periods",18,15,90,3);
Buffer = ParamList("Buffer","20|40|60|80|100|120",1);
Buf = StrToNum(Buffer);
m = MA(O, Per);
mL = round( (m-(Buf/2))/(Buf/10) ) * (Buf/10);
mH = round( (m+(Buf/2))/(Buf/10) ) * (Buf/10);
step = (mH-mL)/10;
Buy = Cross(C,mH); Sell = Cross(mL,C);
Buy = ExRem(Buy,Sell); Sell = ExRem(Sell,Buy);
PlotShapes(Buy+2*Sell,colorWhite,0,IIf(Buy,L,H));
Plot(mH, "Hi", colorBlue);
Plot(mL, "Lo", colorRed);
Plot(m, "MA", IIf(C > m,colorBlue,colorRed),styleNoLabel|4);
for(i = 0; i < 10; i++)
{
L1 = mL+i*step;
H1 = mL+(i+1)*step;
PlotOHLC(L1,H1,L1,H1, "", ColorBlend(ColorRGB(127,0,0),ColorRGB(0,0,127),0.1*i), styleCloud|styleNoLabel|styleNoTitle);
}
_SECTION_END();