@yörük@’ün Heybesinden

[@yörük@]

//@version=6
indicator("Crescent Markov-Fusion Elite", overlay = true)

// ==================== GİRDİLER ====================
tlm_lookback = input.int(20, "TLM Hassasiyeti")
mc_period    = input.int(50, "Monte Carlo/Markov Periyodu")
radius_mult  = input.int(25, "Hilal Menzili")
col_high     = input.color(color.new(#ff0055, 20), "Direnç Kalkanı")
col_low      = input.color(color.new(#00ffbb, 20), "Destek Kalkanı")

// ==================== MARKOV REJİM ANALİZİ (BASİTLEŞTİRİLMİŞ) ====================
// Fiyatın ardışık mumlardaki değişimine göre "Durum Geçiş" olasılığı hesaplar
up_move   = close > close[1] ? 1 : 0
down_move = close < close[1] ? 1 : 0

// Boğa ve Ayı durumlarının son periyottaki yoğunluğu (Geçiş Olasılığı)
bull_prob = ta.sma(up_move, mc_period)
bear_prob = ta.sma(down_move, mc_period)
market_regime = bull_prob > 0.55 ? "Bull" : bear_prob > 0.55 ? "Bear" : "Neutral"

// ==================== TLM & MONTE CARLO MOTORU ====================
ph = ta.pivothigh(tlm_lookback, tlm_lookback)
pl = ta.pivotlow(tlm_lookback, tlm_lookback)

returns = math.log(close / close[1])
sigma   = ta.stdev(returns, mc_period)
expected_vol = sigma * math.sqrt(radius_mult) * 1.96

// ==================== MARKOV ONAYLI HİLAL ÇİZİMİ ====================
ease_out(t) => t * (2 - t)

// Üst Hilal (Markov "Bear" veya "Neutral" iken daha güçlü)
var polyline hi_c = na
if not na(ph) and (market_regime == "Bear" or market_regime == "Neutral")
    pts = array.new<chart.point>()
    for i = 0 to 20
        float t = i / 20.0
        float angle = math.pi + (ease_out(t) * math.pi)
        int x = int(math.round(math.cos(angle) * radius_mult)) + bar_index + radius_mult
        float y = math.sin(angle) * (expected_vol * close) + high[tlm_lookback]
        pts.push(chart.point.from_index(x, y))
    
    polyline.delete(hi_c)
    hi_c := polyline.new(pts, curved=true, line_color=col_high, line_width=4)

// Alt Hilal (Markov "Bull" veya "Neutral" iken daha güçlü)
var polyline lo_c = na
if not na(pl) and (market_regime == "Bull" or market_regime == "Neutral")
    pts = array.new<chart.point>()
    for i = 0 to 20
        float t = i / 20.0
        float angle = (ease_out(t) * math.pi)
        int x = int(math.round(math.cos(angle) * radius_mult)) + bar_index + radius_mult
        float y = math.sin(angle) * (expected_vol * close) + low[tlm_lookback]
        pts.push(chart.point.from_index(x, y))
    
    polyline.delete(lo_c)
    lo_c := polyline.new(pts, curved=true, line_color=col_low, line_width=4)

// ==================== GÖRSELLEŞTİRME & PANEL ====================
var table board = table.new(position.top_right, 2, 2, bgcolor=color.new(color.black, 80), border_width=1)
if barstate.islast
    regime_col = market_regime == "Bull" ? color.lime : market_regime == "Bear" ? color.red : color.gray
    table.cell(board, 0, 0, "Piyasa Rejimi:", text_color=color.white)
    table.cell(board, 1, 0, market_regime, text_color=regime_col)
    table.cell(board, 0, 1, "Boğa Olasılığı:", text_color=color.white)
    table.cell(board, 1, 1, "%" + str.tostring(bull_prob * 100, "##.#"), text_color=color.lime) 

[@yörük@]

//@version=6
indicator("Hatasız Çift Hilal Sistemi", overlay = true)

// --- GİRDİLER ---
radius_mult = input.int(25, "Hilal Menzili")
pivot_len   = input.int(40, "Pivot Hassasiyeti")
col_high    = input.color(color.new(#ff0055, 20), "Üst Ay (Direnç)")
col_low     = input.color(color.new(#00ffbb, 20), "Alt Ay (Destek)")

// --- HESAPLAMALAR ---
ph = ta.pivothigh(pivot_len, pivot_len)
pl = ta.pivotlow(pivot_len, pivot_len)
atr = ta.atr(14)

// --- ÜST AY MOTORU ---
var polyline hi_crescent = na
if not na(ph)
    // Noktaları dizi olarak tanımlıyoruz
    array<chart.point> hi_points = array.new<chart.point>()
    for i = 0 to 20
        float angle = math.pi + (i * math.pi) / 20 
        int x = int(math.round(math.cos(angle) * radius_mult)) + bar_index[pivot_len] + radius_mult
        float y = math.sin(angle) * radius_mult * (atr * 0.5) + high[pivot_len]
        hi_points.push(chart.point.from_index(x, y))
    
    // Eski çizimi temizle ve yenisini ekle
    if not na(hi_crescent)
        polyline.delete(hi_crescent)
    hi_crescent := polyline.new(hi_points, curved=true, line_color=col_high, line_width=2)

// --- ALT AY MOTORU ---
var polyline lo_crescent = na
if not na(pl)
    array<chart.point> lo_points = array.new<chart.point>()
    for i = 0 to 20
        float angle = (i * math.pi) / 20
        int x = int(math.round(math.cos(angle) * radius_mult)) + bar_index[pivot_len] + radius_mult
        float y = math.sin(angle) * radius_mult * (atr * 0.5) + low[pivot_len]
        lo_points.push(chart.point.from_index(x, y))
    
    if not na(lo_crescent)
        polyline.delete(lo_crescent)
    lo_crescent := polyline.new(lo_points, curved=true, line_color=col_low, line_width=2)

// --- GÖRSEL İŞARETLER ---
//plot(ph ? high[pivot_len] : na, "Üst Merkez", color.red, 4, plot.style_cross, offset=-pivot_len)
//plot(pl ? low[pivot_len] : na, "Alt Merkez", color.lime, 4, plot.style_cross, offset=-pivot_len) 

[@yörük@]

//@version=6
indicator("Crescent Monte Carlo Fusion", overlay = true)

// ==================== GİRDİLER ====================
vpc_len     = input.int(20, "VPC/Hacim Periyodu")
mc_period   = input.int(50, "Monte Carlo Simülasyon Periyodu")
radius_mult = input.int(25, "Hilal Menzili (Olasılık Alanı)")
col_high    = input.color(color.new(#ff0055, 20), "Üst Olasılık Kalkanı")
col_low     = input.color(color.new(#00ffbb, 20), "Alt Olasılık Kalkanı")

// ==================== MONTE CARLO (BEKLENEN DEĞER) ====================
// Basit bir Monte Carlo simülasyonu: Standart sapma ve ortalama ile gelecek olasılık tahmini
returns = math.log(close / close[1])
mu      = ta.sma(returns, mc_period)
sigma   = ta.stdev(returns, mc_period)
// %95 Güven Aralığı (1.96 Standart Sapma)
expected_volatility = sigma * math.sqrt(radius_mult) * 1.96

// ==================== VPC & HACİM MOTORU ====================
hst = ta.highest(vpc_len), lst = ta.lowest(vpc_len)
new_h = high == hst, new_l = low == lst
h_vwap = ta.vwap(high, new_h), l_vwap = ta.vwap(low, new_l)

var float v_up = na, var float v_lo = na
v_up := new_h ? hst : (hst == hst[1] ? v_up[1] : math.min(hst, nz(v_up[1])))
v_lo := new_l ? lst : (lst == lst[1] ? v_lo[1] : math.max(lst, nz(v_lo[1])))

// ==================== OLASILIK TABANLI HİLAL ÇİZİMİ ====================
// Math Easing: Quadratic Ease-Out
ease_out_quad(t) => t * (2 - t)

// Üst Hilal (Olasılık Üst Sınırı)
var polyline hi_c = na
if new_h
    pts = array.new<chart.point>()
    for i = 0 to 20
        float t = i / 20.0
        float eased_t = ease_out_quad(t)
        float angle = math.pi + (eased_t * math.pi)
        int x = int(math.round(math.cos(angle) * radius_mult)) + bar_index + radius_mult
        // Y-ekseni Monte Carlo'dan gelen volatilite ile genişliyor
        float y = math.sin(angle) * (expected_volatility * close) + v_up
        pts.push(chart.point.from_index(x, y))
    
    if not na(hi_c)
        polyline.delete(hi_c)
    hi_c := polyline.new(pts, curved=true, line_color=col_high, line_width=4)

// Alt Hilal (Olasılık Alt Sınırı)
var polyline lo_c = na
if new_l
    pts = array.new<chart.point>()
    for i = 0 to 20
        float t = i / 20.0
        float eased_t = ease_out_quad(t)
        float angle = (eased_t * math.pi)
        int x = int(math.round(math.cos(angle) * radius_mult)) + bar_index + radius_mult
        float y = math.sin(angle) * (expected_volatility * close) + v_lo
        pts.push(chart.point.from_index(x, y))
    
    if not na(lo_c)
        polyline.delete(lo_c)
    lo_c := polyline.new(pts, curved=true, line_color=col_low, line_width=4)

// ==================== GÖRSELLEŞTİRME ====================
plot(v_up, "VPC Üst", color.new(col_high, 75), 1, plot.style_linebr)
plot(v_lo, "VPC Alt", color.new(col_low, 75), 1, plot.style_linebr)

// Güven Skoru Paneli (Dashboard)
var table board = table.new(position.top_right, 1, 1, bgcolor=color.new(color.black, 80), border_width=1)
if barstate.islast
    confidence = (1 - sigma) * 100
    table.cell(board, 0, 0, "Olasılık Güveni: %" + str.tostring(confidence, "##.##"), text_color=color.white) 

[@yörük@]

//@version=5
indicator("Crescent 4D: Neural Sentinel & TLM Vector", overlay=true, max_bars_back=1000, max_lines_count=500, max_boxes_count=500)

// --- 1. DERİN ÖĞRENME (ANN) HESAPLAMALARI ---
tangentdiff(_src) => nz((_src - _src[1]) / _src[1])
ActivationFunctionTanh(v1) => (1 - math.exp(-2 * v1)) / (1 + math.exp(-2 * v1))

_ind1 = (open - open[1]) / open[1], _ind2 = (high - high[1]) / high[1]
n_0 = ActivationFunctionTanh(_ind1), n_1 = ActivationFunctionTanh(_ind2)

f_open  = open  * (1 - (ActivationFunctionTanh(0.03 * n_0 + 5.11 * n_1) - tangentdiff(open) * 1000) / 1000)
f_high  = high  * (1 - (ActivationFunctionTanh(10.1 * n_0 - 30.9 * n_1) - tangentdiff(high) * 1000) / 1000)
f_low   = low   * (1 - (ActivationFunctionTanh(4.36 * n_0 - 18.3 * n_1) - tangentdiff(low) * 1000) / 1000)
f_close = close * (1 - (ActivationFunctionTanh(22.4 * n_0 - 26.6 * n_1) - tangentdiff(close) * 1000) / 1000)

// --- 2. KADEMELİ ZIRH VE SENTINEL HESABI ---
f_get_kalkan(_len) =>
    _stdev = ta.stdev(f_close, _len)
    _basis = ta.sma(f_close, _len)
    [_basis + (_stdev * 2.5), _basis - (_stdev * 2.5), _basis]

[up100, dn100, b100]     = f_get_kalkan(100)
[up250, dn250, b250]     = f_get_kalkan(250)
[up500, dn500, b500]     = f_get_kalkan(500)
[up750, dn750, b750]     = f_get_kalkan(750)
[up1000, dn1000, b1000]   = f_get_kalkan(1000)

// --- 3. TLM VEKTÖR SİSTEMİ (GEOMETRİK İSTİKAMET) ---
ph = ta.pivothigh(f_high, 15, 15), pl = ta.pivotlow(f_low, 15, 15)
var int last_ph_x = 0, var float last_ph_y = 0.0
var int last_pl_x = 0, var float last_pl_y = 0.0
var float tlm_slope = 0.0

if not na(ph)
    if last_ph_x != 0
        line.new(last_ph_x, last_ph_y, bar_index - 15, ph, color=color.new(color.red, 50), width=1, style=line.style_dashed)
        tlm_slope := (ph - last_ph_y) / (bar_index - 15 - last_ph_x)
    last_ph_x := bar_index - 15, last_ph_y := ph

if not na(pl)
    if last_pl_x != 0
        line.new(last_pl_x, last_pl_y, bar_index - 15, pl, color=color.new(color.green, 50), width=1, style=line.style_dashed)
        tlm_slope := (pl - last_pl_y) / (bar_index - 15 - last_pl_x)
    last_pl_x := bar_index - 15, last_pl_y := pl

// --- 4. TLM TABANLI SİNYAL MOTORU ---
// Sinyal: Fiyat zırhla etkileşime girmeli VE TLM eğimi (vektör) dönüşü onaylamalı
bool buy_signal  = ta.crossover(f_close, dn100) and (f_close > last_pl_y)
bool sell_signal = ta.crossunder(f_close, up100) and (f_close < last_ph_y)

plotshape(buy_signal,  title="AL",  style=shape.triangleup,   location=location.belowbar, color=color.new(#00ffbb, 0), size=size.small, text="TLM BUY")
plotshape(sell_signal, title="SAT", style=shape.triangledown, location=location.abovebar, color=color.new(#ff0055, 0), size=size.small, text="TLM SELL")

// --- 5. BACKTEST MOTORU (1000 BAR) ---
var int total_trades = 0, var int win_trades = 0
var float last_entry_price = 0.0, var int last_trade_dir = 0

if buy_signal or sell_signal
    if last_trade_dir != 0
        if (last_trade_dir == 1 and f_close > last_entry_price) or (last_trade_dir == -1 and f_close < last_entry_price)
            win_trades += 1
    total_trades += 1
    last_entry_price := f_close, last_trade_dir := buy_signal ? 1 : -1

float win_rate = total_trades > 0 ? (win_trades / total_trades) * 100 : 0

// --- 6. GÖRSELLEŞTİRME ---
plotcandle(f_open, f_high, f_low, f_close, title="Neural Ghost Bars", color=f_close > f_open ? color.new(#00ffbb, 85) : color.new(#ff0055, 85), bordercolor=na)
plotcandle(up100, up100, dn100, dn100, title="Sentinel Block", color=f_close > b100 ? color.new(color.orange, 88) : color.new(color.purple, 88), bordercolor=na)

// --- 7. MONTE CARLO VE MARKOV ---
returns = math.log(f_close / f_close[1])
mu = ta.sma(returns, 50), sigma = ta.stdev(returns, 50)
mc_upper = f_close * math.exp(mu + sigma * 2.326), mc_lower = f_close * math.exp(mu - sigma * 2.326)
markov_state = f_close > b500 ? (f_close > up100 ? "AŞIRI BOĞA" : "BOĞA") : (f_close < dn100 ? "AŞIRI AYI" : "AYI")

// --- 8. ANALİZ DASHBOARD (TABLO) ---
var table stats_table = table.new(position.top_right, 2, 12, border_width = 1, frame_color=color.gray)
f_near_color(_val) => math.abs(close - _val) / _val < 0.003 ? color.new(color.yellow, 30) : color.new(color.gray, 90)

if barstate.islast
    table.cell(stats_table, 0, 0, "DASHBOARD", bgcolor=color.black, text_color=color.white)
    table.cell(stats_table, 1, 0, "ANALİZ", bgcolor=color.black, text_color=color.white)
    
    table.cell(stats_table, 0, 1, "MARKOV REJİMİ", bgcolor=color.new(color.gray, 80))
    table.cell(stats_table, 1, 1, markov_state, bgcolor=f_close > b500 ? color.green : color.red, text_color=color.white)
    
    table.cell(stats_table, 0, 2, "MONTE CARLO (%99)", bgcolor=color.new(color.blue, 70), text_color=color.white)
    table.cell(stats_table, 1, 2, str.format("{0,number,#.#}-{1,number,#.#}", mc_upper, mc_lower))
    
    table.cell(stats_table, 0, 3, "100'LÜ ZIRH", bgcolor=f_near_color(up100))
    table.cell(stats_table, 1, 3, str.format("{0,number,#.#} / {1,number,#.#}", up100, dn100))
    
    table.cell(stats_table, 0, 7, "1000'Lİ SENTINEL", bgcolor=color.purple, text_color=color.white)
    table.cell(stats_table, 1, 7, str.format("{0,number,#.#} / {1,number,#.#}", up1000, dn1000))
    
    // BACKTEST SONUCU (TABLONUN EN SONUNDA)
    table.cell(stats_table, 0, 8, "BACKTEST (1000 BAR)", bgcolor=color.orange, text_color=color.black)
    table.cell(stats_table, 1, 8, str.format("WR: %{0,number,#.#} | İŞLEM: {1}", win_rate, total_trades), bgcolor=color.orange, text_color=color.black)

// --- 9. QUANTUM-ZONE BÖLGELERİ ---
if not na(ph)
    box.new(bar_index - 15, ph, bar_index + 5, ph * 0.998, border_color=na, bgcolor=color.new(color.red, 95))
if not na(pl)
    box.new(bar_index - 15, pl, bar_index + 5, pl * 1.002, border_color=na, bgcolor=color.new(color.green, 95)) 

[@yörük@]

olasılık barlarıyla-5bar olasılık

//@version=5
indicator("Aİ", overlay = true, behind_chart = false, max_lines_count=500, max_labels_count=500, max_polylines_count=100, max_boxes_count=100,  max_bars_back = 500)
/////////////////////////////////////
// --- Derin Öğrenme ve Bar Hesaplamaları ---
src7778 = close, o7778 = open, h7778 = high, l7778 = low, c7778 = close
tangentdiff(_src8) => nz((_src8 - _src8[1]) / _src8[1])
ActivationFunctionTanh(v1) => (1 - math.exp(-2 * v1)) / (1 + math.exp(-2 * v1))

_indicator18 = (o7778 - o7778[1]) / o7778[1]
_indicator28 = (h7778 - h7778[1]) / h7778[1]

n_08 = ActivationFunctionTanh(_indicator18), n_18 = ActivationFunctionTanh(_indicator28)

f_open8  = o7778 * (1 - (ActivationFunctionTanh(0.03 * n_08 + 5.11 * n_18) - tangentdiff(o7778) * 1000) / 1000)
f_high8  = h7778 * (1 - (ActivationFunctionTanh(10.1 * n_08 - 30.9 * n_18) - tangentdiff(h7778) * 1000) / 1000)
f_low8   = l7778 * (1 - (ActivationFunctionTanh(4.36 * n_08 - 18.3 * n_18) - tangentdiff(l7778) * 1000) / 1000)
f_close8 = c7778 * (1 - (ActivationFunctionTanh(22.4 * n_08 - 26.6 * n_18) - tangentdiff(c7778) * 1000) / 1000)

//////////////////////////////////
var string vanity_group = "Visual Settings"

magic_wand_toggle = input.bool(true, "Show Active CISD Level (Plot)", group=vanity_group)

drama_filter = input.string("Both", "Triggered CISD Display", options=["Both", "Bullish Only", "Bearish Only", "None"], group=vanity_group)

amnesia_mode = input.bool(false, "Limit Displayed Historical Lines", group=vanity_group)
short_term_memory = input.int(10, "Max Lines to Show", minval=1, group=vanity_group)

yell_at_me = input.bool(true, "Show Labels", group=vanity_group)
girth_units = input.int(4, "Line Width", minval=1, group=vanity_group)
scream_volume = input.string(size.normal, "Label Size", options=[size.tiny, size.small, size.normal, size.large], group=vanity_group)

hipster_font_toggle = input.string("Default", "Font Family", options=["Default", "Monospace"], group=vanity_group)
fashion_choice = input.string("Solid", "Triggered Line Style", options=["Solid", "Dashed", "Dotted"], group=vanity_group)

crayon_box = "Colors"
shrek_mode = input.color(color.new(#2ffb01, 00), "Bullish CISD", group=crayon_box)
blood_bath = input.color(color.new(#ff0000, 00), "Bearish CISD", group=crayon_box)

nerd_stats = "Debug"
paranoia_switch = input.bool(false, "Debug: Show Extreme Tracking", group=nerd_stats)

gossip_column = "HTF Trend Panel" 
stalker_mode = input.bool(true, "Show Multi-Timeframe Table", group=gossip_column)
feng_shui = input.string("Bottom Right", "Table Position", options=["Top Right", "Middle Right", "Bottom Right", "Bottom Left"], group=gossip_column)
eye_test = input.string("Small", "Table Size", options=["Tiny", "Small", "Normal", "Large"], group=gossip_column)
// ---------------------------------------------------------

var string fancy_typeface = hipster_font_toggle == "Monospace" ? font.family_monospace : font.family_default

decode_fashion_statement(outfit) =>
    switch outfit
        "Solid"  => line.style_solid
        "Dashed" => line.style_dashed
        => line.style_dotted

chosen_style = decode_fashion_statement(fashion_choice)

var int vibes = 0
var float bagholder_entry = na
var int time_machine_setting = na
var float pain_threshold = na

var label sticky_note_of_shame = na
var array<line> graveyard_of_hopes = array.new<line>()
var array<label> choir_of_screams = array.new<label>()

consult_the_crystal_ball(int bias) =>
    int temporal_shift = 0
    float ancient_price = open
    for i = 0 to 500
        int candle_attitude = close[i] > open[i] ? 1 : close[i] < open[i] ? -1 : 0
        if candle_attitude == 0
            continue
        bool mood_match = candle_attitude == bias
        if not mood_match
            break
        temporal_shift := i
        ancient_price := open[i]
    [ancient_price, bar_index - temporal_shift]

archaeologist_jones(int bias) =>
    int i = 1
    bool artifact_found = false
    int dig_site_idx = 0
    float artifact_value = na
    for j = 1 to 500
        i := j
        int candle_attitude = close[i] > open[i] ? 1 : close[i] < open[i] ? -1 : 0
        if candle_attitude == 0
            continue
        bool is_correct_era = candle_attitude == bias
        if not artifact_found
            if is_correct_era
                artifact_found := true
                dig_site_idx := i
                artifact_value := open[i]
        else
            if not is_correct_era
                break
            dig_site_idx := i
            artifact_value := open[i]
    [artifact_value, bar_index - dig_site_idx]

if vibes == 0 and bar_index > 10
    int first_impression = close > open ? 1 : close < open ? -1 : 0
    if first_impression == 0
        for k = 1 to 50
            first_impression := close[k] > open[k] ? 1 : close[k] < open[k] ? -1 : 0
            if first_impression != 0
                break
    if first_impression != 0
        vibes := first_impression
        [origin_price, origin_time] = consult_the_crystal_ball(first_impression)
        bagholder_entry := origin_price
        time_machine_setting := origin_time
        pain_threshold := first_impression == 1 ? high : low

int candle_personality = close > open ? 1 : close < open ? -1 : 0
float fresh_hopium = na
int fresh_timestamp = na

if vibes == 1
    if high > pain_threshold
        pain_threshold := high
        if candle_personality == 1
            [p_price, p_idx] = consult_the_crystal_ball(1)
            fresh_hopium := p_price
            fresh_timestamp := p_idx
        else
            [p_price, p_idx] = archaeologist_jones(1)
            fresh_hopium := p_price
            fresh_timestamp := p_idx
        bagholder_entry := fresh_hopium
        time_machine_setting := fresh_timestamp

else if vibes == -1
    if low < pain_threshold
        pain_threshold := low
        if candle_personality == -1
            [p_price, p_idx] = consult_the_crystal_ball(-1)
            fresh_hopium := p_price
            fresh_timestamp := p_idx
        else
            [p_price, p_idx] = archaeologist_jones(-1)
            fresh_hopium := p_price
            fresh_timestamp := p_idx
        bagholder_entry := fresh_hopium
        time_machine_setting := fresh_timestamp

bool shorts_squeezed = vibes == -1 and close > bagholder_entry
bool longs_rekt = vibes == 1 and close < bagholder_entry

if shorts_squeezed or longs_rekt
    bool should_i_paint_it = false
    
    if drama_filter == "Both"
        should_i_paint_it := true
    else if drama_filter == "Bullish Only"
        should_i_paint_it := shorts_squeezed
    else if drama_filter == "Bearish Only"
        should_i_paint_it := longs_rekt

    if should_i_paint_it
        color mood_ring = shorts_squeezed ? shrek_mode : blood_bath
        //line tragedy_line = line.new(time_machine_setting, bagholder_entry, bar_index, bagholder_entry, color=mood_ring, width=girth_units, style=chosen_style)
        //array.push(graveyard_of_hopes, tragedy_line)

        label loud_noise = na
        //if yell_at_me
            //int middle_of_nowhere = math.round((time_machine_setting + bar_index) / 2)
            //string gibberish = shorts_squeezed ? "+ALL" : "-SAT"
            //color ink_color = shorts_squeezed ? shrek_mode : blood_bath
            //loud_noise := label.new(middle_of_nowhere, bagholder_entry, gibberish, style=shorts_squeezed ? label.style_label_down : label.style_label_up, color=color.new(#000000, 100), textcolor=ink_color, size=scream_volume, text_font_family = fancy_typeface)
        
        //array.push(choir_of_screams, loud_noise)

    int new_emotional_state = shorts_squeezed ? 1 : -1
    vibes := new_emotional_state
    [reset_price, reset_time] = consult_the_crystal_ball(new_emotional_state)
    bagholder_entry := reset_price
    time_machine_setting := reset_time
    pain_threshold := new_emotional_state == 1 ? high : low

color active_crayon = vibes == 1 ? shrek_mode : blood_bath

plot(magic_wand_toggle ? bagholder_entry : na, "0", color=active_crayon, linewidth=girth_units, style=plot.style_line)
/////////////////////////////////////////
// --- 1. Dalga Mantığı ---
isClosed = barstate.isconfirmed
spaceUp = (high - close) * 0.65
spaceDown = (open - low) * 0.65
// Ham Koşullar (Senin formülün)
bullRaw12 = isClosed and close[3] < open[3] and close < open and close < low[3]
bearRaw12 = isClosed and close[3] > open[3] and close > open and close > high[3]

// Son 6 bar içinde herhangi bir siyah veya beyaz sinyal var mı?
hasSiyahIn6 = ta.highest(bullRaw12 ? 1 : 0, 6) > 0
hasBeyazIn6 = ta.highest(bearRaw12 ? 1 : 0, 6) > 0

// Karar Yapısı
isZit = hasSiyahIn6 and hasBeyazIn6
isAl  = hasBeyazIn6 and not hasSiyahIn6
isSat = hasSiyahIn6 and not hasBeyazIn6

// --- 4. Durum Bildirimleri ---
if isZit and not isZit[1]
    label.new(bar_index-3, high + (spaceUp * 4), "", color=color.orange, textcolor=color.white, style=label.style_label_down)

// --- 2. KİLİTLEME MEKANİZMASI (LOCK) ---
var bool lockAL = false
var bool lockSAT = false

if bearRaw12
    lockAL := true
    lockSAT := false 

if bullRaw12
    lockSAT := true
    lockAL := false 

// --- 3. 6 Bar Hafıza ve Karar ---
hasSiyahIn63 = ta.highest(bullRaw12 ? 1 : 0, 6) > 0
hasBeyazIn63 = ta.highest(bearRaw12 ? 1 : 0, 6) > 0

// --- C. 1-0 Mühürleri ---

bullRaw = isClosed and close[1] < open[1] and close < open and close < low[1]
bearRaw = isClosed and close[1] > open[1] and close > open and close > high[1]

if bullRaw
    label.new(bar_index - 1, high[1] + spaceUp, '1', style=label.style_none, textcolor=color.rgb(0, 0, 0), size=size.huge)
    label.new(bar_index - 1, high + spaceUp, '0', style=label.style_none, textcolor=color.rgb(249, 3, 3), size=size.huge)

if bearRaw
    label.new(bar_index - 1, low[1] - spaceDown, '1', style=label.style_none, textcolor=color.rgb(0, 0, 0), size=size.huge)
    label.new(bar_index - 1, low - spaceDown, '0', style=label.style_none, textcolor=color.rgb(249, 3, 3), size=size.huge)


// --- 2. ZAMANIN MİZANI (18:05 ve 09:55) ---
isPrevClose = time(timeframe.period, "1805-1810:1234567")
isTodayOpen = time(timeframe.period, "0955-1000:1234567")

var float anchorYesterday = na
var float anchorToday = na

if isPrevClose
    anchorYesterday := f_close8
if isTodayOpen
    anchorToday := f_close8

// // Ana Mihenkler
plot(anchorYesterday, "Dün", color=color.new(color.gray, 20), linewidth=2, style=plot.style_linebr)
plot(anchorToday, "Bugün", color=color.new(color.white, 20), linewidth=2, style=plot.style_linebr)
///////////sonnnnnnnnnnnnnnnnnnnnn////////
//@version=6

// ==========================================
// 1. AYARLAR (GİRDİLER)
// ==========================================
// --- Aİ Ayarları ---
sar_start  = input.float(0.02, "SAR Başlangıç", step=0.01, group="Aİ Ayarları")
sar_inc    = input.float(0.02, "SAR Artış", step=0.01, group="Aİ Ayarları")
sar_max    = input.float(0.2,  "SAR Maks", step=0.01, group="Aİ Ayarları")

// --- JayRogers Future Lines Ayarları ---
INP_offsetTime = input.int(-20, "Zaman Ofseti (Bar)", group="Future Lines (JayRogers)")
INP_fastLength = input.int(1, "Hızlı SMA Uzunluğu", minval=1, group="Future Lines (JayRogers)")
INP_slowLength = input.int(201, "Yavaş SMA Uzunluğu", minval=1, group="Future Lines (JayRogers)")
INP_vertLength = input.int(1, "Dikey Çizgi Çarpanı", group="Future Lines (JayRogers)")

// ==========================================
// 2. TEMEL MATEMATİK & FONKSİYONLAR
// ==========================================
// Aİ Fonksiyonları
tanh(v) => (1 - math.exp(-2 * v)) / (1 + math.exp(-2 * v))
td(s)   => nz((s - nz(s[1])) / nz(s[1]))

calc_dl(float[] n_arr, float[] w_arr) =>
    h = array.new_float(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)
        array.push(h, tanh(s + array.get(w_arr, (i * 5) + 4)))
    float out = array.get(w_arr, 36)
    for i = 0 to 5
        out += array.get(h, i) * array.get(w_arr, 30 + i)
    tanh(out)

// JayRogers Zaman Ofset Fonksiyonu
f_offsetTime(_userOffsetInput) =>
    int _timeNow = time
    int _timeSeg = time - time[1]
    int _segMult = _timeSeg * _userOffsetInput
    _timeNow + _segMult

// ==========================================
// 3. Aİ HESAPLAMALARI (DL & SAR)
// ==========================================
// Ağırlıklar
w_o = array.from(0.0305, 5.1130, -26.0857, -5.3202, 7.3547, 4.1679, 7.2258, -0.8712, -8.8945, -7.0647, -0.8062, -0.3044, -3.9097, -5.0099, 5.1275, -29.7360, 28.6684, 0.1384, -57.5885, 2.8249, -0.4293, 0.4827, -0.7897, -2.9874, -4.3107, 1.7583, -0.6180, 2.4493, -1.5831, 1.1658, -0.6530, -4.6469, -1.6789, -17.0776, 0.8754, -6.6724, 6.9407)
w_h = array.from(10.1865, -30.9648, 21.6723, -40.8958, 7.9574, -15.2523, 14.8454, 10.6214, -23.8178, 2.9475, -15.1790, -30.0118, 35.6504, -61.4804, 3.8985, 35.6564, -11.1343, -28.0715, 2.9239, -1.8057, 3.4623, -13.6440, -30.2263, -1.0839, 23.0328, -47.2658, 19.0218, 10.5652, -27.5207, 6.9475, -0.6965, -1.3494, 27.2629, -1.0423, -0.5401, -10.7355, 1.3032)
w_l = array.from(4.3631, -18.3014, -15.3768, 21.2085, -0.4581, -2.6518, 5.2054, -5.9209, -4.8474, 8.3155, 13.8853, -5.5179, -15.2411, -8.6732, -4.9540, 10.4904, -25.2015, 10.2621, -1.1161, -5.2541, -14.6877, 9.0302, -17.3324, 8.0680, 0.7551, 0.8951, -1.7377, 4.8991, -7.7184, 5.4936, 4.1329, -17.5015, 4.6174, -28.4768, -5.8882, -24.4345, 41.3187)
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(td(open)), tanh(td(high)), tanh(td(low)), tanh(td(close)))
f_v(p, w, div, n_arr) => p * (1 - (calc_dl(n_arr, w) - td(p) * div) / div)

// DL Verileri
o100 = f_v(open, w_o, 100, n_in), h100 = f_v(high, w_h, 100, n_in), l100 = f_v(low, w_l, 100, n_in), c100 = f_v(close, w_c, 100, n_in)
o1000 = f_v(open, w_o, 1000, n_in), c1000 = f_v(close, w_c, 1000, n_in)

// SAR Verileri
psar_fast = ta.sar(sar_start, sar_inc, sar_max)
psar_mid  = ta.sar(sar_start / 2, sar_inc / 2, sar_max)
psar_slow = ta.sar(sar_start / 4, sar_inc / 4, sar_max)

// ==========================================
// 4. JAYROGERS FUTURE LINES HESAPLAMA
// ==========================================
_fastMA = ta.sma(close[1], INP_fastLength)
_slowMA = ta.sma(close[1], INP_slowLength)

// Hatlar için değişkenler
var line _fastExtention = na
var line _slowExtention = na

// Zaman Ofseti
int _offsetTime = f_offsetTime(INP_offsetTime)

// ==========================================

// --- B. DL Barlar ---
plotcandle(o100, h100, l100, c100, "5", color=c100 > c100[1] ? color.rgb(243, 244, 237, 100) : color.rgb(248, 4, 4, 100), bordercolor=color.new(#000000, 55))
plotcandle(f_v(open,w_o,250,n_in), f_v(high,w_h,250,n_in), f_v(low,w_l,250,n_in), f_v(close,w_c,250,n_in), "4", color=na, bordercolor=color.new(#000000, 55))
plotcandle(f_v(open,w_o,500,n_in), f_v(high,w_h,500,n_in), f_v(low,w_l,500,n_in), f_v(close,w_c,500,n_in), "3", color=na, bordercolor=color.new(#000000, 55))
plotcandle(f_v(open,w_o,750,n_in), f_v(high,w_h,750,n_in), f_v(low,w_l,750,n_in), f_v(close,w_c,750,n_in), "2", color=na, bordercolor=color.new(#000000, 55))

isBull1000 = c1000 > o1000
//plotcandle(o1000 + (c1000 - o1000) * 0.33, f_v(high,w_h,1000,n_in), f_v(low,w_l,1000,n_in), o1000 + (c1000 - o1000) * 0.66, "1", color=color.new(isBull1000 ? color.lime : color.red, 00), bordercolor=color.new(color.fuchsia, 100))

// ==========================================
// 6. GÖRSELLEŞTİRME (JAYROGERS FUTURE LINES)
// ==========================================
// Hızlı SMA Çizgisi
if na(_fastExtention)
    _fastExtention := line.new(time, _fastMA, _offsetTime, _fastMA, xloc.bar_time, extend.none)
line.set_xy1(_fastExtention, time, _fastMA)
line.set_xy2(_fastExtention, _offsetTime, _fastMA)
line.set_color(_fastExtention, color.blue)
line.set_width(_fastExtention, 4)

// Yavaş SMA Çizgisi
//if na(_slowExtention)
   // _slowExtention := line.new(time, _slowMA, _offsetTime, _slowMA, xloc.bar_time, extend.none)
//line.set_xy1(_slowExtention, time, _slowMA)
//line.set_xy2(_slowExtention, _offsetTime, _slowMA)
//line.set_color(_slowExtention, color.blue)
//line.set_width(_slowExtention, 4)

// Dikey Çizgiler ve Etiketler (Extra Fluff)
var line _startLineVertical     = na
var line _finishLineVertical    = na

float _min = math.min(_fastMA, _slowMA)
float _max = math.max(_fastMA, _slowMA)
float _len = (_max - _min)
float _top = _max + (_len * INP_vertLength)
float _bot = _min - (_len * INP_vertLength)

if na(_startLineVertical)
    _startLineVertical := line.new(time, _top, time, _bot, xloc.bar_time, extend.none, width = 4)
line.set_xy1(_startLineVertical, time, _top)
line.set_xy2(_startLineVertical, time, _bot)

//if na(_finishLineVertical)
   // _finishLineVertical := line.new(_offsetTime, _top, _offsetTime, _bot, xloc.bar_time, extend.none)
//line.set_xy1(_finishLineVertical, _offsetTime, _top)
//line.set_xy2(_finishLineVertical, _offsetTime, _bot)

//var label   _offsetLabel    = na
//string _direction = INP_offsetTime > 0 ? " İleri" : INP_offsetTime < 0 ? " Geri" : ""
//string _labelText = str.tostring(INP_offsetTime) + " " + _direction + " "

//if na(_offsetLabel)
   // _offsetLabel := label.new(_offsetTime, _top, _labelText, xloc.bar_time)
//label.set_xy(_offsetLabel, _offsetTime, _top)
//label.set_text(_offsetLabel, _labelText)
//label.set_style(_offsetLabel, INP_vertLength >= 0 ? label.style_label_down : label.style_label_up)

// ==========================================
// 7. İMZA TABLOSU
// ==========================================
var table tb = table.new(position.bottom_right, 1, 1, bgcolor = #161114)
if barstate.islast
    sarTxt = "H: " + str.tostring(psar_fast, format.mintick) + " | O: " + str.tostring(psar_mid, format.mintick) + " | Y: " + str.tostring(psar_slow, format.mintick)
    finalTxt = sarTxt + " | YATIRIM TAVSİYESİ OLARAK KULLANILAMAZ. | @yörük@ 2026"
    table.cell(tb, 0, 0, finalTxt, text_color = color.white, text_size = size.large)
////////////////////
//@version=6
// --- 3. Zaman Fonksiyonu ---
f_offset_time(b) => int(time + (time - nz(time[1])) * b)

// --- 4. Temizlik ve Kayıt  ---
var box[] boxes = array.new_box()
var line[] lines = array.new_line()

if barstate.islast
    // Güvenli silme nizamı
    if array.size(boxes) > 0
        for i = 0 to array.size(boxes) - 1
            box.delete(array.get(boxes, i))
        array.clear(boxes)
    if array.size(lines) > 0
        for i = 0 to array.size(lines) - 1
            line.delete(array.get(lines, i))
        array.clear(lines)

    // Giriş verileri (Normalize)
    in_o = tanh(td(open)), in_h = tanh(td(high)), in_l = tanh(td(low)), in_c = tanh(td(close))
    divs = array.from(1000.0, 750.0, 500.0, 250.0, 100.0)

    // 5 Hayalet Bar Döngüsü
    for i = 0 to 4
        d = array.get(divs, i)
        float pred_o = 0.0, float pred_h = 0.0, float pred_l = 0.0, float pred_c = 0.0
        
        // DL Hesaplama (Safe Indexing)
        for n = 0 to 5
            idx = n * 5
            pred_o += tanh(in_o * array.get(w_o, idx) + in_h * array.get(w_o, idx+1) + in_l * array.get(w_o, idx+2) + in_c * array.get(w_o, idx+3) + array.get(w_o, idx+4)) * array.get(w_o, 30+n)
            pred_h += tanh(in_o * array.get(w_h, idx) + in_h * array.get(w_h, idx+1) + in_l * array.get(w_h, idx+2) + in_c * array.get(w_h, idx+3) + array.get(w_h, idx+4)) * array.get(w_h, 30+n)
            pred_l += tanh(in_o * array.get(w_l, idx) + in_h * array.get(w_l, idx+1) + in_l * array.get(w_l, idx+2) + in_c * array.get(w_l, idx+3) + array.get(w_l, idx+4)) * array.get(w_l, 30+n)
            pred_c += tanh(in_o * array.get(w_c, idx) + in_h * array.get(w_c, idx+1) + in_l * array.get(w_c, idx+2) + in_c * array.get(w_c, idx+3) + array.get(w_c, idx+4)) * array.get(w_c, 30+n)

        // De-normalize Fiyat Tahminleri
        vo = open * (1 - (tanh(pred_o + array.get(w_o, 36)) - td(open) * d) / d)
        vh = high * (1 - (tanh(pred_h + array.get(w_h, 36)) - td(high) * d) / d)
        vl = low  * (1 - (tanh(pred_l + array.get(w_l, 36)) - td(low)  * d) / d)
        vc = close * (1 - (tanh(pred_c + array.get(w_c, 36)) - td(close) * d) / d)

        // --- Görselleştirme ---
        t1 = f_offset_time(i + 1)
        t2 = f_offset_time(i + 2)
        transp = 30 + (i * 12)
        b_col = vc >= vo ? color.new(color.rgb(0, 230, 119, 100), transp) : color.new(color.rgb(255, 82, 82, 100), transp)
        
        // Kutular ve İğneler
        array.push(boxes, box.new(t1, math.max(vo, vc), t2, math.min(vo, vc), border_color=color.new(color.gray, 60), bgcolor=b_col, xloc=xloc.bar_time))
        array.push(lines, line.new(f_offset_time(i + 1.5), vh, f_offset_time(i + 1.5), vl, color=color.new(color.gray, 50), xloc=xloc.bar_time))

// --- Momentum  Entegrasyonu ---
    sp = 1 // Hassasiyet
    dt = time - time[1]
    for m = 1 to 3
        dx = m * 5 * sp
        dy = close - close[dx]
        array.push(lines, line.new(time, close, time + dx * dt, close + dy, xloc=xloc.bar_time, color=color.new(color.black, 00), style=line.style_dashed))

//plot(close, color=color.new(color.white, 100))
///// 

fibo-sentinel olasılık....

//@version=5
indicator("Ai", overlay=true, max_bars_back=1000, max_lines_count=500, max_boxes_count=500)

// --- 1. DERİN ÖĞRENME (ANN) HESAPLAMALARI ---
tangentdiff(_src) => nz((_src - _src[1]) / _src[1])
ActivationFunctionTanh(v1) => (1 - math.exp(-2 * v1)) / (1 + math.exp(-2 * v1))

_ind1 = (open - open[1]) / open[1], _ind2 = (high - high[1]) / high[1]
n_0 = ActivationFunctionTanh(_ind1), n_1 = ActivationFunctionTanh(_ind2)

f_open  = open  * (1 - (ActivationFunctionTanh(0.03 * n_0 + 5.11 * n_1) - tangentdiff(open) * 1000) / 1000)
f_high  = high  * (1 - (ActivationFunctionTanh(10.1 * n_0 - 30.9 * n_1) - tangentdiff(high) * 1000) / 1000)
f_low   = low   * (1 - (ActivationFunctionTanh(4.36 * n_0 - 18.3 * n_1) - tangentdiff(low) * 1000) / 1000)
f_close = close * (1 - (ActivationFunctionTanh(22.4 * n_0 - 26.6 * n_1) - tangentdiff(close) * 1000) / 1000)

// --- 2. KADEMELİ ZIRH VE SENTINEL HESABI ---
f_get_kalkan(_len) =>
    _stdev = ta.stdev(f_close, _len)
    _basis = ta.sma(f_close, _len)
    [_basis + (_stdev * 2.5), _basis - (_stdev * 2.5), _basis]

[up100, dn100, b100]     = f_get_kalkan(100)
[up250, dn250, b250]     = f_get_kalkan(250)
[up500, dn500, b500]     = f_get_kalkan(500)
[up750, dn750, b750]     = f_get_kalkan(750)
[up1000, dn1000, b1000]   = f_get_kalkan(1000)

// --- 3. TLM VEKTÖR HESABI (GÖRÜNMEZ ANALİZ) ---
ph = ta.pivothigh(f_high, 15, 15), pl = ta.pivotlow(f_low, 15, 15)
var float vector_direction = 0.0
if not na(ph)
    vector_direction := 1.0 // Ayı baskısı / Direnç
if not na(pl)
    vector_direction := -1.0 // Boğa baskısı / Destek

// --- 4. GÖRSELLEŞTİRME (ÇİZGİSİZ) ---
plotcandle(f_open, f_high, f_low, f_close, title="1", color=f_close > f_open ? color.new(#00ffbb, 75) : color.new(#ff0055, 75), bordercolor=na)
plotcandle(up100, up100, dn100, dn100, title="6", color=f_close > b100 ? color.new(#faf9f8, 90) : color.new(#080808, 90), bordercolor=na)

// --- 5. MONTE CARLO VE MARKOV REJİM ---
returns = math.log(f_close / f_close[1])
mu = ta.sma(returns, 50), sigma = ta.stdev(returns, 50)
mc_upper = f_close * math.exp(mu + sigma * 2.326), mc_lower = f_close * math.exp(mu - sigma * 2.326)

markov_state = f_close > b500 ? (f_close > up100 ? "AŞIRI BOĞA" : "BOĞA") : (f_close < dn100 ? "AŞIRI AYI" : "AYI")
markov_col = f_close > b500 ? color.green : color.red

// --- 6. ULTIMATE DASHBOARD (TÜM VERİ BURADA) ---
var table stats_table = table.new(position.top_right, 2, 11, border_width = 1, frame_color=color.gray)
f_near_color(_val) => math.abs(close - _val) / _val < 0.003 ? color.new(color.yellow, 30) : color.new(color.white, 50)

if barstate.islast
    table.cell(stats_table, 0, 0, "SİSTEM DURUMU", bgcolor=color.black, text_color=color.white)
    table.cell(stats_table, 1, 0, "VERİ / ANALİZ", bgcolor=color.black, text_color=color.white)
    
    table.cell(stats_table, 0, 1, "MARKOV ", bgcolor=color.new(markov_col, 80))
    table.cell(stats_table, 1, 1, markov_state, bgcolor=markov_col, text_color=color.white)

    table.cell(stats_table, 0, 2, "TLM ", bgcolor=color.new(color.white, 80))
    table.cell(stats_table, 1, 2, vector_direction > 0 ? "DİRENÇ BASKISI" : "DESTEK GÜCÜ", bgcolor=vector_direction > 0 ? color.new(color.red, 70) : color.new(color.green, 70), text_color=color.white)
    
    table.cell(stats_table, 0, 3, "MONTE CARLO ", bgcolor=color.new(color.blue, 70), text_color=color.white)
    table.cell(stats_table, 1, 3, str.format("{0,number,#.#}-{1,number,#.#}", mc_upper, mc_lower))
    
    table.cell(stats_table, 0, 4, "100'LÜ SENTINEL", bgcolor=f_near_color(up100))
    table.cell(stats_table, 1, 4, str.format("{0,number,#.#} / {1,number,#.#}", up100, dn100))
    
    table.cell(stats_table, 0, 5, "250'Lİ SENTINEL", bgcolor=f_near_color(up250))
    table.cell(stats_table, 1, 5, str.format("{0,number,#.#} / {1,number,#.#}", up250, dn250))
    
    table.cell(stats_table, 0, 6, "500'LÜ SENTINEL", bgcolor=f_near_color(up500))
    table.cell(stats_table, 1, 6, str.format("{0,number,#.#} / {1,number,#.#}", up500, dn500))
    
    table.cell(stats_table, 0, 7, "750'Lİ SENTINEL", bgcolor=f_near_color(up750))
    table.cell(stats_table, 1, 7, str.format("{0,number,#.#} / {1,number,#.#}", up750, dn750))
    
    table.cell(stats_table, 0, 8, "1000'Lİ SENTINEL", bgcolor=color.purple, text_color=color.white)
    table.cell(stats_table, 1, 8, str.format("{0,number,#.#} / {1,number,#.#}", up1000, dn1000))

// --- 7. QUANTUM-ZONE KUTULARI (ÇİZGİSİZ BÖLGELER) ---
if not na(ph)
    box.new(bar_index - 15, ph, bar_index + 5, ph * 0.998, border_color=na, bgcolor=color.new(color.red, 35))
if not na(pl)
    box.new(bar_index - 15, pl, bar_index + 5, pl * 1.002, border_color=na, bgcolor=color.new(color.green, 35))
///////    /////////////////
//@version=6

// ==================== GİRDİLER ====================
tlm_lookback = input.int(15, "TLM Pivot Hassasiyeti")
mc_period    = input.int(50, "Monte Carlo Olasılık Periyodu")
radius_mult  = input.int(25, "Hilal Menzili")
col_high     = input.color(color.new(#000000, 20), "Direnç Kalkanı")
col_low      = input.color(color.new(#ffffff, 20), "Destek Kalkanı")

// ==================== TLM FİLTRE MOTORU (Saf Fiyat) ====================
// Sadece güçlü, "noksansız" pivot noktalarını seçer
ph33 = ta.pivothigh(tlm_lookback, tlm_lookback)
pl33 = ta.pivotlow(tlm_lookback, tlm_lookback)

// Filtre: Her pivotu değil, sadece yeni bir kanal sınırı oluşturanı kabul et
new_h = not na(ph33)
new_l = not na(pl33)

// ==================== MONTE CARLO & VOLATİLİTE ====================
returns33= math.log(close / close[1])
sigma33   = ta.stdev(returns33, mc_period)
expected_vol33 = sigma33 * math.sqrt(radius_mult) * 1.96

// ==================== PRICE ACTION KANAL MANTIĞI ====================
var float pa_upper = na
var float pa_lower = na

if new_h
    pa_upper := high[tlm_lookback]
if new_l
    pa_lower := low[tlm_lookback]

// ==================== ELİTE HİLAL ÇİZİMİ (TLM ONAYLI) ====================
ease_out(t) => t * (2 - t)

// Üst Hilal (TLM Filtresinden Geçmiş Güçlü Direnç)
var polyline hi_c = na
if new_h
    pts = array.new<chart.point>()
    for i = 0 to 20
        float t = i / 20.0
        float angle = math.pi + (ease_out(t) * math.pi)
        int x = int(math.round(math.cos(angle) * radius_mult)) + bar_index + radius_mult
        float y = math.sin(angle) * (expected_vol33 * close) + pa_upper
        pts.push(chart.point.from_index(x, y))
    
    polyline.delete(hi_c)
    hi_c := polyline.new(pts, curved=true, line_color=col_high, line_width=2)

// Alt Hilal (TLM Filtresinden Geçmiş Güçlü Destek)
var polyline lo_c = na
if new_l
    pts = array.new<chart.point>()
    for i = 0 to 20
        float t = i / 20.0
        float angle = (ease_out(t) * math.pi)
        int x = int(math.round(math.cos(angle) * radius_mult)) + bar_index + radius_mult
        float y = math.sin(angle) * (expected_vol33 * close) + pa_lower
        pts.push(chart.point.from_index(x, y))
    
    polyline.delete(lo_c)
    lo_c := polyline.new(pts, curved=true, line_color=col_low, line_width=2)

// ==================== GÖRSELLEŞTİRME ====================
plot(pa_upper, "TLM Üst", color.new(col_high, 80), 2, plot.style_linebr, offset=-tlm_lookback)
plot(pa_lower, "TLM Alt", color.new(col_low, 80), 2, plot.style_linebr, offset=-tlm_lookback)
////////////////////
//@version=6

// --- GİRDİLER ---
radius_mult555 = input.int(5, "Daire Büyüklüğü")
pivot_len555   = input.int(2, "Pivot Hassasiyeti")
//col_high    = input.color(color.new(color.red, 60), "Üst Daire Rengi")
//col_low     = input.color(color.new(color.lime, 60), "Alt Daire Rengi")

// --- HESAPLAMALAR ---
ph55 = ta.pivothigh(pivot_len555, pivot_len555)
pl55 = ta.pivotlow(pivot_len555, pivot_len555)
atr = ta.atr(14)

// --- ÜST DAİRE MOTORU (Pivot High) ---
var int hi_index = na
var float hi_price = na
var polyline hi_circle = na

if not na(ph55)
    hi_index := bar_index[pivot_len555]
    hi_price := high[pivot_len555]
    
    hi_points = array.new<chart.point>()
    for i = 0 to 40
        float angle = (i * 2 * math.pi) / 40
        int x = int(math.round(math.cos(angle) * radius_mult555)) + hi_index
        float y = math.sin(angle) * radius_mult555 * (atr * 0.5) + hi_price
        hi_points.push(chart.point.from_index(x, y))
    
    if not na(hi_circle)
        polyline.delete(hi_circle)
    hi_circle := polyline.new(hi_points, curved=true, line_color=col_high, fill_color=color.new(col_high, 93), line_width=2)

// --- ALT DAİRE MOTORU (Pivot Low) ---
var int lo_index = na
var float lo_price = na
var polyline lo_circle = na

if not na(pl55)
    lo_index := bar_index[pivot_len555]
    lo_price := low[pivot_len555]
    
    lo_points = array.new<chart.point>()
    for i = 0 to 40
        float angle = (i * 2 * math.pi) / 40
        int x = int(math.round(math.cos(angle) * radius_mult555)) + lo_index
        float y = math.sin(angle) * radius_mult555 * (atr * 0.5) + lo_price
        lo_points.push(chart.point.from_index(x, y))
    
    if not na(lo_circle)
        polyline.delete(lo_circle)
    lo_circle := polyline.new(lo_points, curved=true, line_color=col_low, fill_color=color.new(col_low, 93), line_width=2)

// --- MERKEZ İŞARETLERİ ---
//plot(hi_price, "FiboÜst", color.rgb(255, 82, 82, 100), 2, plot.style_cross, offset=-pivot_len555, ****=false)
//plot(lo_price, "FiboAlt", color.rgb(0, 230, 119, 100), 2, plot.style_cross, offset=-pivot_len555, ****=false)
///////////////////////// 

[@yörük@]

//@version=6
indicator(".",  overlay=true, max_bars_back=500, max_polylines_count=100, max_boxes_count=500)

// ==========================================
// 1. DL MOTORU & HESAPLAMA
// ==========================================
tanh(v) => (1 - math.exp(-2 * v)) / (1 + math.exp(-2 * v))
td(s)   => nz((s - nz(s[1])) / nz(s[1]))

calc_dl(float[] n_arr, float[] w_arr) =>
    h = array.new_float(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)
        array.push(h, tanh(s + array.get(w_arr, (i * 5) + 4)))
    float out = array.get(w_arr, 36)
    for i = 0 to 5
        out += array.get(h, i) * array.get(w_arr, 30 + i)
    tanh(out)

w_o = array.from(0.0305, 5.1130, -26.0857, -5.3202, 7.3547, 4.1679, 7.2258, -0.8712, -8.8945, -7.0647, -0.8062, -0.3044, -3.9097, -5.0099, 5.1275, -29.7360, 28.6684, 0.1384, -57.5885, 2.8249, -0.4293, 0.4827, -0.7897, -2.9874, -4.3107, 1.7583, -0.6180, 2.4493, -1.5831, 1.1658, -0.6530, -4.6469, -1.6789, -17.0776, 0.8754, -6.6724, 6.9407)
w_h = array.from(10.1865, -30.9648, 21.6723, -40.8958, 7.9574, -15.2523, 14.8454, 10.6214, -23.8178, 2.9475, -15.1790, -30.0118, 35.6504, -61.4804, 3.8985, 35.6564, -11.1343, -28.0715, 2.9239, -1.8057, 3.4623, -13.6440, -30.2263, -1.0839, 23.0328, -47.2658, 19.0218, 10.5652, -27.5207, 6.9475, -0.6965, -1.3494, 27.2629, -1.0423, -0.5401, -10.7355, 1.3032)
w_l = array.from(4.3631, -18.3014, -15.3768, 21.2085, -0.4581, -2.6518, 5.2054, -5.9209, -4.8474, 8.3155, 13.8853, -5.5179, -15.2411, -8.6732, -4.9540, 10.4904, -25.2015, 10.2621, -1.1161, -5.2541, -14.6877, 9.0302, -17.3324, 8.0680, 0.7551, 0.8951, -1.7377, 4.8991, -7.7184, 5.4936, 4.1329, -17.5015, 4.6174, -28.4768, -5.8882, -24.4345, 41.3187)
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(td(open)), tanh(td(high)), tanh(td(low)), tanh(td(close)))
f_v(p, w, div, n_arr) => p * (1 - (calc_dl(n_arr, w) - td(p) * div) / div)

isNewDay = ta.change(time("D")) != 0
var float anchorToday = na
if isNewDay
    anchorToday := open

calc_psar(price_c, price_h, price_l, start_af, max_af) =>
    var float s_val = na, var float s_ep = na, var float s_af = start_af, var bool s_bull = true
    if isNewDay
        s_val := anchorToday, s_ep := price_h, s_af := start_af, s_bull := price_c > anchorToday
    else if not na(s_val)
        s_val := s_val + s_af * (s_ep - s_val)
        if s_bull
            if price_l < s_val
                s_bull := false, s_val := s_ep, s_ep := price_l, s_af := start_af
            else
                if price_h > s_ep
                    s_ep := price_h, s_af := math.min(max_af, s_af + start_af)
        else
            if price_h > s_val
                s_bull := true, s_val := s_ep, s_ep := price_h, s_af := start_af
            else
                if price_l < s_ep
                    s_ep := price_l, s_af := math.min(max_af, s_af + start_af)
    [s_val, s_bull]

// ==========================================
// 2. PLOTLAR (BAR 5 VE BAR 1)
// ==========================================
o100 = f_v(open, w_o, 100, n_in), h100 = f_v(high, w_h, 100, n_in)
l100 = f_v(low, w_l, 100, n_in), c100 = f_v(close, w_c, 100, n_in)

//plotcandle(o100, h100, l100, c100, "Sentinel-Sonra", color=c100 > c100[1] ? color.new(color.gray, 100) : color.new(color.red, 100), bordercolor=color.new(color.white, 75))

o1000 = f_v(open, w_o, 500, n_in), c1000 = f_v(close, w_c, 500, n_in)
h1000 = f_v(high, w_h, 500, n_in), l1000 = f_v(low, w_l, 500, n_in)

isBull1000 = c1000 > o1000
plotcandle(o1000 + (c1000 - o1000) * 0.10, h1000, l1000, o1000 + (c1000 - o1000) * 0.90, "Next", color=isBull1000 ? color.new(color.lime, 80) : color.new(color.red, 80), bordercolor=color.new(color.fuchsia, 100))


f_ann_price(price) =>
    n = (1 - math.exp(-2 * nz((price - price[1]) / price[1]))) / (1 + math.exp(-2 * nz((price - price[1]) / price[1])))
    price * (1 - (n / 500))
f_close = f_ann_price(close)
// ==========================================

//////
// 2. 4-KATMANLI DESTEK/DİRENÇ GÖRÜNÜMÜ
// ==========================================
c5 = f_v(close, w_c, 100, n_in), h5 = f_v(high, w_h, 100, n_in), l5 = f_v(low, w_l, 100, n_in)
[psar5s, b5s] = calc_psar(c5, h5, l5, 0.002, 0.1)
[psar5a, b5a] = calc_psar(c5, h5, l5, 0.0001, 0.1)

c1 = f_v(close, w_c, 500, n_in), h1 = f_v(high, w_h, 1000, n_in), l1 = f_v(low, w_l, 1000, n_in)
[psar1s, b1s] = calc_psar(c1, h1, l1, 0.002, 0.1)
[psar1a, b1a] = calc_psar(c1, h1, l1, 0.0001, 0.1)

// ==========================================
// 3. GÖRSELLEŞTİRME (v6 STANDARTLARI)
// ==========================================

// Katman 1: En Yakın Sur (Agresif Bar 5) - Şeffaflık color.new ile eklendi
plot(psar5a, "100", color = b5a ? color.new(color.blue, 0) : color.new(color.blue, 0), style = plot.style_line, linewidth = 1)

// Katman 2: Orta Menzil (Sabırlı Bar 5)
//plot(psar5s, "yörük101", color = b5s ? color.new(color.yellow, 0) : color.new(color.yellow, 0), style = plot.style_line, linewidth = 1)

// Katman 3: Ana Gövde (Agresif Bar 1)
plot(psar1a, "500", color = b1a ? color.new(color.fuchsia, 0) : color.new(color.fuchsia, 0), style = plot.style_line, linewidth = 1)

// Katman 4: KALE (Trend Sabırlı)
//plot(psar1s, "yörük501", color = b1s ? color.new(color.lime, 0) : color.new(color.lime, 0), style = plot.style_line, linewidth = 1)

// Açılış Çizgisi
plot(anchorToday, "Open", color = color.new(color.orange, 00), linewidth = 1,  style = plot.style_line)

// ==========================================
// 1. PSAR MOTORU (MTK TRIDENT - DAİRE FORMUNDA)
// ==========================================
float sur_agresif = ta.sar(0.02, 0.02, 0.2)   // MTK-1
float sur_sabirli  = ta.sar(0.015, 0.015, 0.15) // MTK-2
float sur_patron   = ta.sar(0.01, 0.01, 0.1)    // MTK-3 (Patron)

// ==========================================
// 2. SAATLİK TEPE VE DİP KIRILIM MOTORU
// ==========================================
// Kırılım tespiti: Fiyatın MTK-3'ü kestiği an
bool mtk3_reversal = ta.cross(close, sur_patron)

// Saatlik periyottan Kırılım anındaki High ve Low değerlerini al
[tf_high, tf_low, tf_rev] = request.security(syminfo.tickerid, "60", [high, low, mtk3_reversal])

var line high_line = na
var line low_line = na

if tf_rev
    // Önceki çizgileri silerek noksansız bir görünüm sağla
    line.delete(high_line)
    line.delete(low_line)
    
    // Tepe noktasından (High) uzatılan çizgi
    high_line := line.new(bar_index, tf_high, bar_index + 1, tf_high, 
         extend=extend.right, color=color.new(color.lime, 40), width=1, style=line.style_dashed)
    
    // Dip noktasından (Low) uzatılan çizgi
    low_line := line.new(bar_index, tf_low, bar_index + 1, tf_low, 
         extend=extend.right, color=color.new(color.red, 40), width=1, style=line.style_dashed)

// ==========================================
// 3. PLOTLAR (DAİRE STİLİ)
// ==========================================
plot(sur_agresif, "Sar-1", color=color.yellow, style=plot.style_circles, linewidth=2)
plot(sur_sabirli, "Sar-2", color=color.blue, style=plot.style_circles, linewidth=1)
plot(sur_patron, "Sar-3", color=color.red, style=plot.style_circles, linewidth=1)

// Yatırım Tavsiyesi Değildir Tablosu
var table ytd_table = table.new(position.bottom_center, 1, 1)
if barstate.islast
    table.cell(ytd_table, 0, 0, "Yatırım Tavsiyesi Değildir", text_color=color.new(color.white, 70), text_size=size.small) 

[@yörük@]

eliot

// This work is licensed under Creative Commons Attribution-NonCommercial-ShareAlike 4.0 International 
// https://creativecommons.org/licenses/by-nc-sa/4.0/
// (Refined for House Rules Compliance: Terminology & Open Source Standards)

//@version=6
indicator("Elliott", overlay = true, max_lines_count = 500, max_labels_count = 500)

// -----------------------------------------------------------------------------
// SETTINGS
// -----------------------------------------------------------------------------
grp_mode = "🔄 Dynamic Logic"
// Changed "AI" to "Adaptive" to meet House Rules on marketing terminology
forecast_mode = input.string("Auto-Detect (Adaptive + Trend + RSI)", "Forecast Mode", options=["Auto-Detect (Adaptive + Trend + RSI)", "Simple Trend (Pivot Based)", "Force Impulse (12345)", "Force Correction (ABC/WXY)"], group=grp_mode, tooltip="Adaptive Mode weighs Trend (WMA) and Momentum (RSI) to project potential reversals.")

grp_ind = "Indicators (Signal Inputs)"
show_wma     = input.bool(true, "Show 50 & 200 WMA", group=grp_ind)
len_wma_fast = input.int(50, "Fast WMA", group=grp_ind)
len_wma_slow = input.int(200, "Slow WMA", group=grp_ind)
show_rsi_sig = input.bool(false, "Show RSI Signals on Chart", group=grp_ind)
rsi_ob_lvl   = input.int(70, "RSI Overbought", group=grp_ind)
rsi_os_lvl   = input.int(30, "RSI Oversold", group=grp_ind)

grp_sett = "Wave Settings"
len        = input.int(5, "Short-Term Sensitivity", minval=2, group=grp_sett)
color_imp  = input.color(#089981, "Impulse Color", group=grp_sett) 
color_corr = input.color(#f23645, "Correction Color", group=grp_sett) 

grp_cast = "Forecast Settings"
show_ext_bull = input.bool(true, "Show Bullish Extension", inline="ext", group=grp_cast)
show_ext_bear = input.bool(true, "Show Bearish Extension", inline="ext", group=grp_cast)
color_cont    = input.color(#ff9800, "", inline="ext", group=grp_cast)
link_scenarios = input.bool(false, "🔗 Link Correction to Extension", tooltip="Start forecast from the Extension target instead of current price.", group=grp_cast)
pattern_type  = input.string("Double Zig-Zag (WXY)", "Correction Pattern", options=["Triangle (ABCDE)", "Double Zig-Zag (WXY)"], group=grp_cast)
show_channel  = input.bool(true, "Show Corrective Channel", group=grp_cast)

grp_macro = "Macro Forecast"
show_macro    = input.bool(true, "Show Macro Projection", group=grp_macro)
len_macro     = input.int(21, "Macro Sensitivity", minval=10, group=grp_macro)
use_dynamic_time = input.bool(true, "Use Dynamic Time Scaling", group=grp_macro)
fixed_spacing = input.int(10, "Fixed Bars per Wave", minval=1, group=grp_macro)
color_macro   = input.color(#9c27b0, "Macro Color", group=grp_macro)

grp_vis   = "Dashboard & Visuals"
show_table  = input.bool(false, "Show Target Table", group=grp_vis)
table_pos   = input.string(position.top_right, "Table Position", options=[position.top_right, position.bottom_right, position.top_left], group=grp_vis)
show_labels = input.bool(true, "Show Chart Labels", group=grp_vis)
show_grid   = input.bool(true, "Show Horizontal Fib Levels", group=grp_vis)

// -----------------------------------------------------------------------------
// CALCULATIONS
// -----------------------------------------------------------------------------
wma_fast = ta.wma(close, len_wma_fast)
wma_slow = ta.wma(close, len_wma_slow)
//plot(show_wma ? wma_fast : na, "50", color=color.blue, linewidth=2)
//plot(show_wma ? wma_slow : na, "200", color=color.orange, linewidth=2)

my_rsi = ta.rsi(close, 14)
is_ob = my_rsi >= rsi_ob_lvl
is_os = my_rsi <= rsi_os_lvl

//plotshape(show_rsi_sig and is_ob, title="RSI Overbought", style=shape.circle, location=location.abovebar, color=color.red, size=size.tiny)
//plotshape(show_rsi_sig and is_os, title="RSI Oversold", style=shape.circle, location=location.belowbar, color=color.green, size=size.tiny)

// -----------------------------------------------------------------------------
// STORAGE & ARRAYS
// -----------------------------------------------------------------------------
var float[] pPrices = array.new_float()
var int[]   pBars   = array.new_int()
var bool[]  pDirs   = array.new_bool() 
var float[] pRSI    = array.new_float()

var float[] pPricesM = array.new_float()
var int[]   pBarsM   = array.new_int()
var bool[]  pDirsM   = array.new_bool()

var line[]  ghostLines  = array.new_line()
var label[] ghostLabels = array.new_label()
var table   infoTable   = table.new(table_pos, 4, 30, border_width = 1)

// -----------------------------------------------------------------------------
// HELPER FUNCTIONS
// -----------------------------------------------------------------------------
addPivot(float p, int b, bool d, float r, float[] prices, int[] bars, bool[] dirs, float[] rsis) =>
    array.unshift(prices, p)
    array.unshift(bars, b)
    array.unshift(dirs, d)
    array.unshift(rsis, r) 
    if array.size(prices) > 20
        array.pop(prices)
        array.pop(bars)
        array.pop(dirs)
        array.pop(rsis)

addPivotMacro(float p, int b, bool d, float[] prices, int[] bars, bool[] dirs) =>
    array.unshift(prices, p)
    array.unshift(bars, b)
    array.unshift(dirs, d)
    if array.size(prices) > 20
        array.pop(prices)
        array.pop(bars)
        array.pop(dirs)

drawPred(int t1, float p1, int t2, float p2, string txt, string fib, color col, int width, bool is_macro) =>
    l = line.new(t1, p1, t2, p2, color=col, style=line.style_dashed, width=width)
    array.push(ghostLines, l)
    
    if show_grid
        l_hor = line.new(t2, p2, t2 + 15, p2, color=color.new(col, 60), style=line.style_dotted, width=1)
        array.push(ghostLines, l_hor)

    if show_labels
        lbl_style = p2 > p1 ? label.style_label_down : label.style_label_up
        lbl_size  = is_macro ? size.normal : size.small
        lbl_text  = txt + " (" + str.tostring(p2, format.mintick) + ")"
        
        lb = label.new(t2, p2, text=lbl_text, color=color.new(col, 85), textcolor=col, style=lbl_style, size=lbl_size)
        array.push(ghostLabels, lb)

fillRow(int r, string t, string f, float p, color c) =>
    pct_diff = (p - close) / close * 100
    pct_str  = (pct_diff > 0 ? "+" : "") + str.tostring(pct_diff, "#.##") + "%"
    pct_col  = pct_diff >= 0 ? #089981 : #f23645 
    
    if r < 30
        table.cell(infoTable, 0, r, t, text_color=color.white, bgcolor=c, text_size=size.small)
        table.cell(infoTable, 1, r, f, text_color=color.white, bgcolor=color.new(c, 20), text_size=size.small)
        table.cell(infoTable, 2, r, str.tostring(p, format.mintick), text_color=color.white, bgcolor=color.new(color.black, 20), text_size=size.small)
        table.cell(infoTable, 3, r, pct_str, text_color=pct_col, bgcolor=color.new(color.black, 20), text_size=size.small)

get_wave_duration(int[] bars, int fallback) =>
    int duration = fallback
    if array.size(bars) > 2
        int d1 = math.abs(array.get(bars, 0) - array.get(bars, 1))
        int d2 = math.abs(array.get(bars, 1) - array.get(bars, 2))
        duration := int(math.avg(d1, d2))
    duration

// -----------------------------------------------------------------------------
// MAIN EXECUTION
// -----------------------------------------------------------------------------
ph = ta.pivothigh(high, len, len)
pl = ta.pivotlow(low, len, len)

if not na(ph)
    addPivot(ph, bar_index[len], true, my_rsi[len], pPrices, pBars, pDirs, pRSI)
if not na(pl)
    addPivot(pl, bar_index[len], false, my_rsi[len], pPrices, pBars, pDirs, pRSI)

phM = ta.pivothigh(high, len_macro, len_macro)
plM = ta.pivotlow(low, len_macro, len_macro)

if not na(phM)
    addPivotMacro(phM, bar_index[len_macro], true, pPricesM, pBarsM, pDirsM)
if not na(plM)
    addPivotMacro(plM, bar_index[len_macro], false, pPricesM, pBarsM, pDirsM)

// History Rendering
if (not na(ph) or not na(pl)) and array.size(pPrices) > 1
    p1_val = array.get(pPrices, 0)
    p1_bar = array.get(pBars, 0)
    p2_val = array.get(pPrices, 1)
    p2_bar = array.get(pBars, 1)
    line.new(p2_bar, p2_val, p1_bar, p1_val, color=color.rgb(120, 123, 134, 100), width=1)

if barstate.islast
    for l in ghostLines
        line.delete(l)
    for lb in ghostLabels
        label.delete(lb)
    array.clear(ghostLines)
    array.clear(ghostLabels)
    
    table.clear(infoTable, 0, 0, 3, 29) 
    infoTable := table.new(table_pos, 4, 30, border_width = 1)
    
    if show_table
        table.cell(infoTable, 0, 0, "Wave", bgcolor=color.gray, text_color=color.white)
        table.cell(infoTable, 1, 0, "Fib", bgcolor=color.gray, text_color=color.white)
        table.cell(infoTable, 2, 0, "Target", bgcolor=color.gray, text_color=color.white)
        table.cell(infoTable, 3, 0, "% +/-", bgcolor=color.gray, text_color=color.white)
    
    int tbl_row = 1 

    if array.size(pPrices) > 0
        last_conf_val = array.get(pPrices, 0)
        last_conf_bar = array.get(pBars, 0)
        last_conf_dir = array.get(pDirs, 0)
        
        int bars_elapsed = bar_index - last_conf_bar
        float live_pivot_val = 0.0
        int   live_pivot_bar = 0
        bool  live_pivot_dir = bool(na)
        
        if last_conf_dir 
            lowest_val = 1000000.0
            lowest_idx = 0
            for i = 0 to bars_elapsed
                if low[i] < lowest_val
                    lowest_val := low[i]
                    lowest_idx := bar_index[i]
            live_pivot_val := lowest_val
            live_pivot_bar := lowest_idx
            live_pivot_dir := false 
            if close < live_pivot_val
                live_pivot_val := close
                live_pivot_bar := bar_index
                live_pivot_dir := false
        else 
            highest_val = 0.0
            highest_idx = 0
            for i = 0 to bars_elapsed
                if high[i] > highest_val
                    highest_val := high[i]
                    highest_idx := bar_index[i]
            live_pivot_val := highest_val
            live_pivot_bar := highest_idx
            live_pivot_dir := true 
            if close > live_pivot_val
                live_pivot_val := close
                live_pivot_bar := bar_index
                live_pivot_dir := true

        float vol = math.abs(last_conf_val - live_pivot_val)
        if vol == 0 
            vol := syminfo.mintick * 100
        
        int time_unit = use_dynamic_time ? math.max(3, int(get_wave_duration(pBars, 10) * 0.382)) : 5
        int t_step = time_unit

        // --- EXTENSION ---
        float pExt = na
        int   tExt = bar_index + (time_unit * 2)
        bool  drawing_ext = false

        if not live_pivot_dir 
            if show_ext_bear
                calc_price = live_pivot_val - (vol * 0.5)
                pExt := math.max(0.01, calc_price)
                drawPred(live_pivot_bar, live_pivot_val, tExt, pExt, "Ext", "0.5", color_cont, 2, false)
                if show_table
                    fillRow(tbl_row, "Bear Ext", "0.5 Vol", pExt, color_cont)
                    tbl_row += 1
                drawing_ext := true
        else 
            if show_ext_bull
                pExt := live_pivot_val + (vol * 0.5)
                drawPred(live_pivot_bar, live_pivot_val, tExt, pExt, "Ext", "0.5", color_cont, 2, false)
                if show_table
                    fillRow(tbl_row, "Bull Ext", "0.5 Vol", pExt, color_cont)
                    tbl_row += 1
                drawing_ext := true

        float rev_start_price = live_pivot_val
        int   rev_start_bar   = live_pivot_bar
        if link_scenarios and drawing_ext
            rev_start_price := pExt
            rev_start_bar   := tExt

        // --- ADAPTIVE LOGIC ENGINE ---
        bool trend_bull = wma_fast > wma_slow
        string detect_phase = "Neutral"
        bool do_impulse = false
        bool start_dir = live_pivot_dir

        if forecast_mode == "Force Impulse (12345)"
            detect_phase := "IMPULSE"
            do_impulse := true
        else if forecast_mode == "Force Correction (ABC/WXY)"
            detect_phase := "CORRECTION"
            do_impulse := false
        else if forecast_mode == "Simple Trend (Pivot Based)"
            if trend_bull
                do_impulse := (start_dir == false)
            else
                do_impulse := (start_dir == true)
            detect_phase := do_impulse ? "Trend: Impulse" : "Trend: Correction"
        else
            if trend_bull
                if is_os
                    detect_phase := "ADAPT: Bull Dip"
                    do_impulse := true 
                else if is_ob
                    detect_phase := "ADAPT: Bull Peak"
                    do_impulse := false 
                else
                    detect_phase := start_dir ? "Bull Corr" : "Bull Imp"
                    do_impulse := (start_dir == false)
            else
                if is_ob
                    detect_phase := "ADAPT: Bear Rally"
                    do_impulse := true 
                else if is_os
                    detect_phase := "ADAPT: Bear Low"
                    do_impulse := false 
                else
                    detect_phase := start_dir ? "Bear Imp" : "Bear Corr"
                    do_impulse := (start_dir == true)

        if show_table
            status_col = do_impulse ? color_imp : color_corr
            table.cell(infoTable, 0, tbl_row, "STATUS", bgcolor=color.gray, text_color=color.white)
            table.cell(infoTable, 1, tbl_row, detect_phase, bgcolor=status_col, text_color=color.white)
            table.merge_cells(infoTable, 1, tbl_row, 3, tbl_row)
            tbl_row += 1

        dir_mult = start_dir ? -1 : 1

        if do_impulse
            p1 = math.max(0.01, rev_start_price + (dir_mult * vol * 0.382))
            t1 = rev_start_bar + t_step 
            drawPred(rev_start_bar, rev_start_price, t1, p1, "①", "Start", color_imp, 2, false)
            if show_table
                fillRow(tbl_row, "Wave 1", "Start", p1, color_imp)
                tbl_row += 1
            
            p2 = math.max(0.01, p1 - (dir_mult * (math.abs(p1 - rev_start_price) * 0.618)))
            t2 = t1 + t_step
            drawPred(t1, p1, t2, p2, "②", "0.618", color_imp, 2, false)
            if show_table
                fillRow(tbl_row, "Wave 2", "0.618", p2, color_imp)
                tbl_row += 1
            
            p3 = math.max(0.01, p2 + (dir_mult * (math.abs(p1 - rev_start_price) * 1.618)))
            t3 = t2 + t_step
            drawPred(t2, p2, t3, p3, "③", "1.618", color_imp, 2, false)
            if show_table
                fillRow(tbl_row, "Wave 3", "1.618", p3, color_imp)
                tbl_row += 1

            p4 = math.max(0.01, p3 - (dir_mult * (math.abs(p3 - p2) * 0.382)))
            t4 = t3 + t_step
            drawPred(t3, p3, t4, p4, "④", "0.382", color_imp, 2, false)
            if show_table
                fillRow(tbl_row, "Wave 4", "0.382", p4, color_imp)
                tbl_row += 1

            p5 = math.max(0.01, p4 + (dir_mult * math.abs(p1 - rev_start_price)))
            t5 = t4 + t_step
            drawPred(t4, p4, t5, p5, "⑤", "1.0", color_imp, 2, false)
            if show_table
                fillRow(tbl_row, "Wave 5", "1.0", p5, color_imp)
                tbl_row += 1
                
        else
            pA = math.max(0.01, rev_start_price + (dir_mult * vol * 0.382))
            tA = rev_start_bar + t_step
            drawPred(rev_start_bar, rev_start_price, tA, pA, "Ⓐ", "0.382", color_corr, 2, false)
            if show_table
                fillRow(tbl_row, "Wave A", "0.382", pA, color_corr)
                tbl_row += 1

            pB = math.max(0.01, pA - (dir_mult * (math.abs(rev_start_price - pA) * 0.618)))
            tB = tA + t_step
            drawPred(tA, pA, tB, pB, "Ⓑ", "0.618", color_corr, 2, false)
            if show_table
                fillRow(tbl_row, "Wave B", "0.618", pB, color_corr)
                tbl_row += 1

            len_A = math.abs(rev_start_price - pA)
            pC = math.max(0.01, pB + (dir_mult * len_A * 1.618))
            tC = tB + t_step
            
            c_lbl = pattern_type == "Double Zig-Zag (WXY)" ? "(W)" : "Ⓒ"
            drawPred(tB, pB, tC, pC, c_lbl, "1.618", color_corr, 2, false)
            if show_table
                fillRow(tbl_row, "Wave C/W", "1.618", pC, color_corr)
                tbl_row += 1

            if show_channel
                l_top = line.new(rev_start_bar, rev_start_price, tB, pB, color=color.new(color.white, 70), style=line.style_dotted)
                array.push(ghostLines, l_top)
                slope = (pB - rev_start_price) / (tB - rev_start_bar)
                p_parallel = pA + (slope * (tC - tA))
                l_bot = line.new(tA, pA, tC, p_parallel, color=color.new(color.white, 70), style=line.style_dotted)
                array.push(ghostLines, l_bot)

            if pattern_type == "Double Zig-Zag (WXY)"
                pX = math.max(0.01, pC - (dir_mult * (len_A * 0.5)))
                tX = tC + t_step
                drawPred(tC, pC, tX, pX, "(X)", "0.5", color_corr, 2, false)
                if show_table
                    fillRow(tbl_row, "Wave X", "0.5", pX, color_corr)
                    tbl_row += 1
                
                pY = math.max(0.01, pX + (dir_mult * len_A)) 
                tY = tX + (t_step * 2) 
                drawPred(tX, pX, tY, pY, "(Y)", "1.0 of W", color_corr, 2, false)
                if show_table
                    fillRow(tbl_row, "Wave Y", "1.0", pY, color_corr)
                    tbl_row += 1

    // ---------------- MACRO CALC ----------------
    if show_macro and array.size(pPricesM) > 0
        last_M_val = array.get(pPricesM, 0)
        last_M_bar = array.get(pBarsM, 0)
        last_M_dir = array.get(pDirsM, 0)
        
        int M_elapsed = bar_index - last_M_bar
        float live_M_val = 0.0
        int   live_M_bar = 0
        
        if last_M_dir 
            lowest_val = 1000000.0
            lowest_idx = 0
            for i = 0 to M_elapsed
                if low[i] < lowest_val
                    lowest_val := low[i]
                    lowest_idx := bar_index[i]
            live_M_val := lowest_val
            live_M_bar := lowest_idx
        else 
            highest_val = 0.0
            highest_idx = 0
            for i = 0 to M_elapsed
                if high[i] > highest_val
                    highest_val := high[i]
                    highest_idx := bar_index[i]
            live_M_val := highest_val
            live_M_bar := highest_idx

        float volM = math.abs(last_M_val - live_M_val)
        if volM == 0 
            volM := syminfo.mintick * 100

        int t_step_M = use_dynamic_time ? int(get_wave_duration(pBarsM, fixed_spacing) * 0.5) : fixed_spacing
        
        if show_table
            table.cell(infoTable, 0, tbl_row, "MACRO (L-T)", bgcolor=color.gray, text_color=color.white)
            table.merge_cells(infoTable, 0, tbl_row, 3, tbl_row)
            tbl_row += 1

        if not last_M_dir 
            p1 = math.max(0.01, live_M_val + (volM * 0.382))
            t1 = live_M_bar + t_step_M
            drawPred(live_M_bar, live_M_val, t1, p1, "M-I", "Start", color_macro, 4, true)
            
            p2 = math.max(0.01, p1 - ((p1 - live_M_val) * 0.618))
            t2 = t1 + t_step_M
            drawPred(t1, p1, t2, p2, "M-II", "0.618", color_macro, 4, true)
            
            p3 = math.max(0.01, p2 + ((p1 - live_M_val) * 1.618))
            t3 = t2 + t_step_M
            drawPred(t2, p2, t3, p3, "M-III", "1.618", color_macro, 4, true)

            p4 = math.max(0.01, p3 - ((p3 - p2) * 0.382))
            t4 = t3 + t_step_M
            drawPred(t3, p3, t4, p4, "M-IV", "0.382", color_macro, 4, true)

            p5 = math.max(0.01, p4 + (p1 - live_M_val))
            t5 = t4 + t_step_M
            drawPred(t4, p4, t5, p5, "M-V", "1.0", color_macro, 4, true)
            
        else 
            pA = math.max(0.01, live_M_val - (volM * 0.382))
            tA = live_M_bar + t_step_M
            drawPred(live_M_bar, live_M_val, tA, pA, "M-A", "Start", color_macro, 4, true)

            pB = math.max(0.01, pA + ((live_M_val - pA) * 0.618))
            tB = tA + t_step_M
            drawPred(tA, pA, tB, pB, "M-B", "0.618", color_macro, 4, true)

            pC = math.max(0.01, pB - ((live_M_val - pA) * 1.272))
            tC = tB + t_step_M
            drawPred(tB, pB, tC, pC, "M-C", "1.272", color_macro, 4, true) 

[@yörük@]

mtk sarlar üçlü...

//@version=6
indicator("MTK SAR", overlay=true, max_bars_back=500)


float sur_h = ta.sar(0.02, 0.02, 0.2)    
float sur_d  = ta.sar(0.015, 0.015, 0.15) 
float sur_y   = ta.sar(0.01, 0.01, 0.1)    

plot(sur_h, "1", color=color.yellow,  style=plot.style_circles, linewidth=1)
plot(sur_d, "2", color=color.blue, style=plot.style_circles, linewidth=1)
plot(sur_y, "3", color=color.red, style=plot.style_circles, linewidth=1)

float sur_h1 = ta.sar(0.02, 0.002, 0.2)    
float sur_d1  = ta.sar(0.015, 0.0015, 0.15) 
float sur_y1   = ta.sar(0.01, 0.001, 0.1)  

plot(sur_h1, "11", color=color.rgb(255, 235, 59, 30), style=plot.style_circles, linewidth=1)
plot(sur_d1, "22", color=color.rgb(33, 149, 243, 50), style=plot.style_circles, linewidth=1)
plot(sur_y1, "33", color=color.rgb(255, 82, 82, 50), style=plot.style_circles, linewidth=1)

float sur_h11 = ta.sar(0.0002, 0.0002, 0.2)    
float sur_d11  = ta.sar(0.015, 0.00015, 0.15) 
float sur_y11   = ta.sar(0.01, 0.0001, 0.1)  

plot(sur_h11, "yörük", color=color.rgb(255, 235, 59, 50), style=plot.style_circles, linewidth=1)
plot(sur_d11, "222", color=color.rgb(33, 149, 243, 70), style=plot.style_circles, linewidth=1)
plot(sur_y11, "333", color=color.rgb(255, 82, 82, 70), style=plot.style_circles, linewidth=1)