// Downloaded From https://www.WiseStockTrader.com _SECTION_BEGIN("Stochastic"); periods = Param( "Periods", 15, 1, 200, 1 ); Ksmooth = Param( "%K avg", 3, 1, 200, 1 ); Dsmooth = Param( "%D avg", 3, 1, 200, 1 ); myStochD=StochD( periods , Ksmooth, DSmooth ); myStochK=StochK( periods , Ksmooth); Overbought=80; Oversold=20; Buy = Cross(myStochK, myStochD ); Sell = Cross( myStochD, myStochK ); Plot( myStochD, "Stochastic %D"+_PARAM_VALUES(), ParamColor( "ColorD", colorRed ), ParamStyle("StyleD") ); Plot( myStochK, "Stochastic %K", ParamColor( "ColorK", colorGreen ), ParamStyle("StyleK") ); PlotShapes(IIf(Sell, shapeHollowDownArrow , shapeNone), colorRed); PlotShapes(IIf(Buy, shapeHollowUpArrow , shapeNone), colorBlue); Plot(Overbought,"Overbought Level",colorRed); Plot(Oversold,"Oversold Level",colorGreen); PlotOHLC( myStochK,myStochK,50,myStochK, "", colorRed, styleCloud | styleClipMinMax, 20, 80 ); PlotOHLC( myStochD,myStochD,50,myStochD, "", colorYellow, styleCloud | styleClipMinMax, 20, 80 ); PlotOHLC( Null,myStochD,myStochK,Null, "", colorBlue, styleCloud); _SECTION_END();