Triple-Triple EMA

study(title="Triple-Triple EMA", shorttitle="TEMA 3x", overlay=true)
length1 = input(3, minval=1,title="Length 1")
length2 = input(9, minval=1,title="Length 2")
length3 = input(19, minval=1,title="Length 3")

source1 = input(low,title="Source 1")
source2 = input(low,title="Source 2")
source3 = input(low,title="Source 3")

ema1A = ema(source1, length1)
ema1B = ema(ema1A, length1)
ema1C = ema(ema1B, length1)

ema2A = ema(source2, length2)
ema2B = ema(ema2A, length2)
ema2C = ema(ema2B, length2)

ema3A = ema(source3, length3)
ema3B = ema(ema3A, length3)
ema3C = ema(ema3B, length3)

tema1 = 3 * (ema1A - ema1B) + ema1C
tema2 = 3 * (ema2A - ema2B) + ema2C
tema3 = 3 * (ema3A - ema3B) + ema3C

plot(tema1, color=lime, transp=0,title="TEMA 1")
plot(tema2, color=#33FFFC, transp=0,title="TEMA 2")
plot(tema3, color=orange, transp=0,title="TEMA 3")