Oscars Simple Trend Ichimoku Kijun-sen

study(title="Oscars Simple Trend Ichimoku Kijun-sen", shorttitle="OTrend Kijun", overlay=true)

Length = input(34, minval=1)
Trigger = input(5, minval=1),



donchian(len) => avg(lowest(len), highest(len))

conversionLine = donchian(Trigger)
baseLine = donchian(Length)
leadLine1 = avg(conversionLine, baseLine)

kjuncol = conversionLine > baseLine ? blue : conversionLine < baseLine ? red : orange


plot(baseLine, color=kjuncol,linewidth=2,transp=5, title="Base Line")

almatrend = alma(baseLine, 34, 0.85, 6)

plot(almatrend,transp=85)