Try this . . .
Code:
e = EMA(C,13);
ee = EMA(EMA(C,13),9);
color = IIf(e > ee, colorBlue, colorRed);
p = Peak(C,2,2);
t = Trough(C,2,2);
Buy = e > ee AND C > p;
Sell = ee > e AND C < t;
Buy = ExRem(Buy, Sell);
Sell = ExRem(Sell, Buy);
Plot(e, "", color, styleDashed);
Plot(ee, "", color);
Plot(p, "", colorBlueGrey, styleDashed | styleStaircase);
Plot(t, "", colorLime, styleDashed | styleStaircase);
PlotShapes(shapeUpArrow * Buy, color, 0, L);
PlotShapes(shapeDownArrow * Sell, color, 0, H);
Referring to Post 3 of this thread, Where, Khushiji has posted a selected list of 54 stocks out of 1542 stocks. 2 of these stocks are in the highlights today.