// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("Wolfstein Trending");
range = Param("Periods", 14, 2, 200, 1 );
Plot( ADX(range), _DEFAULT_NAME(), ParamColor( "ADX color", colorBlue ), ParamStyle("ADX style", styleNoDraw ) );
r = ADX(range);

GraphXSpace=15;

TimeFrameSet( inDaily ); 
trending2 = r>27.5;
trending1 = r>20.5 AND r<27.5;
sideway  = r<20.5;

ADXmDaily = ADX(13);
ROCADXmDaily = ROC(ADX(13),1);
TimeFrameRestore();

Title = EncodeColor(colorBrightGreen) + "Wolfstein Trending : "+ EncodeColor(colorBrightGreen) +  Name() + " " 

+ EncodeColor(colorYellow) + "\nTrending Now: " + EncodeColor(colorYellow) +WriteIf(trending1  ,"Weak Trending" ," ") + EncodeColor(colorRed)
   +WriteIf(sideway ,"No Trend" ," " )  + EncodeColor(colorGreen)
   +WriteIf(trending2 ,"Strong Trending" ," " ) 
;

Buy1 = r>20.5 AND r<27.5;
Buy2 = r>27.5;
Sell = r<20.5;

PlotShapes(IIf(Buy1,shapeHollowStar,shapeNone),colorYellow,0,20,0);
PlotShapes(IIf(Buy2,shapeHollowStar,shapeNone),colorGreen,0,20,0);
PlotShapes(IIf(Sell,shapeHollowStar,shapeNone),colorRed,0,20,0);

_SECTION_END();