study("2EMA-Trend", overlay=true)
emaPlot1 = ema(close, input(8, title="Fast Ema Period"))
emaPlot2 = ema(close, input(21, title="Slow Ema Period"))
ema1 = ema(open, 21)
ema2 = ema(close, 21)
sma1 = sma(high, 2)
sma2 = sma(low, 2)
isEmaUp = ema2 > ema1
isSmaUp = ((sma1 > ema1) or (sma1 > ema2)) and ((sma2 > ema1) or (sma2 > ema2))
isSmaDn = ((sma1 < ema1) or (sma1 < ema2)) and ((sma2 < ema1) or (sma2 < ema2))
//plot(ema1, color=isEmaUp?green:maroon)
//plot(ema2, color=isEmaUp?green:maroon)
//plot(sma1, color=isSmaUp?lime: isSmaDn?red:na)
//plot(sma2, color=isSmaUp?lime: isSmaDn?red:na)
p1 = plot(emaPlot1, title="Fast Ema", color=olive)
p2 = plot(emaPlot2, title="Slow Ema", color=isSmaUp?lime: isSmaDn?red:gray)
fill(p1, p2, color=gray, transp=80)