ichimoku

//@version=4
middleDonchian(Length) =>
lower = lowest(Length)
upper = highest(Length)
avg(upper, lower)

study(title="EMA+Ichimoku", shorttitle="EMA+Ichimoku", overlay = true)
conversionPeriods = input(9, minval=1),
basePeriods = input(26, minval=1)
laggingSpan2Periods = input(52, minval=1),
displacement = input(26, minval=1)
Tenkan = middleDonchian(conversionPeriods)
Kijun = middleDonchian(basePeriods)
xChikou = close
SenkouA = middleDonchian(laggingSpan2Periods)
SenkouB = (Tenkan + Kijun) / 2
plot(Tenkan, color=color.red, title="Tenkan")
plot(Kijun, color=color.blue, title="Kijun")
plot(xChikou, color= color.teal , title="Chikou", offset = -displacement)
A = plot(SenkouA, color=color.purple, title="SenkouA")
B = plot(SenkouB, color=color.green, title="SenkouB")
fill(A, B, color=color.purple)

len1 = input(21, minval=1, title="EMA 1")
len2 = input(55, minval=1, title="EMA 2")
len3 = input(100, minval=1, title="EMA 3")

src1 = input(close, title="EMA 1 Source")
src2 = input(close, title="EMA 2 Source")
src3 = input(close, title="EMA 3 Source")

ema1 = ema(src1, len1)
ema2 = ema(src2, len2)
ema3 = ema(src3, len3)

plot(ema1, color=color.blue, linewidth=2, title="EMA 1")
plot(ema2, color=color.lime, linewidth=2, title="EMA 2")
plot(ema3, color=color.red, linewidth=2, title="EMA 3")