GHLA SuperTrend CCI HighLow Activator For ThinkOrSwim

[antwerks]

which lower OSC are you talking about - the label code for the GHLA_Supertrend_CCI_OSC is in #60 discussion

 

[Hockeynut]

THANK YOU FOR THIS! Anyway you can share the code for the Labels in the lower oscillator?

TOS does not recognize the lines UpperLine and Lowerline below. They show up RED in the code.

def isOverbought2 = GannOsc >= UpperLine2;
def isOverbought1 = GannOsc >= UpperLine1;
def isOversold2 = GannOsc <= LowerLine2;
def isOversold1 = GannOsc <= LowerLine1;

 

[5rings]

Many thanks for your help Antwerks. If I want to now add a scan for a selling opportunity, what do I change?

Can this work on MTF?

 

[Gon Fishin]

GHLA SuperTrend CCI High-Low Activator Oscillator
A multi-layered trend and momentum indicator that combines Gann-inspired high/low levels, a SuperTrend mechanism, and a custom CCI oscillator. It provides dynamic entry and exit signals, confirming bullish or bearish trends while filtering out market noise. The accompanying oscillator visually represents trend strength and direction, allowing traders to quickly identify opportunities and avoid indecision zones.
View attachment 26314

# GHLA_SuperTrend_CCI_High_Low_Activator_Oscillator
#By CANDO13579
 
declare lower;
declare real_size;
input ghlaPeriod = 10;
input stPeriod = 14;
input stShiftTicks = 20.0;
input useFilter = yes;

def minTick = TickSize();
def shift = stShiftTicks * minTick;

# -----------------------------
# GHLA Logic
# -----------------------------
def ghlaAvgH = Average(high, ghlaPeriod);
def ghlaAvgL = Average(low, ghlaPeriod);

def sw = if close > ghlaAvgH then 1
         else if close < ghlaAvgL then -1
         else 0;

def ghlaDir = CompoundValue(1, if sw != 0 then sw else ghlaDir[1], 0);
def ghlaLevel = if ghlaDir < 0 then ghlaAvgH else ghlaAvgL;

# -----------------------------
# Custom CCI using Typical Price
# -----------------------------
def tp = (high + low + close) / 3;
def tpSMA = Average(tp, stPeriod);
def meanDev = Average(AbsValue(tp - tpSMA), stPeriod);
def cciValue = if meanDev == 0 then 0 else (tp - tpSMA) / (0.015 * meanDev);

# -----------------------------
# SuperTrend State Machine
# -----------------------------

# stFlag: 1=long, -1=short
rec stFlag = if IsNaN(stFlag[1]) then if cciValue >= 0 then 1 else -1
             else if cciValue > 0 and stFlag[1] <= 0 then 1
             else if cciValue < 0 and stFlag[1] >= 0 then -1
             else stFlag[1];

rec st = if IsNaN(st[1]) then if cciValue >= 0 then low - shift else high + shift
         else
            if cciValue > 0 and stFlag[1] <= 0 then low - shift
            else if cciValue < 0 and stFlag[1] >= 0 then high + shift
            else
                if stFlag > 0 and (low - shift) > st[1] then low - shift
                else if stFlag < 0 and (high + shift) < st[1] then high + shift
                else
                    if useFilter and stFlag > 0 and st[1] < st[1] and (close < open or high < high[1]) then st[1]
                    else if useFilter and stFlag < 0 and st[1] > st[1] and (close > open or low > low[1]) then st[1]
                    else st[1];

# -----------------------------
# signals
# -----------------------------
def notNaST = !IsNaN(st);
def upSignal = notNaST and close > st and close > ghlaLevel;
def downSignal = notNaST and close < st and close < ghlaLevel;
def neutralSignal = notNaST and !upSignal and !downSignal;

# -----------------------------
# Output (centered)
# -----------------------------
def signalCenter = 0;
plot Sig = signalCenter;
Sig.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Sig.SetLineWeight(4);

Sig.AssignValueColor(
    if upSignal then Color.GREEN
    else if downSignal then Color.RED
    else Color.LIGHT_GRAY
);

# Boundary reference lines
# -----------------------------
plot UpperLine = 1;
UpperLine.SetDefaultColor(Color.DARK_GRAY);
UpperLine.SetStyle(Curve.SHORT_DASH);

plot LowerLine = -1;
LowerLine.SetDefaultColor(Color.DARK_GRAY);
LowerLine.SetStyle(Curve.SHORT_DASH);

# Gann High/Low Activator Oscillator

input activatorPeriod = 14;

# Calculate simple moving averages
def avgHigh = Average(high, activatorPeriod);
def avgLow = Average(low, activatorPeriod);

# Determine state
def bullState = close > avgHigh;
def bearState = close < avgLow;

# Track the last valid state
def lastState = CompoundValue(1,
    if bullState then 1
    else if bearState then -1
    else lastState[1],
0);

def avgRange = avgHigh - avgLow;
def oscillator =
    if avgRange != 0 then
        if lastState == 1 then (close - avgLow) / avgRange
        else if lastState == -1 then (close - avgHigh) / avgRange
        else 0.5
    else 0.5;

# Plot oscillator
plot GannOsc = oscillator;
GannOsc.SetLineWeight(2);
GannOsc.AssignValueColor(
    if lastState == 1 then CreateColor(0, 255, 0) # Green
    else if lastState == -1 then CreateColor(255, 165, 0) # Orange
    else Color.GRAY
);

# Plot midline
plot MidLine = 0.5;
MidLine.SetDefaultColor(Color.LIGHT_GRAY);
MidLine.SetStyle(Curve.SHORT_DASH);

Sorry to go a bit off topic here - can I ask what you are using to plot the Support / Resistance lines in the main chart body of the original attachment? I like the look of that & would like to try it out.

 

[cando13579]

Sorry to go a bit off topic here - can I ask what you are using to plot the Support / Resistance lines in the main chart body of the original attachment? I like the look of that & would like to try it out.

You can find the link on post #11 @Gon Fishin