Tradingview

[@yörük@]

//@version=6
indicator(":)", overlay=true, max_lines_count=50, max_labels_count=50)

// ==========================================
// 1. AYARLAR
// ==========================================
float ayar_genislik = input.float(1.0, "Genişlik (0.1 - 2.0)", minval=0.1, maxval=2.0, step=0.1)

// ==========================================
// 2. ANA OMURGA MOTORU (HMA 55)
// ==========================================
float s_start_sabit = 0.02
float s_inc_sabit   = 0.02
float s_max_sabit   = 0.2
int s_smooth_sabit  = 55

f_katman_ana(_start, _inc, _max, _smooth) =>
    float _sar = ta.sar(_start, _inc, _max)
    float _delta = math.abs(close - _sar)
    bool _is_up  = close > _sar
    float _raw_mirror = _is_up ? close + _delta : close - _delta
    ta.hma(_raw_mirror, _smooth)

float mirror_ana = f_katman_ana(s_start_sabit, s_inc_sabit, s_max_sabit, s_smooth_sabit)

// ==========================================
// 3. MOTOR BLOKLARI (SAR PARAMETRELERİ)
// ==========================================
float s_slow_1 = ta.sar(0.02, 0.02, 0.2)
float s_slow_2 = ta.sar(0.015, 0.015, 0.15)
float s_slow_3 = ta.sar(0.01, 0.01, 0.1)

float s_fast_1 = ta.sar(0.08, 0.05, 0.2) 
float s_fast_2 = ta.sar(0.01, 0.05, 0.2)
float s_fast_3 = ta.sar(0.04, 0.04, 0.2)
float avg_fast = (s_fast_1 + s_fast_2 + s_fast_3) / 3

// ==========================================
// 4. YAPAY ZEKA (DL) MODÜLÜ (SÜRTÜNMESİZ)
// ==========================================
tanh_fn(v) => (1 - math.exp(-2 * v)) / (1 + math.exp(-2 * v))
td_fn(s)   => nz((s - nz(s[1])) / nz(s[1]))

float in_o = tanh_fn(td_fn(open))
float in_h = tanh_fn(td_fn(high))
float in_l = tanh_fn(td_fn(low))
float in_c = tanh_fn(td_fn(close))

float h0 = tanh_fn((in_o * 22.4271) + (in_h * -26.6917) + (in_l * 4.9371) + (in_c * 9.0349) - 10.6929)
float h1 = tanh_fn((in_o * -38.2880) + (in_h * 10.0500) + (in_l * -44.7063) + (in_c * -17.8163) + 30.5662)
float h2 = tanh_fn((in_o * -33.9954) + (in_h * 14.5017) + (in_l * -43.2865) + (in_c * -13.3874) + 24.7080)
float h3 = tanh_fn((in_o * -14.3929) + (in_h * 28.4830) + (in_l * -22.9793) + (in_c * -7.6582) - 5.6505)
float h4 = tanh_fn((in_o * 28.8379) + (in_h * -26.3544) + (in_l * 0.5206) + (in_c * 25.0049) - 17.8832)
float h5 = tanh_fn((in_o * -4.8113) + (in_h * -4.0364) + (in_l * -8.3327) + (in_c * -1.1571) + 0.4667)

float dl_val = tanh_fn((h0 * -22.0533) + (h1 * 3.6525) + (h2 * -4.3904) + (h3 * 2.1030) + (h4 * 20.0272) + (h5 * 11.5101) - 0.4150)
    
float ai_factor = (0.2 + (math.abs(dl_val) * 0.5)) * ayar_genislik

// ==========================================
// 5. DİNAMİK RENKLİ ATMOSFER VE KALKAN
// ==========================================
bool all_fast_below = (close > s_fast_1) and (close > s_fast_2) and (close > s_fast_3) 
bool all_fast_above = (close < s_fast_1) and (close < s_fast_2) and (close < s_fast_3) 

color core_color = all_fast_below ? color.new(color.green, 75) : 
                   all_fast_above ? color.new(color.red, 75) : 
                   color.new(color.yellow, 75)

float dist_1 = math.abs(close - s_fast_1) * ai_factor
float l1_top = close + dist_1
float l1_bot = close - dist_1

p1_top = plot(l1_top, "Üst", display=display.none)
p1_bot = plot(l1_bot, "Alt", display=display.none)
fill(p1_top, p1_bot, color=core_color, title="Dinamik Çekirdek")

int kalkan = 0
if close > s_fast_1 
    kalkan += 1
if close > s_fast_2 
    kalkan += 1
if close > s_fast_3 
    kalkan += 1

if close < s_fast_1 and close < avg_fast
    kalkan += 1
if close < s_fast_2 and close < avg_fast
    kalkan += 1
if close < s_fast_3 and close < avg_fast
    kalkan += 1

color bar_col = na
if kalkan >= 3
    bar_col := close > avg_fast ? color.rgb(0, 230, 119, 00) : color.rgb(255, 82, 82, 00)
else if kalkan == 2
    bar_col := color.blue
else
    bar_col := color.fuchsia

barcolor(bar_col)

// ==========================================
// 6. ANA OMURGA RENK MANTIĞI
// ==========================================
bool makro_al = mirror_ana > close
color col_mirror_ana = na

if makro_al
    if mirror_ana < mirror_ana[1]
        col_mirror_ana := color.blue   
    else
        col_mirror_ana := color.lime   
else
    if mirror_ana > mirror_ana[1]
        col_mirror_ana := color.yellow 
    else
        col_mirror_ana := color.red    

// ==========================================
// 7. HAFIZALI SİNYAL MANTIĞI VE TAKİP
// ==========================================
bool is_sari = (col_mirror_ana == color.yellow)
bool is_mavi = (col_mirror_ana == color.blue)

var int sinyal_durumu = 0 
bool kesin_al = false
bool kesin_sat = false

var string son_yon = "BEKLENİYOR"
var float son_sinyal_fiyati = na

if barstate.isconfirmed
    if is_sari and sinyal_durumu != 1
        kesin_al := true
        sinyal_durumu := 1
        son_yon := "AL"
        son_sinyal_fiyati := close
        
    if is_mavi and sinyal_durumu != -1
        kesin_sat := true
        sinyal_durumu := -1
        son_yon := "SAT"
        son_sinyal_fiyati := close

// ==========================================
// 8. ÇİFT YÖNLÜ EVREKA MANTIĞI (TAVAN VE ZEMİN)
// ==========================================
var float evreka_tepe = na
var float evreka_dip = na

bool is_green_core = all_fast_below
bool is_red_core = all_fast_above

if is_green_core
    evreka_tepe := na(evreka_tepe) ? l1_top : math.max(evreka_tepe, l1_top)

if is_red_core
    evreka_dip := na(evreka_dip) ? l1_bot : math.min(evreka_dip, l1_bot)

if close < s_slow_1
    evreka_tepe := na
if close > s_slow_1
    evreka_dip := na

bool evreka_direnc_kirilim = ta.crossover(mirror_ana, evreka_tepe) and barstate.isconfirmed
bool evreka_destek_kirilim = ta.crossunder(mirror_ana, evreka_dip) and barstate.isconfirmed

// ==========================================
// 9. YENİ: Aİ TABANLI DİNAMİK STOP (ESNEYEN ZIRH)
// ==========================================
// Yapay zeka ivmesine göre esneyen stop çarpanı (Trendde 1.0'a daralır, Testerede 2.5'e genişler)
float stop_genis = 2.5
float stop_dar = 1.0
float stop_carpan = stop_genis - (math.abs(dl_val) * (stop_genis - stop_dar))
float stop_mesafe = ta.atr(14) * stop_carpan

var float din_stop = na

if sinyal_durumu == 1 // AL Sinyali aktifse (Long Stop Takipli)
    float ham_stop = close - stop_mesafe
    din_stop := (sinyal_durumu[1] != 1) ? ham_stop : math.max(nz(din_stop[1], ham_stop), ham_stop)
else if sinyal_durumu == -1 // SAT Sinyali aktifse (Short Stop Takipli)
    float ham_stop = close + stop_mesafe
    din_stop := (sinyal_durumu[1] != -1) ? ham_stop : math.min(nz(din_stop[1], ham_stop), ham_stop)

// Dinamik Stop Görseli (Küçük Yuvarlak Noktalar)
plot(sinyal_durumu == 1 ? din_stop : na, "Dinamik Stop (AL)", color=color.new(color.lime, 30), style=plot.style_circles, linewidth=1)
plot(sinyal_durumu == -1 ? din_stop : na, "Dinamik Stop (SAT)", color=color.new(color.red, 30), style=plot.style_circles, linewidth=1)

// ==========================================
// 10. HAFİF VİTES (REJİM) ETİKETLERİ
// ==========================================
float cross_val = ta.cross(close, s_fast_1) ? 1.0 : 0.0
float flip_count = math.sum(cross_val, 100)

int vites = flip_count > 15 ? 1 : (flip_count < 8 ? 3 : 2)
color vites_col = vites == 1 ? color.red : (vites == 3 ? color.lime : color.yellow)

if bar_index % 2 == 0
    label.new(bar_index, close > s_fast_1 ? s_fast_1 - ta.atr(14)*0.5 : s_fast_1 + ta.atr(14)*0.5, str.tostring(vites), style=label.style_none, textcolor=color.new(vites_col, 30), size=size.small)

// ==========================================
// 11. GÖRSELLEŞTİRME VE ALARMLAR
// ==========================================
plot(mirror_ana, "0", color=col_mirror_ana, linewidth=3, style=plot.style_stepline)
plot(evreka_tepe, "+1", color=color.new(color.fuchsia, 100), style=plot.style_linebr, linewidth=2)
plot(evreka_dip, "-1", color=color.new(color.fuchsia, 100), style=plot.style_linebr, linewidth=2)

plotshape(kesin_al, "Sarı Başladı (AL)", shape.labelup, location.belowbar, color.rgb(255, 235, 59), text="L", textcolor=color.black, size=size.small)
plotshape(kesin_sat, "Mavi Başladı (SAT)", shape.labeldown, location.abovebar, color.rgb(33, 150, 243), text="S", textcolor=color.white, size=size.small)

plotshape(evreka_direnc_kirilim, "(@yörük@) DİRENÇ", shape.flag, location.abovebar, color.fuchsia, text="DİR\n(@yörük@)", textcolor=color.fuchsia, size=size.small)
plotshape(evreka_destek_kirilim, "(@yörük@) DESTEK", shape.flag, location.belowbar, color.fuchsia, text="DES\n(@yörük@)", textcolor=color.fuchsia, size=size.small)

alertcondition(evreka_direnc_kirilim, title="💎 EVREKA (KOPUŞ!)", message="Sistem: Ana Trend, Çekirdek Tepeyi aştı!")
alertcondition(evreka_destek_kirilim, title="⚠️ EVREKA (ÇÖKÜŞ!)", message="Sistem: Ana Trend, Çekirdek Dibi aşağı kırdı!")

// ==========================================
// 12. KOMUTA MERKEZİ (DASHBOARD)
// ==========================================
var table dash = table.new(position.top_right, 3, 16, border_width = 1, border_color = color.new(color.gray, 80))

