Notes

// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © aktifgirisimcilik

//@version=4
study(title="Multi EMA Cross", overlay=true)
ema1 = ema(close, input(5, minval=5, title="EMA 1"))
ema2 = ema(close, input(22, minval=22, title="EMA 2"))
ema3 = ema(close, input(50, minval=50, title="EMA 3"))
ema4 = ema(close, input(100, minval=100, title="EMA 4"))
ema5 = ema(close, input(200, minval=200, title="EMA 5"))

plot(ema1, color=color.yellow, linewidth=2, title="EMA1")
plot(ema2, color=color.orange, linewidth=2, title="EMA2")
plot(ema3, color=color.red, linewidth=2, title="EMA3")
plot(ema4, color=color.blue, linewidth=3, title="EMA4")
plot(ema5, color=color.black, linewidth=4, title="EMA5")

///ema1-2kesişimi
golden2_cross() =>
ema1 > ema2
death2_cross() =>
ema1 < ema2

Golden2() =>
golden2_cross() and death2_cross()[1]
Death2() =>
death2_cross() and golden2_cross()[1]
Death2_1 = Death2()

plotshape(Golden2(), color=color.green, style=shape.triangleup, size=size.normal, text="EMA 1>2", location=location.top)
plotshape(Death2(), color=color.red, style=shape.triangledown, size=size.normal,text="EMA 1<2", location=location.top)

///Golden Cross
golden1_cross() =>
ema3 > ema5
death1_cross() =>
ema3 < ema5

Golden1() =>
golden1_cross() and death1_cross()[1]
Death1() =>
death1_cross() and golden1_cross()[1]
Death1_1 = Death1()
bgcolor(Golden1() ? #FFD700 : Death1_1 ? #D3D3D3 : na, transp=0, title="Golden Background Color")

plotshape(Golden1(), color=color.green, style=shape.triangleup, size=size.normal, text="GOLDEN", location=location.top)
plotshape(Death1(), color=color.red, style=shape.triangledown, size=size.normal,text="DEATH", location=location.top)



// Ichimoku
showIchi = input(false, title="=== Show Ichimoku Cloud? ===")
conversionPeriods = input(9, minval=1, title="Conversion Line Periods"),
basePeriods = input(26, minval=1, title="Base Line Periods")
laggingSpan2Periods = input(52, minval=1, title="Lagging Span 2 Periods"),
displacement = input(26, minval=1, title="Displacement")

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

conversionLine = donchian(conversionPeriods)
baseLine = donchian(basePeriods)
leadLine1 = avg(conversionLine, baseLine)
leadLine2 = donchian(laggingSpan2Periods)

plot(showIchi?conversionLine:na, color=#0496ff, title="Conversion Line", linewidth=3)
plot(showIchi?baseLine:na, color=#991515, title="Base Line", linewidth=3)
plot(showIchi?close:na, offset = -displacement + 1, color=#459915, title="Lagging Span")

p1ichi = plot(showIchi?leadLine1:na, offset = displacement - 1, color=color.green,
title="Lead 1")
p2ichi = plot(showIchi?leadLine2:na, offset = displacement - 1, color=color.red,
title="Lead 2")
fill(p1ichi, p2ichi, color = leadLine1 > leadLine2 ? color.green : color.red, title="Ichimoku Cloud")

// SAR
showSAR = input(false, title="=== Show SAR? ===")
start = input(0.02)
increment = input(0.02)
maximum = input(0.2)
out = sar(start, increment, maximum)
plot(showSAR?out:na,title="SAR", style=plot.style_cross, color=color.purple, linewidth=2)