COMPOSITE INDEX CLOUD STYLE for Amibroker (AFL)

/*

Reference to:

BreakThroughs in Technical Analysis
Keller, Bloomberg

Composite Index, 

*/

A=RSI() - Ref(RSI(),-9)+ MA(RSI(3),3);
Plot(A,"Composite Index",colorYellow,styleThick);
Plot(MA(A,13),"MA13",colorBlack,styleHistogram);
Plot(MA(A,13),"MA13",colorBlue,styleArea);


Plot(MA(A,33),"MA33",colorBlack,styleHistogram);
Plot(MA(A,33),"MA33",colorRed,styleArea);

Plot(100,"",colorRed,styleDots,styleArea);
Plot(0,"",colorGreen,styleDots,styleArea);
Overbought=100;
Oversold=0;
Plot(100,"",colorDarkTeal,styleArea);
Plot(120,"",colorBlack,styleHistogram);
Plot(120,"",colorRed,styleArea);
Plot(-20,"",colorBlack,styleHistogram);
Plot(-20,"",colorGreen,styleArea);
Overbought=100;
Oversold=-0; 

Buy = Cross(A, Oversold) AND A > Oversold;
Sell = Cross(Overbought, A) AND A < Overbought;

PlotShapes(IIf(Sell, shapeDownArrow , shapeNone), colorWhite);
PlotShapes(IIf(Buy, shapeUpArrow , shapeNone), colorWhite);

/* Trend Filters */
TimeFrameSet(in15Minute);
SwingTrd151 = 100 * (Close - ((MA(C,2)+
MA(MA(C,2),2)+
MA(MA(MA(C,2),2),2) +
MA(MA(MA(MA(C,2),2),2),2) +
MA(MA(MA(MA(MA(C,2),2),2),2),2) +
MA(MA(MA(MA(MA(MA(C,2),2),2),2),2),2) +
MA(MA(MA(MA(MA(MA(MA(C,2),2),2),2),2),2),2)+
MA(MA(MA(MA(MA(MA(MA(MA(C,2),2),2),2),2),2),2),2)+
MA(MA(MA(MA(MA(MA(MA(MA(MA(C,2),2),2),2),2),2),2), 2),2)+
MA(MA(MA(MA(MA(MA(MA(MA(MA(MA(C,2),2),2),2),2),2), 2),2),2),2))
/10))/(HHV(C,10)-LLV(C,10));
SwingTrd152=EMA(SwingTrd151,13);
SwingTrd153=EMA(SwingTrd152,13);
RMO15= EMA(SwingTrd151,34);
Bull_Trend15=EMA(SwingTrd151,34)>0;
Bear_Trend15=EMA(SwingTrd151,34)<0;
TimeFrameRestore();
Ribbon_kol15=IIf(TimeFrameExpand(Bull_Trend15,in15Minute),colorBlue, IIf(TimeFrameExpand(Bear_Trend15,in15Minute),colorRed, colorWhite));
Plot(8, "ribbon", Ribbon_kol15, styleOwnScale|styleArea|styleNoLabel, -0.5,100);
// End of Trend Filter

_SECTION_BEGIN("color1");
SetChartBkGradientFill( ParamColor("BgTop", ColorRGB( 172,172,172 )),

ParamColor("BgBottom", ColorRGB( 172,172,172 )),ParamColor("titleblock",ColorRGB( 172,172,172 )));

 _SECTION_END();