JOS (John Oligarh Stochastic)

////////////////////////////////////////////////////////////
//  Copyright by JO v1.0 24/04/2014
// John Oligarh Stochastics (JOS). 
////////////////////////////////////////////////////////////
study(title="JO (John Oligarh Stochastic)", shorttitle="JO")
PDS = input(10, minval=1)
EMAlen = input(9, minval=1)
TriggerLen = input(5, minval=1)
Overbought = input(80, minval=1)
Oversold = input(20, minval=1)
hline(Overbought, color=green, linestyle=line)
hline(Oversold, color=red, linestyle=line)
xPreCalc = ema(stoch(close, high, low, PDS), EMAlen)
xDSS = ema(stoch(xPreCalc, xPreCalc, xPreCalc, PDS), EMAlen)
//xDSS = stoch(xPreCalc, xPreCalc, xPreCalc, PDS)
xTrigger = ema(xDSS, TriggerLen)
plot(xDSS, color=blue, title="DSS")
plot(xTrigger, color=red, title="Trigger")