NonRepainting AGAIG AI Intraday Optimizer Indicator for ThinkOrSwim

[csricksdds]

Because of the HTF inputs the original
https://usethinkscript.com/threads/agaig-ai-intraday-optimizer-indicator-for-thinkorswim.22482/
has the ability to repaint. Here is a code version with HTF removed to take away the ability to repaint. Thanks to MerryDay the indicator is now cleaner, faster, and completely repaint free. Two proven signals, no stale data,, and no complexity that doesn't earn it's place?

NonRepainting AGAIG AI Intraday Optimizer
AGAIG AI Intraday Optimizer Chart Look:

It’s time to put Artificial Intelligence to work and Claude and I have been working on this for several days to get it in place.

First of all, no indicator wins every trade. What this does is put the odds in your favor by requiring two independent conditions to agree before signaling. That alone puts you ahead of most retail setups. The edge comes from consistency — taking the signals, respecting the stops, and not overriding it on emotion.

The architecture is sound — two independent indicators that confirm each other before firing. Your S&R provides the timing trigger based on actual price action crossing ATR-based stops, and your VWAP range filter validates that the move has directional momentum behind it. Neither fires alone. That's the right design philosophy.

The bubble is your alert to look up, not your entry signal. When AI Long or AI Short prints, that's your cue to assess — check the dashboard labels, look at the candle structure, feel the tape. The indicator narrows your attention to the right moment, your judgment makes the trade.

Watch the S&R candle count label. Fresh signals at count 1-3 are your best entries. Once you're at 10+ and it shows light green or pink the trend is extended — that's a take profit or tighten stop moment, not an add moment.

The trailing sarStop line is your live exit level on every bar. Respect it.

The Bubbles give you AI generated potential exits which may be blown through with volatility or may not achieve them but I’m finding them to be achievable levels. The Stop is listed if you use hard stops for your positions.

This is great for watching intraday movement?

Indicator Link New Version: http://tos.mx/!z8uQ4TIg

# ============================================================
# AI INTRADAY OPTIMIZER — Full Study for ThinkorSwim
# Parameters: VWAP, RSI, EMA Cross, Heikin Ashi, Volume,
#             MACD, ATR Stops/Targets
# ============================================================

# ── USER INPUTS ─────────────────────────────────────────────
input rsiLength       = 14;
input emaFast         = 9;
input emaSlow         = 21;
input macdFast        = 12;
input macdSlow        = 26;
input macdSignal      = 9;
input atrLength       = 14;
input atrStopMult     = 0.75;
input atrTarget1Mult  = 1.0;
input atrTarget2Mult  = 2.0;
input volAvgLength    = 20;
input rsiBullThresh   = 55;
input rsiBearThresh   = 45;
input showLabels      = yes;
input showStops       = yes;
input showTargets     = yes;
input showVwap        = yes;
input showEMAs        = yes;

# ============================================================
# SECTION 1 — VWAP (Prakash/Samer800/C.Ricks implementation)
# Uses Reference vwap + Range Filter to define bias
# ============================================================
input source          = close;
input fastPeriod      = 27;
input slowPeriod      = 55;
input fastMultiplier  = 1.6;
input slowMultiplier  = 2.0;
input vwapTimeFrame   = {default DAY, WEEK, MONTH};
input filterSelect    = {Default "Moving Average", "VWAP", "MA & VWAP", "Don't use Filter"};

def na = Double.NaN;
def quickEMA = ExpAverage(source, 9);
def wap = Reference vwap(timeFrame = vwapTimeFrame).price;

script smoothrng {
    input src  = close;
    input per  = 100;
    input mult = 3;
    def wper = per * 2 - 1;
    def srcDif = AbsValue(src - src[1]);
    def avrng = ExpAverage(srcDif, per);
    def smoothrng = ExpAverage(avrng, wper) * mult;
    plot result = smoothrng;
}

script rngfilt {
    input src = close;
    input r   = 0;
    def rngfilt = CompoundValue(1,
        if !rngfilt[1] then src else
        if src > rngfilt[1] then
            if (src - r) < rngfilt[1] then rngfilt[1] else (src - r)
        else
            if (src + r) > rngfilt[1] then rngfilt[1] else (src + r),
        src);
    plot result = rngfilt;
}

