// İndikatör Trend takip , Ortalamalar , Fibonacci Ortalamaları, Bollinger Band, Parabolik Sar ile Kıvanç Özbilgiç'in trend takip indikatörlerinin toplamıdır.

//@version=5

indicator(title='saral', shorttitle='saral', overlay=true)

 

showEMA = input.bool(true, title='Endeks Takip Sistemi', group='saral')

Fsma = input.bool(false, title= 'Fibonik SMA ' , group='saral')

BB = input.bool(false, title='Bollinger Bandı 15/2', group='Bollinger Ayarlar')

MovingAvarage=input(title = "HAREKETLİ ORTALAMALAR", defval = false, group = 'HAREKETLİ ORTALAMALAR')

ma(source, length, type) =>

    type == "SMA" ? ta.sma(source, length) :

     type == "EMA" ? ta.ema(source, length) :

     type == "SMMA (RMA)" ? ta.rma(source, length) :

     type == "WMA" ? ta.wma(source, length) :

     type == "VWMA" ? ta.vwma(source, length) :

     na

 

show_ma1   = input(false   , "MA №1", inline="MA #1")

ma1_type   = input.string("SMA"  , ""     , inline="MA #1", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"])

ma1_source = input(close  , ""     , inline="MA #1")

ma1_length = input.int(20     , ""     , inline="MA #1", minval=1)

ma1_color  = input(#f6c309, ""     , inline="MA #1")

ma1 = ma(ma1_source, ma1_length, ma1_type)

plot(MovingAvarage and show_ma1 ? ma1 : na, color = ma1_color, title="MA №1")

 

show_ma2   = input(false   , "MA №2", inline="MA #2")

ma2_type   = input.string("SMA"  , ""     , inline="MA #2", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"])

ma2_source = input(close  , ""     , inline="MA #2")

ma2_length = input.int(50     , ""     , inline="MA #2", minval=1)

ma2_color  = input(#744600, ""     , inline="MA #2")

ma2 = ma(ma2_source, ma2_length, ma2_type)

plot(MovingAvarage and show_ma2 ? ma2 : na, color = ma2_color, title="MA №2")

 

show_ma3   = input(false   , "MA №3", inline="MA #3")

ma3_type   = input.string("SMA"  , ""     , inline="MA #3", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"])

ma3_source = input(close  , ""     , inline="MA #3")

ma3_length = input.int(100    , ""     , inline="MA #3", minval=1)

ma3_color  = input(#00fbc0, ""     , inline="MA #3")

ma3 = ma(ma3_source, ma3_length, ma3_type)

plot(MovingAvarage and show_ma3 ? ma3 : na, color = ma3_color, title="MA №3")

 

show_ma4   = input(false   , "MA №4", inline="MA #4")

ma4_type   = input.string("SMA"  , ""     , inline="MA #4", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"])

ma4_source = input(close  , ""     , inline="MA #4")

ma4_length = input.int(200    , ""     , inline="MA #4", minval=1)

ma4_color  = input(#ea0cf6, ""     , inline="MA #4")

ma4 = ma(ma4_source, ma4_length, ma4_type)

plot(MovingAvarage and show_ma4 ? ma4 : na, color = ma4_color, title="MA №4")

 

show_ma5   = input(false   , "MA №5", inline="MA #5")

ma5_type   = input.string("SMA"  , ""     , inline="MA #5", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"])

ma5_source = input(close  , ""     , inline="MA #5")

ma5_length = input.int(233    , ""     , inline="MA #5", minval=1)

ma5_color  = input(#f60c0c, ""     , inline="MA #5")

ma5 = ma(ma5_source, ma5_length, ma5_type)

plot(MovingAvarage and show_ma5 ? ma5 : na, color = ma5_color, title="MA №5")

 

show_ma6   = input(false   , "MA №6", inline="MA #6")

ma6_type   = input.string("SMA"  , ""     , inline="MA #6", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"])

ma6_source = input(close  , ""     , inline="MA #6")

ma6_length = input.int(233    , ""     , inline="MA #6", minval=1)

ma6_color  = input(#2bf60c, ""     , inline="MA #6")

ma6 = ma(ma6_source, ma6_length, ma6_type)

plot(MovingAvarage and show_ma6 ? ma6 : na, color = ma6_color, title="MA №6")

 

show_ma7   = input(false   , "MA №7", inline="MA #7")

ma7_type   = input.string("SMA"  , ""     , inline="MA #7", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"])

ma7_source = input(close  , ""     , inline="MA #7")

ma7_length = input.int(233    , ""     , inline="MA #7", minval=1)

ma7_color  = input(#0c75f6, ""     , inline="MA #7")

ma7 = ma(ma7_source, ma7_length, ma7_type)

plot(MovingAvarage and show_ma7 ? ma7 : na, color = ma7_color, title="MA №7")


 

// EMA Değerleri

ema8 = ta.ema(close, 8)

ema20 = ta.ema(close, 20)

 

//SMA Değerleri

 

sma5 = ta.sma(close,5)

sma8 = ta.sma(close,8)

sma13 = ta.sma(close,13)

sma21 = ta.sma(close,21)

sma34 = ta.sma(close,34)

sma55 = ta.sma(close,55)

 

sma5Plot = Fsma ? sma5 : na

sma8Plot = Fsma ? sma8 : na

sma13Plot = Fsma ? sma13 : na

sma21Plot = Fsma ? sma21 : na

sma34Plot = Fsma ? sma34 : na

sma55Plot = Fsma ? sma55 : na

 

plot(sma5Plot, title="SMA5", color=color.aqua, linewidth=1)

plot(sma8Plot, title="SMA8", color=color.green, linewidth=1)

plot(sma13Plot, title="SMA13", color=color.orange, linewidth=1)

plot(sma21Plot, title="SMA21", color=color.purple, linewidth=1)

plot(sma34Plot, title="SMA34", color=color.blue, linewidth=1)

plot(sma55Plot, title="SMA55", color=color.red, linewidth=1)

 

// EMA8 ve EMA20 Kesişim Kontrolleri

crossUp = showEMA ? ta.crossover(ema8, ema20) : na

crossDown = showEMA ? ta.crossunder(ema8, ema20) : na

 

// Kesişimleri Görselleştirme

plotshape(series=crossUp, title='EMA8-EMA20 Yukarı Kesişim', location=location.belowbar, color=color.new(color.green, 0), style=shape.triangleup, size=size.small, text='AL', textcolor=color.new(color.black, 0))

plotshape(series=crossDown, title='EMA8-EMA20 Aşağı Kesişim', location=location.abovebar, color=color.new(color.red, 0), style=shape.triangledown, size=size.small, text='SAT', textcolor=color.new(color.black, 0))

 

// EMA Ortalamalarını Gösterme Kontrolü

ema8Plot = showEMA ? ema8 : na

ema20Plot = showEMA ? ema20 : na


 

// EMA Ortalamalarını Çizme

plot(ema8Plot, title='EMA8', color=color.new(color.green, 0), linewidth=3)

plot(ema20Plot, title='EMA20', color=color.new(color.red, 0), linewidth=3)

/////////////////////////


 

/////Bollinger sma 15

 

basis = ta.sma(close, 15)

dev = 2 * ta.stdev(close, 15)

upper = basis + dev

lower = basis - dev

 

ba(source, length, type) =>

    type == "SMA" ? ta.sma(source, length) :

     type == "EMA" ? ta.ema(source, length) :

     type == "SMMA (RMA)" ? ta.rma(source, length) :

     type == "WMA" ? ta.wma(source, length) :

     type == "VWMA" ? ta.vwma(source, length) :

     na



 

show_ba1   = input(true   , "Bollinger", inline="BB #1" , group = 'Bollinger Ayarlar')

ba1_type   = input.string("SMA"  , ""     , inline="BB #1", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"], group = 'Bollinger Ayarlar')

ba1_source = input(close  , ""     , inline="BB #1",group = 'Bollinger Ayarlar')

ba1_length = input.int(15     , ""     , inline="BB #1", minval=1, group = 'Bollinger Ayarlar')

ba1_color  = input(color.white, ""     , inline="BB #1",group = 'Bollinger Ayarlar')

ba1 =ba(ba1_source, ba1_length, ba1_type)

plot(BB and show_ba1 ? ba1 : na, color = ba1_color, title="BOLLİNGER BAND",linewidth=3)

 

show_ba2   = input(false   , "Ortalama", inline="BB #2" , group = 'Bollinger Ayarlar')

ba2_type   = input.string("SMA"  , ""     , inline="BB #2", options=["SMA", "EMA", "SMMA (RMA)", "WMA", "VWMA"], group = 'Bollinger Ayarlar')

ba2_source = input(close  , ""     , inline="BB #2",group = 'Bollinger Ayarlar')

ba2_length = input.int(5     , ""     , inline="BB #2", minval=1, group = 'Bollinger Ayarlar')

ba2_color  = input(color.red, ""     , inline="BB #2",group = 'Bollinger Ayarlar')

ba2 =ba(ba2_source, ba2_length, ba2_type)

plot(BB and show_ba2 ? ba2 : na, color = ba2_color, title="Ortalama", linewidth=2)


 

//plot(BB and basis ? basis : na, color=color.new(#3780e6, 0), linewidth=1, title='BOLLİNGER 15/2')

plot(BB and upper ? upper : na, color=color.new(color.blue, 0), linewidth=1, title='BOLLİNGER 15/2')

plot(BB and lower ? lower : na, color=color.new(color.blue, 0), linewidth=1, title='BOLLİNGER 15/2')



 

//----Parabolic SAR----

psar = input.bool(title='Parabolic Sar ', defval=false, group='PARABOLIC SAR')

start = input(0.02)

increment = input(0.02)

maximum = input(0.2, 'Max Value')

 

sar_1 = ta.sar(start, increment, maximum)

out = psar ? sar_1 : na

 

psarText = sar_1 < close ? 'AL' : 'SAT'

 

plot(out, 'ParabolicSAR', color=color.new(#17f88f, 0), linewidth=1, style=plot.style_cross)

//----Parabolic SAR----









 

// KIVANÇ ÖZBİLGİÇ TREND TAKİP İNDİKATÖRLERİ

 

PM = input.bool(false, title='═══════════════PMAX AYARLAR', group='KIVANÇÖZBİLGİÇ')

 

src = input(hl2, title='Source')

Periods = input(title='ATR Length', defval=10)

Multiplier = input.float(title='ATR Multiplier', step=0.1, defval=3.0)

mav = input.string(title='Moving Average Type', defval='EMA', options=['SMA', 'EMA', 'WMA', 'TMA', 'VAR', 'WWMA', 'ZLEMA', 'TSF'])

length = input.int(10, 'Moving Average Length', minval=1)

changeATR = input(title='Change ATR Calculation Method ?', defval=true)

Normalize = input(title='Normalize ATR ?', defval=false)

showsupport = input(title='Show Moving Average?', defval=true)

showsignalsk = input(title='Show Crossing Signals?', defval=true)

showsignalsc = input(title='Show Price/Pmax Crossing Signals?', defval=false)

highlighting = input(title='Highlighter On/Off ?', defval=true)

atr2 = ta.sma(ta.tr, Periods)

atr = changeATR ? ta.atr(Periods) : atr2

valpha = 2 / (length + 1)

vud1 = src > src[1] ? src - src[1] : 0

vdd1 = src < src[1] ? src[1] - src : 0

vUD = math.sum(vud1, 9)

vDD = math.sum(vdd1, 9)

vCMO = nz((vUD - vDD) / (vUD + vDD))

VAR = 0.0

VAR := nz(valpha * math.abs(vCMO) * src) + (1 - valpha *