WaveTrend [LazyBear]

//
// @author LazyBear
//
// List of my public indicators: http://bit.ly/1LQaPK8
// List of my app-store indicators: http://blog.tradingview.com/?p=970
//
// Added title attributes to all plot()
//
study(title="WaveTrend [LazyBear]", shorttitle="WT_LB")
n1 = input(10, "Channel Length")
n2 = input(21, "Average Length")
obLevel1 = input(60, "Over Bought Level 1")
obLevel2 = input(53, "Over Bought Level 2")
osLevel1 = input(-60, "Over Sold Level 1")
osLevel2 = input(-53, "Over Sold Level 2")

ap = hlc3
esa = ema(ap, n1)
d = ema(abs(ap - esa), n1)
ci = (ap - esa) / (0.015 * d)
tci = ema(ci, n2)

wt1 = tci
wt2 = sma(wt1,4)

plot(0, color=gray, title="ZeroLine")
plot(obLevel1, color=red, title="OBLEVEL 1")
plot(osLevel1, color=green, title="OSLEVEL 1")
plot(obLevel2, color=red, style=3, title="OBLEVEL 2")
plot(osLevel2, color=green, style=3, title="OSLEVEL 2")

plot(wt1, color=green, title="WT")
plot(wt2, color=red, style=3, title="Signal")
plot(wt1-wt2, color=blue, style=area, transp=80, title="Histogram")