def smrng1 = smoothrng(source, fastPeriod, fastMultiplier);
def smrng2 = smoothrng(source, slowPeriod, slowMultiplier);
def smrng  = (smrng1 + smrng2) / 2;
def filt   = rngfilt(source, smrng);

def upward   = if filt > filt[1] then upward[1] + 1 else
               if filt < filt[1] then 0 else upward[1];
def downward = if filt < filt[1] then downward[1] + 1 else
               if filt > filt[1] then 0 else downward[1];

def filterUp;
def filterDn;
Switch (filterSelect) {
Case "VWAP":
    filterUp = filt > wap;
    filterDn = filt < wap;
Case "MA & VWAP":
    filterUp = filt > quickEMA and filt > wap;
    filterDn = filt < quickEMA and filt < wap;
Case "Don't use Filter":
    filterUp = yes;
    filterDn = yes;
Default:
    filterUp = filt > quickEMA;
    filterDn = filt < quickEMA;
}

# Long: filter rising 2+ bars AND above VWAP AND RSI confirms
# Removed source > filt — price spike above filter was causing false longs
def vwapLongCond  = upward   > 1 and filt > filt[2] and filterUp  and RSI(length = 14) > 50;
def vwapShortCond = downward  > 1 and filt < filt[2] and filterDn and RSI(length = 14) < 50;
def vwapCondIni   = if vwapLongCond then 1 else if vwapShortCond then -1 else vwapCondIni[1];

def aboveVwap  = filt > wap;                        # range filter is above VWAP
def vwapDist   = (source - wap) / wap * 100;        # price distance from VWAP %

plot VwapLine = if showVwap then wap else na;
VwapLine.SetDefaultColor(Color.YELLOW);
VwapLine.SetLineWeight(2);
VwapLine.SetStyle(Curve.FIRM);
VwapLine.Hide();
VwapLine.HideBubble();
VwapLine.SetHiding(yes);

# ============================================================
# SECTION 2 — EMAs (9 / 21)
# ============================================================
def ema9        = ExpAverage(close, emaFast);
def ema21       = ExpAverage(close, emaSlow);
def emaBull     = ema9 > ema21;
def emaXupBar   = ema9 crosses above ema21;
def emaXdnBar   = ema9 crosses below ema21;

plot EMA9Line   = if showEMAs then ema9  else Double.NaN;
plot EMA21Line  = if showEMAs then ema21 else Double.NaN;
EMA9Line.SetDefaultColor(Color.CYAN);
EMA21Line.SetDefaultColor(Color.MAGENTA);
EMA9Line.SetLineWeight(1);
EMA21Line.SetLineWeight(1);
EMA9Line.Hide();
EMA9Line.HideBubble();
EMA9Line.SetHiding(yes);
EMA21Line.Hide();
EMA21Line.HideBubble();
EMA21Line.SetHiding(yes);

# ============================================================
# SECTION 3 — RSI
# ============================================================
def rsiVal      = RSI(length = rsiLength);
def rsiOB       = rsiVal >= 70;
def rsiOS       = rsiVal <= 30;
def rsiBullish  = rsiVal > rsiBullThresh and !rsiOB;
def rsiBearish  = rsiVal < rsiBearThresh and !rsiOS;

# ============================================================
# SECTION 4 — MACD
# ============================================================
def macdLine    = MACD(fastLength = macdFast, slowLength = macdSlow, MACDLength = macdSignal).Value;
def macdSig     = MACD(fastLength = macdFast, slowLength = macdSlow, MACDLength = macdSignal).Avg;
def macdHist    = macdLine - macdSig;
def macdBull    = macdLine > macdSig;
def macdXup     = macdLine crosses above macdSig;
def macdXdn     = macdLine crosses below macdSig;
def macdAbove0  = macdLine > 0;

# ============================================================
# SECTION 5 — HEIKIN ASHI
# ============================================================
def haOpen      = (open[1] + close[1]) / 2;
def haClose     = (open + high + low + close) / 4;
def haHigh      = Max(high, Max(haOpen, haClose));
def haLow       = Min(low,  Min(haOpen, haClose));
def haBull      = haClose > haOpen;
def haStrong    = haBull and haLow == Min(haOpen, haClose);
def haBearStr   = !haBull and haHigh == Max(haOpen, haClose);
def haDoji      = AbsValue(haClose - haOpen) < (haHigh - haLow) * 0.1;

