Measurement
Systems.
Real Decisions.

//@version=6
indicator("All-in-One Trend System",
  overlay = true,
  max_lines_count = 500,
  max_labels_count = 500)

// ── INPUT GROUPS ────────────────────
grp_ma    = "Moving Averages"
grp_stoch = "Stochastic RSI (internal)"
grp_trend = "Trend Logic"
grp_sys   = "System / Risk"
grp_vis   = "Visibility / Layout"

// ── WEEKLY SMA LENGTHS ──────────────
len50w  = input.int(50,  "50W SMA",  group=grp_ma)
len100w = input.int(100, "100W SMA", group=grp_ma)
len200w = input.int(200, "200W SMA", group=grp_ma)

// ── FIBONACCI EMA LENGTHS ───────────
fibLen1 = input.int(8,  "Fib EMA 1", group=grp_ma)
fibLen2 = input.int(13, "Fib EMA 2", group=grp_ma)
fibLen3 = input.int(21, "Fib EMA 3", group=grp_ma)
fibLen4 = input.int(34, "Fib EMA 4", group=grp_ma)
fibLen5 = input.int(55, "Fib EMA 5", group=grp_ma)

// ── WEEKLY MAs (HTF via security) ───
sma50w  = request.security(
  syminfo.tickerid, "W", ta.sma(close, len50w))
sma100w = request.security(
  syminfo.tickerid, "W", ta.sma(close, len100w))
sma200w = request.security(
  syminfo.tickerid, "W", ta.sma(close, len200w))

// ── FIBONACCI COMPOSITE MA ──────────
ema1 = ta.ema(close, fibLen1)
ema2 = ta.ema(close, fibLen2)
ema3 = ta.ema(close, fibLen3)
ema4 = ta.ema(close, fibLen4)
ema5 = ta.ema(close, fibLen5)

fibComposite = (ema1+ema2+ema3+
                 ema4+ema5) / 5.0

// ── INTERNAL STOCH RSI ──────────────
rsi       = ta.rsi(close, 14)
rsiLo     = ta.lowest(rsi, 14)
rsiHi     = ta.highest(rsi, 14)
rsiRange  = rsiHi - rsiLo
stochRaw  = rsiRange != 0.0 ?
  (rsi - rsiLo) / rsiRange * 100.0 : 0.0
k         = ta.sma(stochRaw, 3)

// ── TREND CONDITIONS ────────────────
maBull    = sma50w > sma100w and
             sma100w > sma200w
maBear    = sma50w < sma100w and
             sma100w < sma200w

bullTrend = maBull
  and close > fibComposite
  and close > ta.vwap(hlc3)
  and k > 55

bearTrend = maBear
  and close < fibComposite
  and close < ta.vwap(hlc3)
  and k < 45

// ── VOLUME IMPULSE FILTER ───────────
volMA    = ta.sma(volume, 20)
volRel   = volMA > 0 ? volume / volMA : 1.0
bodyPct  = close != 0.0 ?
  math.abs(close-open)/close*100.0 : 0.0
bigMove  = volRel > 2.0 and bodyPct > 1.5
bearImpulse = bigMove and close < open
bearBlock   = ta.barssince(bearImpulse) < 2

// ── ENTRY SIGNALS ───────────────────
crossUp   = ta.crossover(close, fibComposite)
crossDown = ta.crossunder(close, fibComposite)

longSignal  = bullTrend and crossUp
              and not bearBlock
shortSignal = bearTrend and crossDown

// ── ATR RISK MANAGEMENT ─────────────
atr      = ta.atr(14)
stopMult = 1.5
rrRatio  = 2.0

// ── PERSISTENT STATE ────────────────
var bool  inLong     = false
var bool  inShort    = false
var float longStop   = na
var float longTarget = na
var float shortStop  = na
var float shortTarget= na

if longSignal and not inLong
    inLong      := true
    inShort     := false
    longStop    := close - atr * stopMult
    longTarget  := close + atr * stopMult * rrRatio

if shortSignal and not inShort
    inShort     := true
    inLong      := false
    shortStop   := close + atr * stopMult
    shortTarget := close - atr * stopMult * rrRatio

// ── EXITS ───────────────────────────
if inLong
    if low <= longStop or high >= longTarget
        inLong := false
if inShort
    if high >= shortStop or low <= shortTarget
        inShort := false

// ── PLOTS ───────────────────────────
plotshape(longSignal,
  style=shape.triangleup,
  location=location.belowbar,
  color=color.lime, text="LONG")

plotshape(shortSignal,
  style=shape.triangledown,
  location=location.abovebar,
  color=color.red, text="SHORT")

// ── INFO PANEL (top right) ──────────
var table panel = table.new(
  position.top_right, 1, 6,
  border_width=1)

// ── ALERTS ──────────────────────────
alertcondition(longSignal,
  title="Long Entry",
  message="LONG {{ticker}} {{interval}}")
alertcondition(shortSignal,
  title="Short Entry",
  message="SHORT {{ticker}} {{interval}}")