TEMA1

////////////////////////////////////////////////////////////
//  Copyright by HPotter v1.0 16/05/2014
// This study plots the TEMA1 indicator. TEMA1 ia s triple MA (Moving Average),
// and is calculated as 3*MA - (3*MA(MA)) + (MA(MA(MA)))
////////////////////////////////////////////////////////////
study(title="TEMA1", shorttitle="TEMA", overlay = true )
Length = input(26, minval=1)
xPrice = close
xEMA1 = ema(xPrice, Length)
xEMA2 = ema(xEMA1, Length)
xEMA3 = ema(xEMA2, Length)
nRes = 3 * xEMA1 - 3 * xEMA2 + xEMA3
plot(nRes, color=blue, title="TEMA1")