# ============================================================
# SECTION 6 — VOLUME
# ============================================================
def avgVol      = Average(volume, volAvgLength);
def volRatio    = volume / avgVol * 100;
def highVol     = volume > avgVol * 1.2;
def veryHighVol = volume > avgVol * 1.5;
def lowVol      = volume < avgVol * 0.8;

# ============================================================
# SECTION 7 — ATR STOPS & TARGETS
# ============================================================
def atrVal      = ATR(length = atrLength);
def longStop    = close - atrVal * atrStopMult;
def shortStop   = close + atrVal * atrStopMult;
def longT1      = close + atrVal * atrTarget1Mult;
def longT2      = close + atrVal * atrTarget2Mult;
def shortT1     = close - atrVal * atrTarget1Mult;
def shortT2     = close - atrVal * atrTarget2Mult;

# ============================================================
# SECTION 9 — STOP & REVERSE ENGINE (from proven S&R indicator)
# Uses ATR trailing stop that flips on price crossover
# ============================================================
input sarSensitivity  = 0.8;
input sarAtrLength    = 14;
input sarAtrMult      = 2.0;

def sarAtr      = ATR(sarAtrLength);
def stopDist    = sarAtr * sarAtrMult * sarSensitivity;

def isUpTrend;
def sarStop;

isUpTrend = if IsNaN(isUpTrend[1])
            then close > close[1]
            else if  isUpTrend[1] and low  < sarStop[1] then 0
            else if !isUpTrend[1] and high > sarStop[1] then 1
            else isUpTrend[1];

sarStop = if IsNaN(sarStop[1])
          then if isUpTrend then low - stopDist else high + stopDist
          else if  isUpTrend and  isUpTrend[1] then Max(sarStop[1], low  - stopDist)
          else if !isUpTrend and !isUpTrend[1] then Min(sarStop[1], high + stopDist)
          else if  isUpTrend and !isUpTrend[1] then low  - stopDist
          else high + stopDist;

def flippedUp   = isUpTrend  and !isUpTrend[1];
def flippedDown = !isUpTrend and  isUpTrend[1];

# Candle count since last flip
def candleCount = if flippedUp or flippedDown then 1 else candleCount[1] + 1;
def isExtended  = candleCount >= 10;

# ── COMPOSITE SIGNALS — S&R flip confirmed by VWAP filter ────
# S&R gives the timing, VWAP filter validates the direction
def longCore       = flippedUp   and filterUp;
def shortCore      = flippedDown and filterDn;
def longConfirmed  = longCore;
def shortConfirmed = shortCore;

# ============================================================
# SECTION 10 — NO-REPAINT SIGNAL BUBBLES
# S&R flip is the trigger — one bubble per direction change
# Physically impossible to get two longs or shorts in a row
# ============================================================

# Use S&R ATR targets instead of fixed ATR multipliers
def sarLongStop = sarStop;
def sarLongT1   = close + sarAtr * 1.0;
def sarLongT2   = close + sarAtr * 2.0;
def sarShortStop = sarStop;
def sarShortT1  = close - sarAtr * 1.0;
def sarShortT2  = close - sarAtr * 2.0;

AddChartBubble(flippedUp, low * 0.998,
    "AI Long" +
    "\nStp:" + Round(sarStop,    2) +
    "\nT1:"  + Round(sarLongT1, 2) +
    "\nT2:"  + Round(sarLongT2, 2),
    Color.LIGHT_GREEN, no);

AddChartBubble(flippedDown, high * 1.002,
    "AI Short" +
    "\nStp:" + Round(sarStop,     2) +
    "\nT1:"  + Round(sarShortT1, 2) +
    "\nT2:"  + Round(sarShortT2, 2),
    Color.LIGHT_RED, yes);

# ============================================================
# SECTION 11 — STOP & TARGET LINES
# ============================================================
plot LongStopLine  = if showStops   and isUpTrend  then sarStop else Double.NaN;
LongStopLine.SetDefaultColor(Color.RED);
LongStopLine.SetStyle(Curve.SHORT_DASH);
LongStopLine.SetLineWeight(1);
LongStopLine.HideBubble();
LongStopLine.SetHiding(yes);

