Get Forex currency trading system Code That Actually Works

//@version=5
indicator("Forex Currency Trading System", shorttitle="FCTS", overlay=true)

// Input parameters
st_length = input.int(10, title="SuperTrend ATR Length", minval=1)
st_mult = input.float(3.0, title="SuperTrend Multiplier", minval=0.1, step=0.1)
rsi_length = input.int(14, title="RSI Length", minval=1)
div_lookback = input.int(5, title="Divergence Lookback", minval=2)
vol_ma_length = input.int(20, title="Volume MA Length", minval=1)
show_signals = input.bool(true, title="Show Buy/Sell Signals")

// SuperTrend calculation
[st_line, st_dir] = ta.supertrend(st_mult, st_length)

// RSI for divergence
rsi = ta.rsi(close, rsi_length)

// Pivot points for divergence detection
pivot_high = ta.pivothigh(high, div_lookback, div_lookback)
pivot_low = ta.pivotlow(low, div_lookback, div_lookback)
rsi_pivot_high = ta.pivothigh(rsi, div_lookback, div_lookback)
rsi_pivot_low = ta.pivotlow(rsi, div_lookback, div_lookback)

// Bullish divergence: lower low in price, higher low in RSI
bull_div = false
if not na(pivot_low) and not na(rsi_pivot_low)
    prev_pivot_low_price = ta.valuewhen(ta.pivotlow(low, div_lookback*2, div_lookback*2), low, 0)
    prev_pivot_low_rsi = ta.valuewhen(ta.pivotlow(rsi, div_lookback*2, div_lookback*2), rsi, 0)
    if low[div_lookback] < prev_pivot_low_price and rsi[div_lookback] > prev_pivot_low_rsi
        bull_div := true

// Bearish divergence: higher high in price, lower high in RSI
bear_div = false
if not na(pivot_high) and not na(rsi_pivot_high)
    prev_pivot_high_price = ta.valuewhen(ta.pivothigh(high, div_lookback*2, div_lookback*2), high, 0)
    prev_pivot_high_rsi = ta.valuewhen(ta.pivothigh(rsi, div_lookback*2, div_lookback*2), rsi, 0)
    if high[div_lookback] > prev_pivot_high_price and rsi[div_lookback] < prev_pivot_high_rsi
        bear_div := true

// Volume confirmation
vol_ma = ta.sma(volume, vol_ma_length)
high_vol = volume > vol_ma * 1.2

// Entry signals
long_signal = ta.crossover(close, st_line[1]) and bull_div and high_vol
short_signal = ta.crossunder(close, st_line[1]) and bear_div and high_vol

// Plots
plot(st_line, color=st_dir == -1 ? color.green : color.red, linewidth=2, title="SuperTrend")
plotshape(show_signals and long_signal, style=shape.triangleup, location=location.belowbar, color=color.green, size=size.small, title="Buy Signal")
plotshape(show_signals and short_signal, style=shape.triangledown, location=location.abovebar, color=color.red, size=size.small, title="Sell Signal")

// Alerts
alertcondition(long_signal, title="Forex Buy Alert", message="{{ticker}} Forex Buy Signal: SuperTrend + Bullish Divergence + High Volume")
alertcondition(short_signal, title="Forex Sell Alert", message="{{ticker}} Forex Sell Alert: SuperTrend + Bearish Divergence + High Volume")

// Background color for trend
bgcolor(st_dir == -1 ? color.new(color.green, 95) : color.new(color.red, 95))