if barstate.islast
    table.cell(dash, 0, 0, "Yatırım Tavsiyesi DEĞİLDİR.", text_color=color.white, bgcolor=color.new(color.black, 20), text_size=size.normal, text_halign=text.align_center)
    table.merge_cells(dash, 0, 0, 2, 0)
    
    table.cell(dash, 0, 1, "Fiyat:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 1, str.tostring(close, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 1, 2, 1)

    string v_txt = vites == 1 ? "TESTERE (1)" : vites == 3 ? "TREND (3)" : "NÖTR (2)"
    table.cell(dash, 0, 2, "Piyasa Vitesi:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 2, v_txt, text_color=vites_col, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 2, 2, 2)

    string sig_text = son_yon == "BEKLENİYOR" ? "YOK" : son_yon + " @ " + str.tostring(son_sinyal_fiyati, format.mintick)
    color sig_color = son_yon == "AL" ? color.rgb(255, 235, 59) : son_yon == "SAT" ? color.rgb(33, 150, 243) : color.gray
    table.cell(dash, 0, 3, "Son Sinyal:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 3, sig_text, text_color=sig_color, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 3, 2, 3)

    // YENİ: DİNAMİK STOP (ESNEYEN ZIRH) SATIRI
    string stop_txt = na(din_stop) ? "HESAPLANIYOR" : str.tostring(din_stop, format.mintick)
    color stop_renk = sinyal_durumu == 1 ? color.lime : (sinyal_durumu == -1 ? color.red : color.gray)
    table.cell(dash, 0, 4, "Aİ Dinamik Stop:", text_color=color.yellow, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 4, stop_txt, text_color=stop_renk, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 4, 2, 4)

    table.cell(dash, 0, 5, "Trend:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 5, str.tostring(mirror_ana, format.mintick), text_color=col_mirror_ana, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 5, 2, 5)

    string evreka_tepe_str = na(evreka_tepe) ? "BEKLENİYOR" : str.tostring(evreka_tepe, format.mintick)
    table.cell(dash, 0, 6, "Oto Direnç:", text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 6, evreka_tepe_str, text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 6, 2, 6)

    string evreka_dip_str = na(evreka_dip) ? "BEKLENİYOR" : str.tostring(evreka_dip, format.mintick)
    table.cell(dash, 0, 7, "Oto Destek:", text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 7, evreka_dip_str, text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 7, 2, 7)

    table.cell(dash, 0, 8, "--- Aİ-HIZLI (@yörük@) ---", text_color=color.yellow, bgcolor=color.new(color.black, 20), text_halign=text.align_center)
    table.merge_cells(dash, 0, 8, 2, 8)

    table.cell(dash, 0, 9, "1:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 9, str.tostring(s_fast_1, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 9, close > s_fast_1 ? "AL" : "SAT", text_color=close > s_fast_1 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 10, "2:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 10, str.tostring(s_fast_2, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 10, close > s_fast_2 ? "AL" : "SAT", text_color=close > s_fast_2 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 11, "3:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 11, str.tostring(s_fast_3, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 11, close > s_fast_3 ? "AL" : "SAT", text_color=close > s_fast_3 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 12, "--- Aİ-YAVAŞ (@yörük@) ---", text_color=color.yellow, bgcolor=color.new(color.black, 20), text_halign=text.align_center)
    table.merge_cells(dash, 0, 12, 2, 12)

    table.cell(dash, 0, 13, "4:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 13, str.tostring(s_slow_1, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 13, close > s_slow_1 ? "AL" : "SAT", text_color=close > s_slow_1 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 14, "5:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 14, str.tostring(s_slow_2, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 14, close > s_slow_2 ? "AL" : "SAT", text_color=close > s_slow_2 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 15, "6:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 15, str.tostring(s_slow_3, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 15, close > s_slow_3 ? "AL" : "SAT", text_color=close > s_slow_3 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

var table ytd_table = table.new(position.bottom_center, 1, 1)
if barstate.islast
    table.cell(ytd_table, 0, 0, "(Aİ) - Eğitim çalışmasıdır. Yatırım tavsiyesi KULLANILAMAZ.", text_color=color.new(color.white, 00), text_size=size.small) 

[@yörük@]

//@version=6
indicator(":)", overlay=true, max_lines_count=50, max_labels_count=50)

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 1. AYARLAR VE ANA OMURGA (ATMOSFER)                                          │
// └──────────────────────────────────────────────────────────────────────────────┘
float ayar_genislik = input.float(1.0, "Genişlik (0.1 - 2.0)", minval=0.1, maxval=2.0, step=0.1)

f_katman_ana(_start, _inc, _max, _smooth) =>
    float _sar = ta.sar(_start, _inc, _max)
    float _delta = math.abs(close - _sar)
    bool _is_up  = close > _sar
    float _raw_mirror = _is_up ? close + _delta : close - _delta
    ta.hma(_raw_mirror, _smooth)

float mirror_ana = f_katman_ana(0.02, 0.02, 0.2, 21)

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 2. Aİ MOTOR BLOKLARI VE DERİN ÖĞRENME HESAPLAMALARI                          │
// └──────────────────────────────────────────────────────────────────────────────┘
float s_slow_1 = ta.sar(0.02, 0.02, 0.2)
float s_slow_2 = ta.sar(0.015, 0.015, 0.15)
float s_slow_3 = ta.sar(0.01, 0.01, 0.1)

float s_fast_1 = ta.sar(0.08, 0.05, 0.2) 
float s_fast_2 = ta.sar(0.01, 0.05, 0.2)
float s_fast_3 = ta.sar(0.04, 0.04, 0.2)
float avg_fast = (s_fast_1 + s_fast_2 + s_fast_3) / 3

tanh_fn(v) => (1 - math.exp(-2 * v)) / (1 + math.exp(-2 * v))
td_fn(s)   => nz((s - nz(s[1])) / nz(s[1]))

float in_o = tanh_fn(td_fn(open))
float in_h = tanh_fn(td_fn(high))
float in_l = tanh_fn(td_fn(low))
float in_c = tanh_fn(td_fn(close))

float h0 = tanh_fn((in_o * 22.4271) + (in_h * -26.6917) + (in_l * 4.9371) + (in_c * 9.0349) - 10.6929)
float h1 = tanh_fn((in_o * -38.2880) + (in_h * 10.0500) + (in_l * -44.7063) + (in_c * -17.8163) + 30.5662)
float h2 = tanh_fn((in_o * -33.9954) + (in_h * 14.5017) + (in_l * -43.2865) + (in_c * -13.3874) + 24.7080)
float h3 = tanh_fn((in_o * -14.3929) + (in_h * 28.4830) + (in_l * -22.9793) + (in_c * -7.6582) - 5.6505)
float h4 = tanh_fn((in_o * 28.8379) + (in_h * -26.3544) + (in_l * 0.5206) + (in_c * 25.0049) - 17.8832)
float h5 = tanh_fn((in_o * -4.8113) + (in_h * -4.0364) + (in_l * -8.3327) + (in_c * -1.1571) + 0.4667)

float dl_val = tanh_fn((h0 * -22.0533) + (h1 * 3.6525) + (h2 * -4.3904) + (h3 * 2.1030) + (h4 * 20.0272) + (h5 * 11.5101) - 0.4150)
float ai_factor = (0.2 + (math.abs(dl_val) * 0.5)) * ayar_genislik

// Ana Omurga Renk Mantığı
bool makro_al = mirror_ana > close
color col_mirror_ana = makro_al ? (mirror_ana < mirror_ana[1] ? color.blue : color.lime) : (mirror_ana > mirror_ana[1] ? color.yellow : color.red)

var string son_yon = "BEKLENİYOR"
var float son_sinyal_fiyati = na
if barstate.isconfirmed
    if col_mirror_ana == color.yellow and son_yon != "AL"
        son_yon := "AL"
        son_sinyal_fiyati := close
    if col_mirror_ana == color.blue and son_yon != "SAT"
        son_yon := "SAT"
        son_sinyal_fiyati := close

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 3. SAF MTK-3 ÇİFTE KIRILIM MOTORU (MUSA'NIN ASASI)                           │
// └──────────────────────────────────────────────────────────────────────────────┘
sarStart = input.float(0.01, "Basınç Başlangıcı", group="MTK-3 Motoru")
sarInc   = input.float(0.02, "Basınç İvmesi", group="MTK-3 Motoru")
sarMax   = input.float(0.2,  "Maksimum Tazyik", group="MTK-3 Motoru")
direncPeriyodu = input.int(2, "Kapakçık (Sınır) Periyodu", group="MTK-3 Motoru")

psarVal  = ta.sar(sarStart, sarInc, sarMax)
ustKapak = ta.highest(high, direncPeriyodu)[1]
altKapak = ta.lowest(low, direncPeriyodu)[1]

// İkisini Birden Kırma Anı
ciftKirilimAtim    = ta.crossover(close, psarVal) and (close > ustKapak)
ciftKirilimGevseme = ta.crossunder(close, psarVal) and (close < altKapak)

// Mutlak Hedefler (Yeni Evreka)
var float tepeHedef = na
var float dipHedef  = na

if ciftKirilimAtim
    dipHedef := ta.lowest(low, direncPeriyodu * 2)[1]
if ciftKirilimGevseme
    tepeHedef := ta.highest(high, direncPeriyodu * 2)[1]

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 4. GÖRSELLEŞTİRME VE ALARMLAR                                                │
// └──────────────────────────────────────────────────────────────────────────────┘
plot(mirror_ana, "Ana Trend", color=col_mirror_ana, linewidth=3, style=plot.style_stepline)
plot(psarVal, "@yörük@", style=plot.style_cross, color=close > psarVal ? color.yellow : color.blue, linewidth=2)

plot(tepeHedef, "O-Tepe", color=color.new(color.blue, 30), style=plot.style_linebr, linewidth=1)
plot(dipHedef,  "O-Dip",  color=color.new(color.yellow, 30), style=plot.style_linebr, linewidth=1)

plotshape(ciftKirilimAtim, "(@yörük@) DİRENÇ", shape.flag, location.abovebar, color.fuchsia, text="DİR\n(@yörük@)", textcolor=color.fuchsia, size=size.small)
plotshape(ciftKirilimGevseme, "(@yörük@) DESTEK", shape.flag, location.belowbar, color.fuchsia, text="DES\n(@yörük@)", textcolor=color.fuchsia, size=size.small)

alertcondition(ciftKirilimAtim, title="💎 EVREKA (KOPUŞ!)", message="Sistem: Çifte Kırılım Gerçekleşti, Tazyik Yukarı!")
alertcondition(ciftKirilimGevseme, title="⚠️ EVREKA (ÇÖKÜŞ!)", message="Sistem: Çifte Kırılım Gerçekleşti, Tazyik Aşağı!")

var int mtkDongu = 0
if ciftKirilimAtim
    mtkDongu := 1
else if ciftKirilimGevseme
    mtkDongu := -1

bgcolor(mtkDongu == 1 ? color.new(color.lime, 90) : mtkDongu == -1 ? color.new(color.red, 90) : na, title="Döngü Formu")

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 5. KOMUTA MERKEZİ (DASHBOARD)                                                │
// └──────────────────────────────────────────────────────────────────────────────┘
var table dash = table.new(position.top_right, 3, 14, border_width = 1, border_color = color.new(color.gray, 80))

if barstate.islast
    table.cell(dash, 0, 0, "Yatırım Tavsiyesi DEĞİLDİR.", text_color=color.white, bgcolor=color.new(color.black, 20), text_size=size.normal, text_halign=text.align_center)
    table.merge_cells(dash, 0, 0, 2, 0)
    
    table.cell(dash, 0, 1, "Fiyat:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 1, str.tostring(close, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 1, 2, 1)

    string sig_text = son_yon == "BEKLENİYOR" ? "YOK" : son_yon + " @ " + str.tostring(son_sinyal_fiyati, format.mintick)
    color sig_color = son_yon == "AL" ? color.rgb(255, 235, 59) : son_yon == "SAT" ? color.rgb(33, 150, 243) : color.gray
    table.cell(dash, 0, 2, "Son Sinyal:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 2, sig_text, text_color=sig_color, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 2, 2, 2)

    table.cell(dash, 0, 3, "Trend:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 3, str.tostring(mirror_ana, format.mintick), text_color=col_mirror_ana, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 3, 2, 3)

    string evreka_tepe_str = na(tepeHedef) ? "BEKLENİYOR" : str.tostring(tepeHedef, format.mintick)
    table.cell(dash, 0, 4, "Oto Direnç:", text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 4, evreka_tepe_str, text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 4, 2, 4)

    string evreka_dip_str = na(dipHedef) ? "BEKLENİYOR" : str.tostring(dipHedef, format.mintick)
    table.cell(dash, 0, 5, "Oto Destek:", text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 5, evreka_dip_str, text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 5, 2, 5)

    table.cell(dash, 0, 6, "--- Aİ-HIZLI (@yörük@) ---", text_color=color.yellow, bgcolor=color.new(color.black, 20), text_halign=text.align_center)
    table.merge_cells(dash, 0, 6, 2, 6)

    table.cell(dash, 0, 7, "1:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 7, str.tostring(s_fast_1, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 7, close > s_fast_1 ? "AL" : "SAT", text_color=close > s_fast_1 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 8, "2:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 8, str.tostring(s_fast_2, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 8, close > s_fast_2 ? "AL" : "SAT", text_color=close > s_fast_2 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 9, "3:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 9, str.tostring(s_fast_3, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 9, close > s_fast_3 ? "AL" : "SAT", text_color=close > s_fast_3 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 10, "--- Aİ-YAVAŞ (@yörük@) ---", text_color=color.yellow, bgcolor=color.new(color.black, 20), text_halign=text.align_center)
    table.merge_cells(dash, 0, 10, 2, 10)

    table.cell(dash, 0, 11, "4:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 11, str.tostring(s_slow_1, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 11, close > s_slow_1 ? "AL" : "SAT", text_color=close > s_slow_1 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 12, "5:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 12, str.tostring(s_slow_2, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 12, close > s_slow_2 ? "AL" : "SAT", text_color=close > s_slow_2 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 13, "6:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 13, str.tostring(s_slow_3, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 13, close > s_slow_3 ? "AL" : "SAT", text_color=close > s_slow_3 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

var table ytd_table = table.new(position.bottom_center, 1, 1)
if barstate.islast
    table.cell(ytd_table, 0, 0, "(Aİ) - Eğitim çalışmasıdır. Yatırım tavsiyesi KULLANILAMAZ.", text_color=color.new(color.white, 00), text_size=size.small) 

[@yörük@]

//@version=6
indicator(":]", overlay=true, max_lines_count=50, max_labels_count=500)

// ==========================================
// 1. AYARLAR
// ==========================================
float ayar_genislik = input.float(1.0, "Ana Atmosfer Çarpanı", minval=0.1, maxval=2.0, step=0.1)

// ==========================================
// 2. MOTOR BLOKLARI (PARAMETRELER)
// ==========================================
float s_slow_1 = ta.sar(0.02, 0.02, 0.2)
float s_slow_2 = ta.sar(0.015, 0.015, 0.15)
float s_slow_3 = ta.sar(0.01, 0.01, 0.1)

float s_fast_1 = ta.sar(0.08, 0.05, 0.2) 
float s_fast_2 = ta.sar(0.01, 0.05, 0.2)
float s_fast_3 = ta.sar(0.04, 0.04, 0.2)
float avg_fast = (s_fast_1 + s_fast_2 + s_fast_3) / 3

// ==========================================
// 3. YAPAY ZEKA (DL) MODÜLÜ (ATMOSFER ESNEKLİĞİ)
// ==========================================
tanh_fn(v) => (1 - math.exp(-2 * v)) / (1 + math.exp(-2 * v))
td_fn(s)   => nz((s - nz(s[1])) / nz(s[1]))

var w_c = array.from(22.4271, -26.6917, 4.9371, 9.0349, -10.6929, -38.2880, 10.0500, -44.7063, -17.8163, 30.5662, -33.9954, 14.5017, -43.2865, -13.3874, 24.7080, -14.3929, 28.4830, -22.9793, -7.6582, -5.6505, 28.8379, -26.3544, 0.5206, 25.0049, -17.8832, -4.8113, -4.0364, -8.3327, -1.1571, 0.4667, -22.0533, 3.6525, -4.3904, 2.1030, 20.0272, 11.5101, -0.4150)
n_in = array.from(tanh_fn(td_fn(open)), tanh_fn(td_fn(high)), tanh_fn(td_fn(low)), tanh_fn(td_fn(close)))

f_calc_dl(n_arr, w_arr) =>
    float out = 0.0
    for i = 0 to 5
        float s = 0.0
        for j = 0 to 3
            s += array.get(n_arr, j) * array.get(w_arr, (i * 5) + j)
        out += tanh_fn(s + array.get(w_arr, (i * 5) + 4)) * array.get(w_arr, 30 + i)
    tanh_fn(out + array.get(w_arr, 36))
    
float dl_val = f_calc_dl(n_in, w_c)
// Temel AI katsayısı
float ai_factor = (0.2 + (math.abs(dl_val) * 0.5)) * ayar_genislik

// ==========================================
// 4. DİNAMİK RENKLİ ATMOSFER (3 KADEMELİ NİŞANGAH)
// ==========================================
bool all_fast_below = (close > s_fast_1) and (close > s_fast_2) and (close > s_fast_3) 
bool all_fast_above = (close < s_fast_1) and (close < s_fast_2) and (close < s_fast_3) 

// Ana Renk
color base_color = all_fast_below ? color.green : all_fast_above ? color.maroon : color.yellow

// Sadece s_fast_1'i kullanarak temel mesafeyi (dist_base) buluyoruz
float dist_base = math.abs(close - s_fast_1) * ai_factor

// Senin Oranların: 0.5 (Vurkaç), 1.0 (Trend), 2.0 (Swing)
float dist_vurkac = dist_base * 0.5
float dist_trend  = dist_base * 1.0
float dist_swing  = dist_base * 2.0

// Çizgilerin Hazırlanması
p_swing_top  = plot(close + dist_swing, display=display.none)
p_swing_bot  = plot(close - dist_swing, display=display.none)

p_trend_top  = plot(close + dist_trend, display=display.none)
p_trend_bot  = plot(close - dist_trend, display=display.none)

p_vurkac_top = plot(close + dist_vurkac, display=display.none)
p_vurkac_bot = plot(close - dist_vurkac, display=display.none)

// En dıştan (şeffaf) en içe (koyu) doğru boyama yapıyoruz ki renkler ezilmesin
fill(p_swing_top,  p_swing_bot,  color=color.new(base_color, 75), title="Swing Alanı (2.0x)")
fill(p_trend_top,  p_trend_bot,  color=color.new(base_color, 55), title="Trend Alanı (1.0x)")
fill(p_vurkac_top, p_vurkac_bot, color=color.new(base_color, 35), title="Vurkaç Alanı (0.5x)")

// ==========================================
// 5. KALKAN GÜCÜ (MUM BOYAMA)
// ==========================================
int kalkan = 0
if close > s_fast_1 
    kalkan += 1
if close > s_fast_2 
    kalkan += 1
if close > s_fast_3 
    kalkan += 1

if close < s_fast_1 and close < avg_fast
    kalkan += 1
if close < s_fast_2 and close < avg_fast
    kalkan += 1
if close < s_fast_3 and close < avg_fast
    kalkan += 1

color bar_col = na
if kalkan >= 3
    bar_col := close > avg_fast ? color.rgb(0, 230, 119, 00) : color.rgb(255, 82, 82, 00)
else if kalkan == 2
    bar_col := color.blue
else
    bar_col := color.fuchsia

barcolor(bar_col)

// ==========================================
// 6. ÇOKLU MİZAN (DENGE) AĞI (7 - 14 - 21 - 55 - 100)
// ==========================================
f_hakiki_mizan(_sar, _sm) =>
    float _delta = math.abs(close - _sar)
    float _raw = close > _sar ? close + _delta : close - _delta
    float _mirror = ta.hma(_raw, _sm)
    
    bool _dondu_asagi  = _mirror < _mirror[1] and _mirror[1] > _mirror[2]
    bool _dondu_yukari = _mirror > _mirror[1] and _mirror[1] < _mirror[2]
    
    var float _tepe = na
    var float _dip  = na
    
    if _dondu_asagi
        _tepe := _mirror[1]
    if _dondu_yukari
        _dip := _mirror[1]
        
    (_tepe + _dip) / 2

float mizan_7   = f_hakiki_mizan(s_fast_1, 3)
float mizan_14  = f_hakiki_mizan(s_fast_1, 7)
float mizan_21  = f_hakiki_mizan(s_fast_1, 21)
float mizan_55  = f_hakiki_mizan(s_fast_1, 55)
float mizan_100 = f_hakiki_mizan(s_fast_1, 100)

plot(mizan_7,   "Ayna-İlk",   color=color.new(color.white, 0),   linewidth=1)
//plot(mizan_14,  "2",  color=color.new(color.aqua, 00),    linewidth=1)
plot(mizan_21,  "Ayna -Denge",  color=color.new(color.yellow, 00),   linewidth=1)
//plot(mizan_55,  "4",  color=color.new(color.orange, 00),   linewidth=1)
plot(mizan_100, "Ayna-Son", color=color.new(color.fuchsia, 0),  linewidth=1)

// İMZA
var table ytd_table = table.new(position.bottom_center, 1, 1)
if barstate.islast
    table.cell(ytd_table, 0, 0, "(Aİ) eğitim çalışmasıdır. Yatırım tavsiyesi KULLANILAMAZ.", text_color=color.new(color.white, 00), text_size=size.normal)
///

//@function Calculates Parabolic SAR Extended with asymmetric acceleration factors
//@param start_value Explicit start value (0=auto-detect, >0=force long, <0=force short)
//@param offset_on_reverse Offset applied to SAR on each reversal
//@param af_init_long Initial AF for long positions
//@param af_long AF increment per new high in long mode
//@param af_max_long Maximum AF for long positions
//@param af_init_short Initial AF for short positions
//@param af_short AF increment per new low in short mode
//@param af_max_short Maximum AF for short positions
//@returns Sign-encoded SAR: positive=long (SAR below price), negative=short (SAR above price)
//@optimized O(1) per bar state machine, asymmetric AF for long/short
sarext(simple float start_value=0.0, simple float offset_on_reverse=0.0,
       simple float af_init_long=0.02, simple float af_long=0.02, simple float af_max_long=0.20,
       simple float af_init_short=0.02, simple float af_short=0.02, simple float af_max_short=0.20) =>
    if af_init_long < 0
        runtime.error("AF init long must be >= 0")
    if af_long < 0
        runtime.error("AF long must be >= 0")
    if af_max_long < af_init_long
        runtime.error("AF max long must be >= AF init long")
    if af_init_short < 0
        runtime.error("AF init short must be >= 0")
    if af_short < 0
        runtime.error("AF short must be >= 0")
    if af_max_short < af_init_short
        runtime.error("AF max short must be >= AF init short")

    var bool is_long = true
    var float sar = na
    var float ep = na
    var float af = af_init_long
    var float result = na

    if bar_index == 0
        // Bar 0: store first bar, no output yet (need 2 bars for DM)
        result := na
    else if bar_index == 1
        // Bar 1: determine initial direction
        if start_value > 0
            // Forced long
            is_long := true
            sar := math.abs(start_value)
        else if start_value < 0
            // Forced short
            is_long := false
            sar := math.abs(start_value)
        else
            // Auto-detect from directional movement
            float plus_dm = high - high[1]
            float minus_dm = low[1] - low
            if plus_dm < 0
                plus_dm := 0
            if minus_dm < 0
                minus_dm := 0
            is_long := plus_dm > minus_dm
            // Initial SAR from prior bar extreme
            sar := is_long ? low[1] : high[1]

        // Set initial EP and AF
        ep := is_long ? high : low
        af := is_long ? af_init_long : af_init_short

        // Clamp SAR
        if is_long
            if sar > low[1]
                sar := low[1]
            if sar > low
                sar := low
        else
            if sar < high[1]
                sar := high[1]
            if sar < high
                sar := high

        // Sign-encode
        result := is_long ? sar : -sar
    else
        // Bar 2+: standard SAR with asymmetric AF
        float new_sar = sar + af * (ep - sar)

        if is_long
            // Clamp to prior lows
            new_sar := math.min(new_sar, low[1])
            new_sar := math.min(new_sar, low[2])

            // Reversal check
            if low < new_sar
                // Reverse to short
                is_long := false
                new_sar := ep
                if offset_on_reverse != 0
                    new_sar := new_sar + offset_on_reverse
                ep := low
                af := af_init_short
            else
                // New extreme point?
                if high > ep
                    ep := high
                    af := math.min(af + af_long, af_max_long)
        else
            // Short mode: clamp to prior highs
            new_sar := math.max(new_sar, high[1])
            new_sar := math.max(new_sar, high[2])

            // Reversal check
            if high > new_sar
                // Reverse to long
                is_long := true
                new_sar := ep
                if offset_on_reverse != 0
                    new_sar := new_sar - offset_on_reverse
                ep := high
                af := af_init_long
            else
                // New extreme point?
                if low < ep
                    ep := low
                    af := math.min(af + af_short, af_max_short)

        sar := new_sar
        result := is_long ? new_sar : -new_sar

    result

// ---------- Main loop ----------

// Inputs
i_start_value     = input.float(0.0,  "Start Value",       step=0.1,                        tooltip="0=auto-detect, >0=force long, <0=force short")
i_offset_reverse  = input.float(0.0,  "Offset on Reverse", minval=0.0, step=0.1,            tooltip="Buffer added to SAR on reversal")
i_af_init_long    = input.float(0.002, "AF Init Long",      minval=0.0, maxval=1.0, step=0.001)
i_af_long         = input.float(0.02, "AF Long",           minval=0.0, maxval=1.0, step=0.001)
i_af_max_long     = input.float(0.20, "AF Max Long",       minval=0.0, maxval=1.0, step=0.01)
i_af_init_short   = input.float(0.002, "AF Init Short",     minval=0.0, maxval=1.0, step=0.001)
i_af_short        = input.float(0.02, "AF Short",          minval=0.0, maxval=1.0, step=0.001)
i_af_max_short    = input.float(0.20, "AF Max Short",      minval=0.0, maxval=1.0, step=0.01)

// Calculation
sarext_val = sarext(i_start_value, i_offset_reverse,
                    i_af_init_long, i_af_long, i_af_max_long,
                    i_af_init_short, i_af_short, i_af_max_short)

// Decode sign: absolute value = SAR level, sign = direction
sar_abs = math.abs(sarext_val)
sar_long  = sarext_val > 0 ? sar_abs : na
sar_short = sarext_val < 0 ? sar_abs : na

// Plot
plot(sar_long,  "+1",  color=color.white, style=plot.style_linebr, linewidth=4)
plot(sar_short, "-1", color=color.fuchsia,   style=plot.style_linebr, linewidth=4)
/////////// 

[@yörük@]

//@version=6
indicator(":]", overlay=true, max_lines_count=50, max_labels_count=500)

// ==========================================
// 1. AYARLAR
// ==========================================
float ayar_genislik = input.float(1.0, "Ana Atmosfer Çarpanı", minval=0.1, maxval=2.0, step=0.1)

// ==========================================
// 2. MOTOR BLOKLARI (PSAR)
// ==========================================
float s_slow_1 = ta.sar(0.02, 0.02, 0.2)
float s_slow_2 = ta.sar(0.015, 0.015, 0.15)
float s_slow_3 = ta.sar(0.01, 0.01, 0.1)

float s_fast_1 = ta.sar(0.08, 0.05, 0.2) 
float s_fast_2 = ta.sar(0.01, 0.05, 0.2)
float s_fast_3 = ta.sar(0.04, 0.04, 0.2)
float avg_fast = (s_fast_1 + s_fast_2 + s_fast_3) / 3

// ==========================================
// 3. YAPAY ZEKA (DL) ATMOSFERİ (ARKA PLAN HESABI)
// ==========================================
// Atmosfer ekranda görünmeyecek ama arka planda SuperTrend kalkanını (dist_swing) hesaplayacak.
tanh_fn(v) => (1 - math.exp(-2 * v)) / (1 + math.exp(-2 * v))
td_fn(s)   => nz((s - nz(s[1])) / nz(s[1]))

var w_c = array.from(22.4271, -26.6917, 4.9371, 9.0349, -10.6929, -38.2880, 10.0500, -44.7063, -17.8163, 30.5662, -33.9954, 14.5017, -43.2865, -13.3874, 24.7080, -14.3929, 28.4830, -22.9793, -7.6582, -5.6505, 28.8379, -26.3544, 0.5206, 25.0049, -17.8832, -4.8113, -4.0364, -8.3327, -1.1571, 0.4667, -22.0533, 3.6525, -4.3904, 2.1030, 20.0272, 11.5101, -0.4150)
n_in = array.from(tanh_fn(td_fn(open)), tanh_fn(td_fn(high)), tanh_fn(td_fn(low)), tanh_fn(td_fn(close)))

f_calc_dl(n_arr, w_arr) =>
    float out = 0.0
    for i = 0 to 5
        float s = 0.0
        for j = 0 to 3
            s += array.get(n_arr, j) * array.get(w_arr, (i * 5) + j)
        out += tanh_fn(s + array.get(w_arr, (i * 5) + 4)) * array.get(w_arr, 30 + i)
    tanh_fn(out + array.get(w_arr, 36))
    
float dl_val = f_calc_dl(n_in, w_c)
float ai_factor = (0.2 + (math.abs(dl_val) * 0.5)) * ayar_genislik

float dist_base = math.abs(close - s_fast_1) * ai_factor
float dist_swing  = dist_base * 2.0
float l1_top = close + dist_base
float l1_bot = close - dist_base

// ==========================================
// 4. MİZAN 100 (KADİM EKSEN - GÖRÜNÜR)
// ==========================================
f_hakiki_mizan(_sar, _sm) =>
    float _delta = math.abs(close - _sar)
    float _raw = close > _sar ? close + _delta : close - _delta
    float _mirror = ta.hma(_raw, _sm)
    bool _dondu_asagi  = _mirror < _mirror[1] and _mirror[1] > _mirror[2]
    bool _dondu_yukari = _mirror > _mirror[1] and _mirror[1] < _mirror[2]
    var float _tepe = na
    var float _dip  = na
    if _dondu_asagi
        _tepe := _mirror[1]
    if _dondu_yukari
        _dip := _mirror[1]
    (_tepe + _dip) / 2

float mizan_100 = f_hakiki_mizan(s_fast_1, 100)
plot(mizan_100, "Mizan 100", color=color.new(color.fuchsia, 0), linewidth=3)

// ==========================================
// 5. ÖZ ÇEKİRDEK SUPERTREND VE İTTİFAK ONAYI (GÖRÜNÜR)
// ==========================================
float ust_band = avg_fast + dist_swing
float alt_band = avg_fast - dist_swing

var int   oz_st_yon = 1
var float oz_st_cizgi = na

if oz_st_yon == 1
    oz_st_cizgi := math.max(nz(oz_st_cizgi[1], alt_band), alt_band)
    if close < oz_st_cizgi
        oz_st_yon := -1
        oz_st_cizgi := ust_band
else
    oz_st_cizgi := math.min(nz(oz_st_cizgi[1], ust_band), ust_band)
    if close > oz_st_cizgi
        oz_st_yon := 1
        oz_st_cizgi := alt_band

bool mizan_AL_onayi  = close > mizan_100
bool mizan_SAT_onayi = close < mizan_100

color oz_st_renk = (oz_st_yon == 1 and mizan_AL_onayi) ? color.new(color.lime, 0) : 
                   (oz_st_yon == -1 and mizan_SAT_onayi) ? color.new(color.red, 0) : 
                   color.new(color.gray, 80) 

plot(oz_st_cizgi, "SuperTrend", color=oz_st_renk, style=plot.style_stepline, linewidth=2)

bool st_AL_kesti  = oz_st_yon == 1 and oz_st_yon[1] == -1
bool st_SAT_kesti = oz_st_yon == -1 and oz_st_yon[1] == 1

bool ittifak_AL  = st_AL_kesti and mizan_AL_onayi
bool ittifak_SAT = st_SAT_kesti and mizan_SAT_onayi

// ==========================================
// 6. PSAR MOTORUNA BAĞLI VİTES OKLARI (GÖRÜNÜR)
// ==========================================
int bull_sar_sayisi = (close > s_fast_1 ? 1 : 0) + (close > s_fast_2 ? 1 : 0) + (close > s_fast_3 ? 1 : 0)
int bear_sar_sayisi = (close < s_fast_1 ? 1 : 0) + (close < s_fast_2 ? 1 : 0) + (close < s_fast_3 ? 1 : 0)

bool ok_yukari = bull_sar_sayisi > bear_sar_sayisi
bool ok_asagi  = bear_sar_sayisi > bull_sar_sayisi

int psar_vitesi = math.max(bull_sar_sayisi, bear_sar_sayisi)
color ok_rengi = psar_vitesi == 1 ? color.new(color.red, 0) : psar_vitesi == 2 ? color.new(color.yellow, 0) : color.new(color.lime, 0)

plotshape(ok_yukari, title="Vites Yukarı", style=shape.arrowup,   location=location.belowbar, color=ok_rengi, size=size.small)
plotshape(ok_asagi,  title="Vites Aşağı",  style=shape.arrowdown, location=location.abovebar, color=ok_rengi, size=size.small)

// ==========================================
// 7. EVREKA MANTIĞI (DESTEK/DİRENÇ ÇİZGİLERİ GİZLENDİ, TABLODA DURUYOR)
// ==========================================
bool all_fast_below = (close > s_fast_1) and (close > s_fast_2) and (close > s_fast_3) 
bool all_fast_above = (close < s_fast_1) and (close < s_fast_2) and (close < s_fast_3) 

var float evreka_tepe = close
var float evreka_dip  = close

if all_fast_below
    evreka_tepe := math.max(evreka_tepe, l1_top)
if all_fast_above
    evreka_dip := math.min(evreka_dip, l1_bot)

if ta.crossunder(close, s_slow_1)
    evreka_tepe := l1_top
if ta.crossover(close, s_slow_1)
    evreka_dip := l1_bot

// ==========================================
// 8. EXTENDED SAR FONKSİYONU VE ÇİZİMİ (GÖRÜNÜR)
// ==========================================
sarext(simple float start_value=0.0, simple float offset_on_reverse=0.0,
       simple float af_init_long=0.02, simple float af_long=0.02, simple float af_max_long=0.20,
       simple float af_init_short=0.02, simple float af_short=0.02, simple float af_max_short=0.20) =>
    if af_init_long < 0
        runtime.error("AF init long must be >= 0")
    if af_long < 0
        runtime.error("AF long must be >= 0")
    if af_max_long < af_init_long
        runtime.error("AF max long must be >= AF init long")
    if af_init_short < 0
        runtime.error("AF init short must be >= 0")
    if af_short < 0
        runtime.error("AF short must be >= 0")
    if af_max_short < af_init_short
        runtime.error("AF max short must be >= AF init short")

    var bool is_long = true
    var float sar = na
    var float ep = na
    var float af = af_init_long
    var float result = na

    if bar_index == 0
        result := na
    else if bar_index == 1
        if start_value > 0
            is_long := true
            sar := math.abs(start_value)
        else if start_value < 0
            is_long := false
            sar := math.abs(start_value)
        else
            float plus_dm = high - high[1]
            float minus_dm = low[1] - low
            if plus_dm < 0
                plus_dm := 0
            if minus_dm < 0
                minus_dm := 0
            is_long := plus_dm > minus_dm
            sar := is_long ? low[1] : high[1]

        ep := is_long ? high : low
        af := is_long ? af_init_long : af_init_short

        if is_long
            if sar > low[1]
                sar := low[1]
            if sar > low
                sar := low
        else
            if sar < high[1]
                sar := high[1]
            if sar < high
                sar := high

        result := is_long ? sar : -sar
    else
        float new_sar = sar + af * (ep - sar)

        if is_long
            new_sar := math.min(new_sar, low[1])
            new_sar := math.min(new_sar, low[2])

            if low < new_sar
                is_long := false
                new_sar := ep
                if offset_on_reverse != 0
                    new_sar := new_sar + offset_on_reverse
                ep := low
                af := af_init_short
            else
                if high > ep
                    ep := high
                    af := math.min(af + af_long, af_max_long)
        else
            new_sar := math.max(new_sar, high[1])
            new_sar := math.max(new_sar, high[2])

            if high > new_sar
                is_long := true
                new_sar := ep
                if offset_on_reverse != 0
                    new_sar := new_sar - offset_on_reverse
                ep := high
                af := af_init_long
            else
                if low < ep
                    ep := low
                    af := math.min(af + af_short, af_max_short)

        sar := new_sar
        result := is_long ? new_sar : -new_sar

    result

i_start_value     = input.float(0.0,  "Start Value",       step=0.1, tooltip="0=auto, >0=long, <0=short", group="Genişletilmiş SAR")
i_offset_reverse  = input.float(0.0,  "Offset on Reverse", minval=0.0, step=0.1, group="Genişletilmiş SAR")
i_af_init_long    = input.float(0.002, "AF Init Long",      minval=0.0, maxval=1.0, step=0.001, group="Genişletilmiş SAR")
i_af_long         = input.float(0.02, "AF Long",           minval=0.0, maxval=1.0, step=0.001, group="Genişletilmiş SAR")
i_af_max_long     = input.float(0.20, "AF Max Long",       minval=0.0, maxval=1.0, step=0.01, group="Genişletilmiş SAR")
i_af_init_short   = input.float(0.002, "AF Init Short",     minval=0.0, maxval=1.0, step=0.001, group="Genişletilmiş SAR")
i_af_short        = input.float(0.02, "AF Short",          minval=0.0, maxval=1.0, step=0.001, group="Genişletilmiş SAR")
i_af_max_short    = input.float(0.20, "AF Max Short",      minval=0.0, maxval=1.0, step=0.01, group="Genişletilmiş SAR")

sarext_val = sarext(i_start_value, i_offset_reverse,
                    i_af_init_long, i_af_long, i_af_max_long,
                    i_af_init_short, i_af_short, i_af_max_short)

sar_abs = math.abs(sarext_val)
sar_long  = sarext_val > 0 ? sar_abs : na
sar_short = sarext_val < 0 ? sar_abs : na

plot(sar_long,  "+1 (Sarext)",  color=color.white, style=plot.style_linebr, linewidth=3)
plot(sar_short, "-1 (Sarext)", color=color.aqua,   style=plot.style_linebr, linewidth=3)

// ==========================================
// 9. KUSURSUZ MÜHÜRLER VE SİNYAL HAFIZASI (GÖRÜNÜR)
// ==========================================
var int sinyal_durumu = 0 
var string son_yon = "BEKLENİYOR"
var float son_sinyal_fiyati = na

if barstate.isconfirmed 
    if ittifak_AL and sinyal_durumu != 1
        sinyal_durumu := 1
        son_yon := "MİZAN+ST AL"
        son_sinyal_fiyati := close
    if ittifak_SAT and sinyal_durumu != -1
        sinyal_durumu := -1
        son_yon := "MİZAN+ST SAT"
        son_sinyal_fiyati := close

plotshape(ittifak_AL,  title="İttifak AL",  text="AL",  style=shape.labelup,   location=location.belowbar, color=color.rgb(0, 230, 119), textcolor=color.white, size=size.normal)
plotshape(ittifak_SAT, title="İttifak SAT", text="SAT", style=shape.labeldown, location=location.abovebar, color=color.rgb(255, 82, 82), textcolor=color.white, size=size.normal)

// ==========================================
// 10. KAPTAN KÖŞKÜ (DASHBOARD TABLOSU)
// ==========================================
var table dash = table.new(position.top_right, 3, 15, border_width = 1, border_color = color.new(color.gray, 80))

if barstate.islast
    table.cell(dash, 0, 0, "Kaptan Köşkü (Mizan Motoru)", text_color=color.white, bgcolor=color.new(color.black, 20), text_size=size.normal, text_halign=text.align_center)
    table.merge_cells(dash, 0, 0, 2, 0)
    
    string vites_txt = psar_vitesi == 1 ? "1 (BEKLE)" : psar_vitesi == 2 ? "2 (HAZIR)" : "3 (HÜCUM)"
    color vites_col  = psar_vitesi == 1 ? color.red : psar_vitesi == 2 ? color.yellow : color.lime
    table.cell(dash, 0, 1, "PSAR Vites:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 1, vites_txt, text_color=vites_col, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 1, 2, 1)

    table.cell(dash, 0, 2, "Anlık Fiyat:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 2, str.tostring(close, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 2, 2, 2)

    string sig_text = son_yon == "BEKLENİYOR" ? "YOK" : son_yon + " @ " + str.tostring(son_sinyal_fiyati, format.mintick)
    color sig_color = son_yon == "MİZAN+ST AL" ? color.lime : son_yon == "MİZAN+ST SAT" ? color.red : color.gray
    table.cell(dash, 0, 3, "Son İttifak:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 3, sig_text, text_color=sig_color, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 3, 2, 3)

    string ayna_durum = (oz_st_yon == 1 and mizan_AL_onayi) ? "AL ONAYLI (YÜKSELİŞ)" : (oz_st_yon == -1 and mizan_SAT_onayi) ? "SAT ONAYLI (DÜŞÜŞ)" : "MİZAN VETOSU (BEKLE)"
    color ayna_renk = (oz_st_yon == 1 and mizan_AL_onayi) ? color.lime : (oz_st_yon == -1 and mizan_SAT_onayi) ? color.red : color.gray
    table.cell(dash, 0, 4, "Sistem Durumu:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 4, ayna_durum, text_color=ayna_renk, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 4, 2, 4)

    table.cell(dash, 0, 5, "Evreka Direnç (+):", text_color=color.teal, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 5, str.tostring(evreka_tepe, format.mintick), text_color=color.teal, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 5, 2, 5)

    table.cell(dash, 0, 6, "Evreka Destek (-):", text_color=color.maroon, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 6, str.tostring(evreka_dip, format.mintick), text_color=color.maroon, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 6, 2, 6)

    table.cell(dash, 0, 7, "--- Aİ-HIZLI MOTOR ---", text_color=color.yellow, bgcolor=color.new(color.black, 20), text_halign=text.align_center)
    table.merge_cells(dash, 0, 7, 2, 7)

    table.cell(dash, 0, 8, "M1:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 8, str.tostring(s_fast_1, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 8, close > s_fast_1 ? "AL" : "SAT", text_color=close > s_fast_1 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 9, "M2:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 9, str.tostring(s_fast_2, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 9, close > s_fast_2 ? "AL" : "SAT", text_color=close > s_fast_2 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 10, "M3:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 10, str.tostring(s_fast_3, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 10, close > s_fast_3 ? "AL" : "SAT", text_color=close > s_fast_3 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

// İMZA
var table ytd_table = table.new(position.bottom_center, 1, 1)
if barstate.islast
    table.cell(ytd_table, 0, 0, "(Aİ) eğitim çalışmasıdır. Yatırım tavsiyesi KULLANILAMAZ.", text_color=color.new(color.white, 50), text_size=size.small) 

[@yörük@]

//@version=6
indicator(":]", overlay=true, max_lines_count=50, max_labels_count=500)
// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 1. AYARLAR VE DL ATMOSFER GÜCÜ                                               │
// └──────────────────────────────────────────────────────────────────────────────┘
float ayar_genislik = input.float(0.3, "Genişlik (0.1 - 2.0)", minval=0.1, maxval=2.0, step=0.1)

// Çitanın Kalbi (Merkez Motor - Tazyik Barajları)
float s_fast_1 = ta.sar(0.01, 0.01, 0.2) 
float s_fast_12 = ta.sar(0.08, 0.05, 0.2) 

// Sinir Ağlarından Gelen Gerilme Gücü (DL Modülü)
tanh_fn(v) => (1 - math.exp(-2 * v)) / (1 + math.exp(-2 * v))
td_fn(s)   => nz((s - nz(s[1])) / nz(s[1]))

float in_o = tanh_fn(td_fn(open))
float in_h = tanh_fn(td_fn(high))
float in_l = tanh_fn(td_fn(low))
float in_c = tanh_fn(td_fn(close))

float h0 = tanh_fn((in_o * 22.4271) + (in_h * -26.6917) + (in_l * 4.9371) + (in_c * 9.0349) - 10.6929)
float h1 = tanh_fn((in_o * -38.2880) + (in_h * 10.0500) + (in_l * -44.7063) + (in_c * -17.8163) + 30.5662)
float h2 = tanh_fn((in_o * -33.9954) + (in_h * 14.5017) + (in_l * -43.2865) + (in_c * -13.3874) + 24.7080)
float h3 = tanh_fn((in_o * -14.3929) + (in_h * 28.4830) + (in_l * -22.9793) + (in_c * -7.6582) - 5.6505)
float h4 = tanh_fn((in_o * 28.8379) + (in_h * -26.3544) + (in_l * 0.5206) + (in_c * 25.0049) - 17.8832)
float h5 = tanh_fn((in_o * -4.8113) + (in_h * -4.0364) + (in_l * -8.3327) + (in_c * -1.1571) + 0.4667)

float dl_val = tanh_fn((h0 * -22.0533) + (h1 * 3.6525) + (h2 * -4.3904) + (h3 * 2.1030) + (h4 * 20.0272) + (h5 * 11.5101) - 0.4150)
float ai_factor = (0.2 + (math.abs(dl_val) * 0.5)) * ayar_genislik

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 2. MTK-3 İÇ VE DIŞ KALKANLAR (ÇİTANIN MENZİLİ)                               │
// └──────────────────────────────────────────────────────────────────────────────┘
float baz_mesafe = math.abs(close - s_fast_1) * ai_factor
float merkez = s_fast_1 

float baz_mesafe12 = math.abs(close - s_fast_12) * ai_factor
float merkez12 = s_fast_12 

float ic_ust = merkez + (baz_mesafe * 0.3)
float ic_alt = merkez - (baz_mesafe * 0.3)

float dis_ust = merkez + (baz_mesafe * 1.0)
float dis_alt = merkez - (baz_mesafe * 1.0)

float dist_1 = math.abs(close - s_fast_1) * ai_factor
float l1_top = close + dist_1
float l1_bot = close - dist_1

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 3. GÖRSEL ŞAHİTLİK (KALKANLAR VE ÇEKİRDEK)                                   │
// └──────────────────────────────────────────────────────────────────────────────┘
plot(merkez, "Yavaş", color=color.new(color.white, 00), style=plot.style_cross, linewidth=2)
plot(merkez12, "Hızlı", color=color.new(color.blue, 00), style=plot.style_cross, linewidth=2)

p1_top = plot(l1_top, "Üst", display=display.none)
p1_bot = plot(l1_bot, "Alt", display=display.none)

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 4. MİZAN (DENGE) HATTI (GECİKMESİZ VE GÖRSEL)                                │
// └──────────────────────────────────────────────────────────────────────────────┘
var int sar_yon = 0
sar_yon := close > s_fast_1 ? 1 : close < s_fast_1 ? -1 : nz(sar_yon[1])
bool sar_dondu = sar_yon != nz(sar_yon[1])

var float sar_eski_vurus = na
var float sar_son_vurus  = na

if sar_dondu
    sar_eski_vurus := nz(sar_son_vurus, s_fast_1) 
    sar_son_vurus  := s_fast_1                    

float mizan_hatti = (sar_eski_vurus + sar_son_vurus) / 2
plot(mizan_hatti, "Denge", color=color.new(color.orange, 100), style=plot.style_linebr, linewidth=2)

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 5. SCALPING VUR-KAÇ MANTIĞI                                                  │
// └──────────────────────────────────────────────────────────────────────────────┘
bool scalping_AL_Gir  = ta.crossover(close, ic_ust) and (close > mizan_hatti)
bool scalping_SAT_Gir = ta.crossunder(close, ic_alt) and (close < mizan_hatti)

bool scalping_AL_Cik  = high >= dis_ust
bool scalping_SAT_Cik = low <= dis_alt

// ┌────────────────────────────── 6. İÇSEL TAZYİK VE MTK-3 KIRILIM ──────────────┐
float sarStart = input.float(0.02, "Basınç Başlangıcı")
float sarInc   = input.float(0.02, "Basınç İvmesi")
float sarMax   = input.float(0.2, "Maksimum Tazyik")
float psarVal  = ta.sar(sarStart, sarInc, sarMax)

int direncPeriyodu = input.int(2, "Kapakçık (Sınır) Periyodu")
float ustKapak = ta.highest(high, direncPeriyodu)[1]
float altKapak = ta.lowest(low, direncPeriyodu)[1]  

bool ciftKirilimAtim    = ta.crossover(close, psarVal) and (close > ustKapak)
bool ciftKirilimGevseme = ta.crossunder(close, psarVal) and (close < altKapak)

plot(psarVal, "@yörük@", style=plot.style_cross, color=close > psarVal ? color.yellow : color.red, linewidth=2)

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 7. ÇİFT AYNALI OMURGA MOTORU (12 ve 32 KESİŞİM MANTIĞI)                      │
// └──────────────────────────────────────────────────────────────────────────────┘
float s_start_sabit = 0.02
float s_inc_sabit   = 0.02
float s_max_sabit   = 0.2

f_katman_ana(_start, _inc, _max, _smooth) =>
    float _sar = ta.sar(_start, _inc, _max)
    float _delta = math.abs(close - _sar)
    bool _is_up  = close > _sar
    float _raw_mirror = _is_up ? close + _delta : close - _delta
    ta.hma(_raw_mirror, _smooth)

// GÜNEŞ (32) VE AY (12) YÖRÜNGELERİ
float ayna_12 = f_katman_ana(s_start_sabit, s_inc_sabit, s_max_sabit, 45)
float ayna_32 = f_katman_ana(s_start_sabit, s_inc_sabit, s_max_sabit, 55)

float s_slow_1 = ta.sar(0.02, 0.02, 0.2)
float s_slow_2 = ta.sar(0.015, 0.015, 0.15)
float s_slow_3 = ta.sar(0.01, 0.01, 0.1)

float s_fast_2 = ta.sar(0.01, 0.05, 0.2)
float s_fast_3 = ta.sar(0.04, 0.04, 0.2)
float avg_fast = (s_fast_1 + s_fast_2 + s_fast_3) / 3

bool all_fast_below = (close > s_fast_1) and (close > s_fast_2) and (close > s_fast_3) 
bool all_fast_above = (close < s_fast_1) and (close < s_fast_2) and (close < s_fast_3) 

int kalkan = 0
if close > s_fast_1 
    kalkan += 1
if close > s_fast_2 
    kalkan += 1
if close > s_fast_3 
    kalkan += 1
if close < s_fast_1 and close < avg_fast
    kalkan += 1
if close < s_fast_2 and close < avg_fast
    kalkan += 1
if close < s_fast_3 and close < avg_fast
    kalkan += 1

color bar_col = na
if kalkan >= 3
    bar_col := close > avg_fast ? color.rgb(0, 230, 119, 00) : color.rgb(255, 82, 82, 00)
else if kalkan == 2
    bar_col := color.rgb(3, 36, 249, 00)
else
    bar_col := color.rgb(223, 64, 251, 00)

barcolor(bar_col)

// AYNA 12 (AY) RENK MANTIĞI
bool makro_al_12 = ayna_12 > close
color col_ayna_12 = makro_al_12 ? (ayna_12 < ayna_12[1] ? color.blue : color.lime) : (ayna_12 > ayna_12[1] ? color.yellow : color.red)

// AYNA 32 (GÜNEŞ) RENK MANTIĞI
bool makro_al_32 = ayna_32 > close
color col_ayna_32 = makro_al_32 ? (ayna_32 < ayna_32[1] ? color.blue : color.lime) : (ayna_32 > ayna_32[1] ? color.yellow : color.red)

// HİZALANMA DURUMLARI
bool is_sari_12 = col_ayna_12 == color.yellow
bool is_mavi_12 = col_ayna_12 == color.blue
bool is_sari_32 = col_ayna_32 == color.yellow
bool is_mavi_32 = col_ayna_32 == color.blue

bool ikisi_sari = is_sari_12 and is_sari_32
bool ikisi_mavi = is_mavi_12 and is_mavi_32

var int sinyal_durumu = 0 
var string son_yon = "BEKLENİYOR"
var float son_sinyal_fiyati = na

if barstate.isconfirmed 
    if ikisi_sari and sinyal_durumu != 1
        sinyal_durumu := 1
        son_yon := "AL (Çift Sarı)"
        son_sinyal_fiyati := close
    if ikisi_mavi and sinyal_durumu != -1
        sinyal_durumu := -1
        son_yon := "SAT (Çift Mavi)"
        son_sinyal_fiyati := close

// AYNANIN EKRANA ÇİZİMİ
plot(ayna_12, "AynaÖncü", color=col_ayna_12, linewidth=2, style=plot.style_stepline)
plot(ayna_32, "AynaSon", color=col_ayna_32, linewidth=3, style=plot.style_stepline)

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ X. PSAR MOTORUNA BAĞLI VİTES OKLARI (ATIN DÖRTNALA KALKIŞI)                  │
// └──────────────────────────────────────────────────────────────────────────────┘
int bull_sar_sayisi = (close > s_fast_1 ? 1 : 0) + (close > s_fast_2 ? 1 : 0) + (close > s_fast_3 ? 1 : 0)
int bear_sar_sayisi = (close < s_fast_1 ? 1 : 0) + (close < s_fast_2 ? 1 : 0) + (close < s_fast_3 ? 1 : 0)

bool ok_yukari = bull_sar_sayisi > bear_sar_sayisi
bool ok_asagi  = bear_sar_sayisi > bull_sar_sayisi

int psar_vitesi = math.max(bull_sar_sayisi, bear_sar_sayisi)
color ok_rengi = psar_vitesi == 1 ? color.new(color.red, 0) : psar_vitesi == 2 ? color.new(color.yellow, 0) : color.new(color.lime, 0)

plotshape(ok_yukari, title="PSAR Yukarı", style=shape.arrowup,   location=location.belowbar, color=ok_rengi, size=size.small)
plotshape(ok_asagi,  title="PSAR Aşağı",  style=shape.arrowdown, location=location.abovebar, color=ok_rengi, size=size.small)

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 8. ÇİFT YÖNLÜ EVREKA MANTIĞI VE OTO DESTEK/DİRENÇ                            │
// └──────────────────────────────────────────────────────────────────────────────┘
var float evreka_tepe = close
var float evreka_dip  = close

if all_fast_below
    evreka_tepe := math.max(evreka_tepe, l1_top)
if all_fast_above
    evreka_dip := math.min(evreka_dip, l1_bot)

if ta.crossunder(close, s_slow_1)
    evreka_tepe := l1_top
    
if ta.crossover(close, s_slow_1)
    evreka_dip := l1_bot

plot(evreka_tepe, "+1", color=color.new(color.teal, 100), style=plot.style_linebr, linewidth=2)
plot(evreka_dip, "-1", color=color.new(color.maroon, 100), style=plot.style_linebr, linewidth=2)

// ┌──────────────────────────────────────────────────────────────────────────────┐
// │ 9. KOMUTA MERKEZİ (DASHBOARD)                                                │
// └──────────────────────────────────────────────────────────────────────────────┘
var table dash = table.new(position.top_right, 3, 15, border_width = 1, border_color = color.new(color.gray, 80))

if barstate.islast
    table.cell(dash, 0, 0, "Strateji (Bot) Test Modu", text_color=color.white, bgcolor=color.new(color.black, 20), text_size=size.normal, text_halign=text.align_center)
    table.merge_cells(dash, 0, 0, 2, 0)
    
    string vites_txt = psar_vitesi == 1 ? "1 (BEKLE)" : psar_vitesi == 2 ? "2 (HAZIR)" : "3 (DEVAM)"
    color vites_col  = psar_vitesi == 1 ? color.red : psar_vitesi == 2 ? color.yellow : color.lime
    table.cell(dash, 0, 1, "Durum:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 1, vites_txt, text_color=vites_col, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 1, 2, 1)

    table.cell(dash, 0, 2, "Fiyat:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 2, str.tostring(close, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 2, 2, 2)

    string sig_text = son_yon == "BEKLENİYOR" ? "YOK" : son_yon + " @ " + str.tostring(son_sinyal_fiyati, format.mintick)
    color sig_color = son_yon == "AL (Çift Sarı)" ? color.yellow : son_yon == "SAT (Çift Mavi)" ? color.blue : color.gray
    table.cell(dash, 0, 3, "Son Sinyal:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 3, sig_text, text_color=sig_color, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 3, 2, 3)

    // Ayna Durumunu Tabloya Ekleme
    string ayna_durum = ikisi_sari ? "ÇİFT SARI (YÜKSELİŞ)" : ikisi_mavi ? "ÇİFT MAVİ (DÜŞÜŞ)" : "KARIŞIK (BEKLE)"
    color ayna_renk = ikisi_sari ? color.yellow : ikisi_mavi ? color.blue : color.gray
    table.cell(dash, 0, 4, "Aynalar:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 4, ayna_durum, text_color=ayna_renk, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 4, 2, 4)

    table.cell(dash, 0, 5, "Oto Direnç (+1):", text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 5, str.tostring(evreka_tepe, format.mintick), text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 5, 2, 5)

    table.cell(dash, 0, 6, "Oto Destek (-1):", text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 6, str.tostring(evreka_dip, format.mintick), text_color=color.fuchsia, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.merge_cells(dash, 1, 6, 2, 6)

    table.cell(dash, 0, 7, "--- Aİ-HIZLI (@yörük@) ---", text_color=color.yellow, bgcolor=color.new(color.black, 20), text_halign=text.align_center)
    table.merge_cells(dash, 0, 7, 2, 7)

    table.cell(dash, 0, 8, "1:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 8, str.tostring(s_fast_1, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 8, close > s_fast_1 ? "AL" : "SAT", text_color=close > s_fast_1 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 9, "2:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 9, str.tostring(s_fast_2, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 9, close > s_fast_2 ? "AL" : "SAT", text_color=close > s_fast_2 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 10, "3:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 10, str.tostring(s_fast_3, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 10, close > s_fast_3 ? "AL" : "SAT", text_color=close > s_fast_3 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 11, "--- Aİ-YAVAŞ (@yörük@) ---", text_color=color.yellow, bgcolor=color.new(color.black, 20), text_halign=text.align_center)
    table.merge_cells(dash, 0, 11, 2, 11)

    table.cell(dash, 0, 12, "4:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 12, str.tostring(s_slow_1, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 12, close > s_slow_1 ? "AL" : "SAT", text_color=close > s_slow_1 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 13, "5:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 13, str.tostring(s_slow_2, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 13, close > s_slow_2 ? "AL" : "SAT", text_color=close > s_slow_2 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

    table.cell(dash, 0, 14, "6:", text_color=color.gray, bgcolor=color.new(color.black, 40), text_halign=text.align_left)
    table.cell(dash, 1, 14, str.tostring(s_slow_3, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 40), text_halign=text.align_right)
    table.cell(dash, 2, 14, close > s_slow_3 ? "AL" : "SAT", text_color=close > s_slow_3 ? color.lime : color.red, bgcolor=color.new(color.black, 40), text_halign=text.align_center)

var table ytd_table = table.new(position.bottom_center, 1, 1)
if barstate.islast
    table.cell(ytd_table, 0, 0, "(Aİ) - Eğitim çalışmasıdır. Yatırım tavsiyesi KULLANILAMAZ.", text_color=color.new(color.white, 00), text_size=size.normal) 

[@yörük@]

#3071 nolu mesajdan itibaren...
paylaşılan kod örnekleri....
yapay zeka ile yazılmaya çalışılan... kod denemeleridir.

farklı kalıplar içerir. denemek isteyen...kendini geliştirmek isteyenler...
için eğitim amaçlı paylaşılmıştır.

belki faydalanan olur... herkese selamlar....

[@yörük@]

//@version=6
indicator("Çift Çıplak Ayna [Saf Çizgi]", overlay=true)

// ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€
//  1. GİRDİLER 
// ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€
h_start = input.float(0.06, "Hızlı SAR Başlangıç", step=0.01, group="Hızlı Ayna (Kalın)")
h_inc   = input.float(0.06, "Hızlı SAR İvme", step=0.01, group="Hızlı Ayna (Kalın)")
h_max   = input.float(0.30, "Hızlı SAR Max", step=0.1, group="Hızlı Ayna (Kalın)")

y_start = input.float(0.01, "Yavaş SAR Başlangıç", step=0.005, group="Yavaş Ayna (İnce)")
y_inc   = input.float(0.01, "Yavaş SAR İvme", step=0.005, group="Yavaş Ayna (İnce)")
y_max   = input.float(0.10, "Yavaş SAR Max", step=0.1, group="Yavaş Ayna (İnce)")

// ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€
//  2. GELİŞMİŞ LONESOME SAR MOTORU
// ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€
f_ozel_sar(src_h, src_l, _start, _inc, _max, _reset_hiz) =>
    var int trend = 0
    var float sar_val = 0.0
    var float ep = 0.0
    var float af = 0.0

    if trend == 0 and not na(src_h[1])
        trend   := src_h >= src_h[1] or src_l >= src_l[1] ? 1 : -1
        sar_val := trend > 0 ? src_l[1] : src_h[1]
        ep      := trend > 0 ? src_h[1] : src_l[1]
        af      := _start
    else 
        if _reset_hiz
            af := _start

        float nextsar = sar_val
        if trend > 0
            if src_h[1] > ep
                ep := src_h[1]
                af := math.min(_max, af + _inc)
            
            nextsar := sar_val + af * (ep - sar_val)
            nextsar := math.min(math.min(src_l[1], src_l[2]), nextsar)
            
            if nextsar > src_l
                trend   := -1
                nextsar := ep
                ep      := src_l
                af      := _start
        else 
            if src_l[1] < ep
                ep := src_l[1]
                af := math.min(_max, af + _inc)
            
            nextsar := sar_val + af * (ep - sar_val)
            nextsar := math.max(math.max(src_h[1], src_h[2]), nextsar)
            
            if nextsar < src_h
                trend   := 1
                nextsar := ep
                ep      := src_h
                af      := _start
                
        sar_val := nextsar
    
    [sar_val, trend]

// ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€
//  3. ÇIPLAK AYNA HESAPLAMASI
// ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€
yeni_gun = ta.change(time("D")) != 0

// Hızlı Ayna
[sar_hizli, trend_hizli] = f_ozel_sar(high, low, h_start, h_inc, h_max, yeni_gun)
ayna_hizli = trend_hizli > 0 ? close + math.abs(close - sar_hizli) : close - math.abs(close - sar_hizli)

// Yavaş Ayna
[sar_yavas, trend_yavas] = f_ozel_sar(high, low, y_start, y_inc, y_max, yeni_gun)
ayna_yavas = trend_yavas > 0 ? close + math.abs(close - sar_yavas) : close - math.abs(close - sar_yavas)

// ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€
//  4. RENK VE ÇİZİMLER
// ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€ââ€�€
bool hizli_yesil = ayna_hizli > close
bool yavas_yesil = ayna_yavas > close

color col_hizli = hizli_yesil ? color.lime : color.red
color col_yavas = yavas_yesil ? color.lime : color.red

plot(ayna_hizli, title="Trend", color=col_hizli, style=plot.style_line, linewidth=1)
//plot(ayna_yavas, title="Yavaş Ayna", color=col_yavas, style=plot.style_line, linewidth=1) 

[@yörük@]

//@version=6
indicator("30'lu Modüler SAR Radarı", overlay=true)

// ─────────────────────────────────────────────────────────────────
//  0. TABLO KONUM AYARI (YAN YANA DİZMEK İÇİN)
// ─────────────────────────────────────────────────────────────────
grp_pos = "Tablo Konumu ve Yerleşimi"
pos_secim = input.string("Sağ Alt", title="Tabloyu Nereye Koyalım?", options=["Sol Alt", "Orta Alt", "Sağ Alt"], group=grp_pos, tooltip="Aynı indikatörü 3 kere ekleyip her birini farklı konuma alarak 90 varlık izleyebilirsiniz.")

var pos_konum = pos_secim == "Sol Alt" ? position.bottom_left : pos_secim == "Orta Alt" ? position.bottom_center : position.bottom_right

// ─────────────────────────────────────────────────────────────────
//  1. GİRDİLER (30 Farklı Varlık - Ayarlardan Değiştirilebilir)
// ─────────────────────────────────────────────────────────────────
grp1 = "Varlıklar 1-10"
s01 = input.symbol("BIST:THYAO", "01", group=grp1, inline="1")
s02 = input.symbol("BIST:TUPRS", "02", group=grp1, inline="1")
s03 = input.symbol("BIST:ASELS", "03", group=grp1, inline="2")
s04 = input.symbol("BIST:KCHOL", "04", group=grp1, inline="2")
s05 = input.symbol("BIST:EREGL", "05", group=grp1, inline="3")
s06 = input.symbol("BIST:AKBNK", "06", group=grp1, inline="3")
s07 = input.symbol("BIST:YKBNK", "07", group=grp1, inline="4")
s08 = input.symbol("BIST:ISCTR", "08", group=grp1, inline="4")
s09 = input.symbol("BIST:GARAN", "09", group=grp1, inline="5")
s10 = input.symbol("BIST:SAHOL", "10", group=grp1, inline="5")

grp2 = "Varlıklar 11-20"
s11 = input.symbol("BIST:SISE",  "11", group=grp2, inline="6")
s12 = input.symbol("BIST:PETKM", "12", group=grp2, inline="6")
s13 = input.symbol("BIST:BIMAS", "13", group=grp2, inline="7")
s14 = input.symbol("BIST:PGSUS", "14", group=grp2, inline="7")
s15 = input.symbol("BIST:FROTO", "15", group=grp2, inline="8")
s16 = input.symbol("BIST:TOASO", "16", group=grp2, inline="8")
s17 = input.symbol("BIST:TCELL", "17", group=grp2, inline="9")
s18 = input.symbol("BIST:TTKOM", "18", group=grp2, inline="9")
s19 = input.symbol("BIST:ENKAI", "19", group=grp2, inline="10")
s20 = input.symbol("BIST:KOZAL", "20", group=grp2, inline="10")

grp3 = "Varlıklar 21-30"
s21 = input.symbol("BIST:HEKTS", "21", group=grp3, inline="11")
s22 = input.symbol("BIST:SASA",  "22", group=grp3, inline="11")
s23 = input.symbol("BIST:ASTOR", "23", group=grp3, inline="12")
s24 = input.symbol("BIST:ALARK", "24", group=grp3, inline="12")
s25 = input.symbol("BIST:TAVHL", "25", group=grp3, inline="13")
s26 = input.symbol("BIST:DOAS",  "26", group=grp3, inline="13")
s27 = input.symbol("BIST:MGROS", "27", group=grp3, inline="14")
s28 = input.symbol("BIST:OTKAR", "28", group=grp3, inline="14")
s29 = input.symbol("BIST:VESBE", "29", group=grp3, inline="15")
s30 = input.symbol("BIST:ARCLK", "30", group=grp3, inline="15")

// ─────────────────────────────────────────────────────────────────
//  2. MTK-1-2-3 DAİRE FORMLU PSAR MOTORU
// ─────────────────────────────────────────────────────────────────
f_ozel_sar(src_h, src_l, _start, _inc, _max, _reset_hiz) =>
    var int trend = 0
    var float sar_val = 0.0
    var float ep = 0.0
    var float af = 0.0

    if trend == 0 and not na(src_h[1])
        trend   := src_h >= src_h[1] or src_l >= src_l[1] ? 1 : -1
        sar_val := trend > 0 ? src_l[1] : src_h[1]
        ep      := trend > 0 ? src_h[1] : src_l[1]
        af      := _start
    else 
        if _reset_hiz
            af := _start

        float nextsar = sar_val
        if trend > 0
            if src_h[1] > ep
                ep := src_h[1]
                af := math.min(_max, af + _inc)
            
            nextsar := sar_val + af * (ep - sar_val)
            nextsar := math.min(math.min(src_l[1], src_l[2]), nextsar)
            
            if nextsar > src_l
                trend   := -1
                nextsar := ep
                ep      := src_l
                af      := _start
        else 
            if src_l[1] < ep
                ep := src_l[1]
                af := math.min(_max, af + _inc)
            
            nextsar := sar_val + af * (ep - sar_val)
            nextsar := math.max(math.max(src_h[1], src_h[2]), nextsar)
            
            if nextsar < src_h
                trend   := 1
                nextsar := ep
                ep      := src_h
                af      := _start
                
        sar_val := nextsar
    
    [sar_val, trend]

// ─────────────────────────────────────────────────────────────────
//  3. KAPSÜLLENMİŞ ÇOKLU SAR SORGUSU
// ─────────────────────────────────────────────────────────────────
f_sar_data() =>
    yeni_gun = ta.change(time("D")) != 0
    
    [sar_hizli, _] = f_ozel_sar(high, low, 0.06, 0.06, 0.30, yeni_gun)
    [sar_orta, _]  = f_ozel_sar(high, low, 0.02, 0.02, 0.20, yeni_gun)
    [sar_yavas, _] = f_ozel_sar(high, low, 0.01, 0.01, 0.10, yeni_gun)

    is_hizli_up = close > sar_hizli
    is_orta_up  = close > sar_orta
    is_yavas_up = close > sar_yavas
    
    [sar_hizli, sar_orta, sar_yavas, is_hizli_up, is_orta_up, is_yavas_up]

// ─────────────────────────────────────────────────────────────────
//  4. 30 VARLIKTAN KUSURSUZ VERİ ÇEKİMİ
// ─────────────────────────────────────────────────────────────────
[vh01, vo01, vy01, bh01, bo01, by01] = request.security(s01, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh02, vo02, vy02, bh02, bo02, by02] = request.security(s02, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh03, vo03, vy03, bh03, bo03, by03] = request.security(s03, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh04, vo04, vy04, bh04, bo04, by04] = request.security(s04, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh05, vo05, vy05, bh05, bo05, by05] = request.security(s05, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh06, vo06, vy06, bh06, bo06, by06] = request.security(s06, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh07, vo07, vy07, bh07, bo07, by07] = request.security(s07, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh08, vo08, vy08, bh08, bo08, by08] = request.security(s08, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh09, vo09, vy09, bh09, bo09, by09] = request.security(s09, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh10, vo10, vy10, bh10, bo10, by10] = request.security(s10, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh11, vo11, vy11, bh11, bo11, by11] = request.security(s11, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh12, vo12, vy12, bh12, bo12, by12] = request.security(s12, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh13, vo13, vy13, bh13, bo13, by13] = request.security(s13, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh14, vo14, vy14, bh14, bo14, by14] = request.security(s14, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh15, vo15, vy15, bh15, bo15, by15] = request.security(s15, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh16, vo16, vy16, bh16, bo16, by16] = request.security(s16, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh17, vo17, vy17, bh17, bo17, by17] = request.security(s17, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh18, vo18, vy18, bh18, bo18, by18] = request.security(s18, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh19, vo19, vy19, bh19, bo19, by19] = request.security(s19, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh20, vo20, vy20, bh20, bo20, by20] = request.security(s20, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh21, vo21, vy21, bh21, bo21, by21] = request.security(s21, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh22, vo22, vy22, bh22, bo22, by22] = request.security(s22, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh23, vo23, vy23, bh23, bo23, by23] = request.security(s23, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh24, vo24, vy24, bh24, bo24, by24] = request.security(s24, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh25, vo25, vy25, bh25, bo25, by25] = request.security(s25, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh26, vo26, vy26, bh26, bo26, by26] = request.security(s26, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh27, vo27, vy27, bh27, bo27, by27] = request.security(s27, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh28, vo28, vy28, bh28, bo28, by28] = request.security(s28, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh29, vo29, vy29, bh29, bo29, by29] = request.security(s29, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)
[vh30, vo30, vy30, bh30, bo30, by30] = request.security(s30, timeframe.period, f_sar_data(), lookahead=barmerge.lookahead_off)

// ─────────────────────────────────────────────────────────────────
//  5. DEVASA TABLO OLUŞTURMA VE DOLDURMA MOTORU
// ─────────────────────────────────────────────────────────────────
var string tab_size = size.small
// pos_konum değişkeni sayesinde tabloyu ayarlardan nereye seçtiysen oraya çizer
var table radar = table.new(pos_konum, 5, 31, border_width=1, border_color=color.gray)

f_hucre_boya(is_up) =>
    is_up ? color.new(color.lime, 40) : color.new(color.red, 40)

f_karar_ver(h_up, o_up, y_up) =>
    if h_up and o_up and y_up
        ["TAM HÜCUM", color.new(color.lime, 10)]
    else if not h_up and not o_up and not y_up
        ["GERİ ÇEKİL", color.new(color.red, 10)]
    else
        ["BEKLE", color.new(color.gray, 10)]

f_satir_ekle(r_idx, sym, vh, vo, vy, b_h, b_o, b_y) =>
    [karar, col] = f_karar_ver(b_h, b_o, b_y)
    sym_isim = str.split(sym, ":").last()

    val_h_str = str.tostring(vh, format.mintick) + (b_h ? " ▲" : " ▼")
    val_o_str = str.tostring(vo, format.mintick) + (b_o ? " ▲" : " ▼")
    val_y_str = str.tostring(vy, format.mintick) + (b_y ? " ▲" : " ▼")

    table.cell(radar, 0, r_idx, sym_isim, text_color=color.white, bgcolor=color.black, text_size=tab_size)
    table.cell(radar, 1, r_idx, val_h_str, text_color=color.white, bgcolor=f_hucre_boya(b_h), text_size=tab_size)
    table.cell(radar, 2, r_idx, val_o_str, text_color=color.white, bgcolor=f_hucre_boya(b_o), text_size=tab_size)
    table.cell(radar, 3, r_idx, val_y_str, text_color=color.white, bgcolor=f_hucre_boya(b_y), text_size=tab_size)
    table.cell(radar, 4, r_idx, karar, text_color=color.white, bgcolor=col, text_size=tab_size)

if barstate.islast
    // Başlıklar
    table.cell(radar, 0, 0, "VARLIK", text_color=color.white, bgcolor=color.black, text_size=tab_size)
    table.cell(radar, 1, 0, "HIZLI SAR",  text_color=color.white, bgcolor=color.black, text_size=tab_size)
    table.cell(radar, 2, 0, "ORTA SAR",   text_color=color.white, bgcolor=color.black, text_size=tab_size)
    table.cell(radar, 3, 0, "YAVAŞ SAR",  text_color=color.white, bgcolor=color.black, text_size=tab_size)
    table.cell(radar, 4, 0, "KARAR",  text_color=color.white, bgcolor=color.black, text_size=tab_size)

    // 30 Satırın Çizdirilmesi
    f_satir_ekle(1,  s01, vh01, vo01, vy01, bh01, bo01, by01)
    f_satir_ekle(2,  s02, vh02, vo02, vy02, bh02, bo02, by02)
    f_satir_ekle(3,  s03, vh03, vo03, vy03, bh03, bo03, by03)
    f_satir_ekle(4,  s04, vh04, vo04, vy04, bh04, bo04, by04)
    f_satir_ekle(5,  s05, vh05, vo05, vy05, bh05, bo05, by05)
    f_satir_ekle(6,  s06, vh06, vo06, vy06, bh06, bo06, by06)
    f_satir_ekle(7,  s07, vh07, vo07, vy07, bh07, bo07, by07)
    f_satir_ekle(8,  s08, vh08, vo08, vy08, bh08, bo08, by08)
    f_satir_ekle(9,  s09, vh09, vo09, vy09, bh09, bo09, by09)
    f_satir_ekle(10, s10, vh10, vo10, vy10, bh10, bo10, by10)
    f_satir_ekle(11, s11, vh11, vo11, vy11, bh11, bo11, by11)
    f_satir_ekle(12, s12, vh12, vo12, vy12, bh12, bo12, by12)
    f_satir_ekle(13, s13, vh13, vo13, vy13, bh13, bo13, by13)
    f_satir_ekle(14, s14, vh14, vo14, vy14, bh14, bo14, by14)
    f_satir_ekle(15, s15, vh15, vo15, vy15, bh15, bo15, by15)
    f_satir_ekle(16, s16, vh16, vo16, vy16, bh16, bo16, by16)
    f_satir_ekle(17, s17, vh17, vo17, vy17, bh17, bo17, by17)
    f_satir_ekle(18, s18, vh18, vo18, vy18, bh18, bo18, by18)
    f_satir_ekle(19, s19, vh19, vo19, vy19, bh19, bo19, by19)
    f_satir_ekle(20, s20, vh20, vo20, vy20, bh20, bo20, by20)
    f_satir_ekle(21, s21, vh21, vo21, vy21, bh21, bo21, by21)
    f_satir_ekle(22, s22, vh22, vo22, vy22, bh22, bo22, by22)
    f_satir_ekle(23, s23, vh23, vo23, vy23, bh23, bo23, by23)
    f_satir_ekle(24, s24, vh24, vo24, vy24, bh24, bo24, by24)
    f_satir_ekle(25, s25, vh25, vo25, vy25, bh25, bo25, by25)
    f_satir_ekle(26, s26, vh26, vo26, vy26, bh26, bo26, by26)
    f_satir_ekle(27, s27, vh27, vo27, vy27, bh27, bo27, by27)
    f_satir_ekle(28, s28, vh28, vo28, vy28, bh28, bo28, by28)
    f_satir_ekle(29, s29, vh29, vo29, vy29, bh29, bo29, by29)
    f_satir_ekle(30, s30, vh30, vo30, vy30, bh30, bo30, by30)