plot ShortStopLine = if showStops   and !isUpTrend then sarStop else Double.NaN;
ShortStopLine.SetDefaultColor(Color.RED);
ShortStopLine.SetStyle(Curve.SHORT_DASH);
ShortStopLine.SetLineWeight(1);
ShortStopLine.HideBubble();
ShortStopLine.SetHiding(yes);

# ============================================================
# SECTION 12 — ON-CHART LABEL DASHBOARD
# ============================================================
AddLabel(showLabels,
    "VWAP: " + (if aboveVwap then "FILT ABOVE ▲" else "FILT BELOW ▼") +
    "  " + AsPercent(vwapDist / 100),
    if aboveVwap then Color.GREEN else Color.RED
);

AddLabel(showLabels,
    "RSI: " + Round(rsiVal, 1) +
    (if rsiOB then " [OB]" else if rsiOS then " [OS]" else if rsiBullish then " [BULL]" else if rsiBearish then " [BEAR]" else " [NEUT]"),
    if rsiOB then Color.RED else if rsiOS then Color.GREEN else if rsiBullish then Color.GREEN else if rsiBearish then Color.RED else Color.YELLOW
);

AddLabel(showLabels,
    "EMA 9/21: " + (if emaBull then "BULL ▲" else "BEAR ▼"),
    if emaBull then Color.GREEN else Color.RED
);

AddLabel(showLabels,
    "MACD: " + (if macdBull then "BULL" else "BEAR") +
    (if macdXup then " [X UP]" else if macdXdn then " [X DN]" else ""),
    if macdBull then Color.GREEN else Color.RED
);

AddLabel(showLabels,
    "HA: " + (if haStrong then "STRONG BULL" else if haBearStr then "STRONG BEAR" else if haDoji then "DOJI" else if haBull then "BULL" else "BEAR"),
    if haStrong or haBull then Color.GREEN else if haDoji then Color.YELLOW else Color.RED
);

AddLabel(showLabels,
    "VOL: " + Round(volRatio, 0) + "%" +
    (if veryHighVol then " [HIGH]" else if highVol then " [AVG+]" else if lowVol then " [LOW]" else ""),
    if veryHighVol then Color.GREEN else if highVol then Color.DARK_GREEN else if lowVol then Color.RED else Color.YELLOW
);


AddLabel(showLabels,
    "S&R(" + candleCount + ") " +
    (if isUpTrend then "LONG" else "SHORT") +
    "  Stp: $" + Round(sarStop, 2),
    if isUpTrend
    then (if isExtended then Color.LIGHT_GREEN else Color.GREEN)
    else (if isExtended then Color.PINK        else Color.RED)
);

AddLabel(showLabels and longConfirmed,
    "STOP $" + Round(sarStop, 2) +
    "  T1 $" + Round(close + sarAtr, 2) +
    "  T2 $" + Round(close + sarAtr * 2, 2),
    Color.WHITE
);

AddLabel(showLabels and shortConfirmed,
    "STOP $" + Round(sarStop, 2) +
    "  T1 $" + Round(close - sarAtr, 2) +
    "  T2 $" + Round(close - sarAtr * 2, 2),
    Color.WHITE
);

# ============================================================
# SECTION 13 — BACKGROUND CLOUD (subtle bias shading)
# ============================================================
AssignBackgroundColor(
    if isUpTrend  and !isExtended then CreateColor(0,  40, 0)  else
    if isUpTrend  and  isExtended then CreateColor(0,  20, 0)  else
    if !isUpTrend and !isExtended then CreateColor(40, 0,  0)  else
    if !isUpTrend and  isExtended then CreateColor(20, 0,  0)  else
    Color.CURRENT
);

# ============================================================
# SECTION 14 — ALERTS
# ============================================================
Alert(flippedUp,   "AI Long  - S&R flipped BULLISH",  Alert.BAR, Sound.Ring);
Alert(flippedDown, "AI Short - S&R flipped BEARISH",  Alert.BAR, Sound.Bell);

# ============================================================
# END OF STUDY
# ============================================================