// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("DTOsc");
PeriodRSI= Param("PeriodRSI", 13, 1, 250, 1);
PeriodStoch=Param("PeriodStoch", 8, 1, 250, 1);
MAType=Param("MAType", 1, 1, 2, 1);
PeriodSK=Param("PeriodSK", 5, 1, 250, 1);
PeriodSD=Param("PeriodSD", 5, 1, 250, 1);
Upper=Param("Upper", 75, 50, 100, 1);
Lower=Param("Lower", 25, 0, 50, 1);
Zero=Param("ZeroLine", 50, 0, 50, 1);

StoRSI= 100*(( RSI( PeriodRSI) - LLV( RSI( PeriodRSI ) , PeriodStoch ) ) / ( (
HHV( RSI( PeriodRSI) , PeriodStoch ) ) - LLV(RSI( PeriodRSI ), PeriodStoch ) ));

if(MAType==1)
	{
		SK=MA(StoRSI,PeriodSK);
		SD=MA(SK,PeriodSD);
	}

if(MAType==2)
	{
		SK=EMA(StoRSI,PeriodSK);
		SD=EMA(SK,PeriodSD);
	}

Plot(SK,"DTOscSK",ParamColor( "ColorSK", colorBlue ),styleLine); 
Plot(SD,"DTOscSD",ParamColor( "ColorSD", 11 ),styleLine);
//Plot(Zero,"ZeroLine",ParamColor( "ColorZero", colorLightGrey ),styleLine);
Plot(Upper,"Upper",ParamColor( "ColorUpper", colorLightGrey ),styleLine);
Plot(Lower,"Lower",ParamColor( "ColorLower", colorLightGrey ),styleLine);
_SECTION_END();