Archived: Supertrend Indicator by Mobius for ThinkorSwim

[Jusdoit]

This is one of the best indicators I’ve used! I use it on the 5 minute chart, but I find myself selling way too early. Is there another indicator I can pair with it to help me stay more patient?

 

[MerryDay]

@Shawtysto As you were asking your question, @BenTen was answering it in another thread
https://usethinkscript.com/threads/what-is-a-good-indicator-for-knowing-when-to-sell.6322/#post-61300

 

[Homemadeitmyself]

This is one of the best indicators I’ve used! I use it on the 5 minute chart, but I find myself selling way too early. Is there another indicator I can pair with it to help me stay more patient?

yes. https://usethinkscript.com/threads/balanced-bb-breakout.5708/page-38#post-62096

 

[vighnaraj]

Hello Everyone,

I tried this coding in TOS; however, it does not work on timeframes above 15 minutes. Any ideas on how to make it work on timeframes of the chart higher than 15 minutes or is this indicator used only for daytrading on smaller timeframe charts?

 

[MerryDay]

@vighnaraj "does not work" is not enough of a description of your problem for anyone to help you.
I use this indicator to confirm trend and momentum on 15min, 1hr, 2hr, 4hr, D, W, & M

What is not working for you? What time frame are you trading in?
Please post the script you are using and screenshots marked up w/ what you are looking for using these guidelines:
How to post scripts and screenshots
HTH

 

[rad14733]

@vighnaraj charts cannot display lower aggregations

 

[spencepuppy]

Does this repaint?

 

[Pensar]

@spencepuppy I don't see anything in the code that would make it repaint, and never had it repaint when I used it.

 

[mrukyj]

I have installed the Mobius SuperTrend scan into my stock hacker, and if I run a scan it works. When I try to save it as a watch list I get this message:
" Error occurred on watchlist "BenTen_SuperTrend_Scan" You cannot update watchlist" What am I doing wrong? Just to mention what ever indicators or scans I install from Use Thinkscript, I preface them with BenTen just to make them easier for me to find, No discourtesy to Mobius.

 

[rad14733]

I have installed the Mobius SuperTrend scan into my stock hacker, and if I run a scan it works. When I try to save it as a watch list I get this message:
" Error occurred on watchlist "BenTen_SuperTrend_Scan" You cannot update watchlist" What am I doing wrong? Just to mention what ever indicators or scans I install from Use Thinkscript, I preface them with BenTen just to make them easier for me to find, No discourtesy to Mobius.

Give it a different name when you save it to see if that helps... Are you saving as a Scan or as a Watchlist...???

 

[sherkhane]

Hello,

The supertrend doesn't show the buy and sell prices on mobile, does anyone has this working on mobile?

 

[nik]

Hello, i am very new to this forum and i must say i have learned a lot on this forum than anywhere else so far. Thank you for everything you all contribute here much appreciated it.

Before i jumped to my problem, i just like to mention i went over all the 26 pages to find solution of my problem thinking i am not doing probably something nor right but unfortunately i couldn't figure my scan issue yet.

I am experiencing an issue with this scan, I used exactly same code as listed on page1 here at post #1 for charting and scanning .
For scanning i used thinkScript Editor under scan tab without anything else (just simple copy paste of below code) but the results i am getting on D aggregation are false , in other words i am seeing securties like Disney , C , GM on scan with D aggregations but now if i go to my chart which was plotted using below code (added as study) it does not show same signal. In other words i am getting false indicators when scanning. Do i need to change any more settings.

Code for charting (using study) - again taken from #1 in this thread

# Mobius
# SuperTrend
# Chat Room Request
input AtrMult = 1.0;
input nATR = 4;
input AvgType = AverageType.HULL;
input PaintBars = yes;
def ATR = MovingAverage(AvgType, TrueRange(high, close, low), nATR);
def UP = HL2 + (AtrMult * ATR);
def DN = HL2 + (-AtrMult * ATR);
def ST = if close < ST[1] then UP else DN;
plot SuperTrend = ST;
SuperTrend.AssignValueColor(if close < ST then Color.RED else Color.GREEN);
AssignPriceColor(if PaintBars and close < ST

                 then Color.RED

                 else if PaintBars and close > ST

                      then Color.GREEN

                      else Color.CURRENT);

AddChartBubble(close crosses below ST, low[1], low[1], color.Dark_Gray);
AddChartBubble(close crosses above ST, high[1], high[1], color.Dark_Gray, no);
# End Code SuperTrend

Scan Code - used for scanning securities

Code:

# SuperTrend Scan
# Mobius
# V01.10.2015
# Comment out (#) the direction NOT to use for a scan

input AtrMult = 1.0;
input nATR = 4;
input AvgType = AverageType.HULL;
def h = high;
def l = low;
def c = close;
def v = volume;
def ATR = MovingAverage(AvgType, TrueRange(h, c, l), nATR);
def UP = HL2 + (AtrMult * ATR);
def DN = HL2 + (-AtrMult * ATR);
def ST = if c < ST[1]
         then Round(UP / tickSize(), 0) * tickSize()
         else Round(DN / tickSize(), 0) * tickSize();
plot SuperTrendUP = if ST crosses below close then 1 else 0;
# End Code SuperTrend

 

[rad14733]

@nik AtrMult has to be the same for both the Study and the Scan... That's your problem... Set them both to either 1.0 or 0.70 and see what happens...

 

[nik]

That

@nik AtrMult has to be the same for both the Study and the Scan... That's your problem... Set them both to either 1.0 or 0.70 and see what happens...

That worked @rad14733 i did noticed that in original thread they were different too, they are 1.0 at chart code and 0.70 scan code - thanks for all your help.

Few quick questions if you have an idea:
1. For long time - like i chart on 6m1d and go for longer trends, does 1.0 better suit than 0.70 for AltMult
2. When we scan if results are positive it should be for last closing candle right? never for few candles in past

 

[rad14733]

That


That worked @rad14733 i did noticed that in original thread they were different too, they are 1.0 at chart code and 0.70 scan code - thanks for all your help.

Few quick questions if you have an idea:
1. For long time - like i chart on 6m1d and go for longer trends, does 1.0 better suit than 0.70 for AltMult
2. When we scan if results are positive it should be for last closing candle right? never for few candles in past

You're welcome...

1.) You need to experiment to determine what settings work best for a given timeframe, and sometimes a given symbol... Some symbols will benefit from fine-tuning...

2.) Any lookback is totally up to your preference... You could experiment with a number of bars but that should only be a potential requirement for intraday timeframes...

 

[nik]

Thanks @rad14733

​

How do i set the number of bars in scan, is it a code change. I know we can set that in condition wizard but when we use thinkscript editor we do not get that choice

Basically i wanted to go back 2 candles (2 day candles) and see if within 2 candles we had a low or high signal to avoid any false positives.
AFAIK this indicator does not repaint so if i wait for one more day calendar may be i would be able to cut down on any false positive signals.
So how do we set within 2 candles here with this scan is i guess my question here. Thanks again

 

[rad14733]

@nik To look back 2 bars you would edit the following two lines of code...

plot SuperTrendUP = if ST crosses below close within 2 bars then 1 else 0;
#plot SuperTrendDN = if ST crosses above close within 2 bars then 1 else 0;

 

[mordakie]

how do i plug this code
into TOS scanner ?

 

[MerryDay]

@mordakie SuperTrend Scan Code can be found --> https://usethinkscript.com/threads/...y-mobius-for-thinkorswim.7/page-27#post-68818

 

[bennyRA]

hey I have the indicator you were looking for. Exact same thing.

After you paste in the code, go into the settings of the indicator, scroll all the way down, click super trend box, and then uncheck the 'show plot' box to have a working version that is the exact code you are looking for.

#Public Indicator
#Special Thanks to Morbius who created original super trend indicator. This is a spin off of his work. All credits go to him. This software is free.
#CREATED 09/12/2020


input AtrMult = 0.7;
input nATR = 4;
input AvgType = AverageType.HULL;
input PaintBars = yes;
def ATR = MovingAverage(AvgType, TrueRange(high, close, low), nATR);
def UP = HL2 + (AtrMult * ATR);
def DN = HL2 + (-AtrMult * ATR);
def ST = if close < ST[1] then UP else DN;
plot SuperTrend = ST;

SuperTrend.AssignValueColor(if close < ST then Color.GREEN else color.RED);

AssignPriceColor(if PaintBars and close < ST

                 then Color.RED

                 else if PaintBars and close > ST

                      then Color.GREEN

                      else Color.CURRENT);

#AddChartBubble(close crosses below ST, low[1], low[1], #color.Dark_Gray);
#AddChartBubble(close crosses above ST, high[1], high[1], #color.Dark_Gray, no);
# End Code SuperTrend# Mobius
# SuperTrend
# Chat Room Request

plot SuperTrendUp = close crosses above ST;
plot SuperTrendDown = close crosses below ST;
SuperTrend.AssignValueColor(if close < ST then Color.RED else Color.GREEN);
SuperTrendUp.SetDefaultColor(Color.YELLOW);
SuperTrendUp.setPaintingStrategy(PaintingStrategy.BOOLEAN_ARROW_UP);
SuperTrendDown.SetDefaultColor(Color.PINK);
SuperTrendDown.setPaintingStrategy(PaintingStrategy.BOOLEAN_ARROW_DOWN);

def bullish = close crosses below ST;
def bearish = close crosses above ST;

# Alerts
Alert(bullish, " ", Alert.Bar, Sound.Chimes);
Alert(bearish, " ", Alert.Bar, Sound.Bell);





#ProjectionPivots_v03_JQ
#03.04.2019
#Original Code and Concept by Mobius:
# V01.08.2012 Projection Pivots
# mobius

# Notes:
# 03.04.2019 added linits on extensions
# 03.05.2019 adjusted limits on extensions by adding user input upper and lower extenion percent limits

#declare Once_Per_Bar;
#Inputs
input n = 21;
input showLines = yes;
input showValues = no;
input showBarNumbers = no;
input ExtensionLengthBars = 20; # added to control length of Entension
input UpperExtensionPercentLimit = 5;
input LowerExtensionPercentLimit = 5;
input DisplayLabel = yes;    #JQ 7.8.2018 added
    addlabel (DisplayLabel, "Projection Pivots n:" + n + " " , color.WHITE);    #JQ 7.8.2018 added


# Universal Header _v030429019 _JQ
#     code from various sources including Mobius, NoLongerNube and others
# Comment out unnecessary portions to preserve tos memory and enhance speed

# Universal Definitions using Padawan variable naming convention (JQ) v03.04.2019
# iData Definitions
    def vHigh = high;  # creates the variable vHigh.  Use of the variable reduce data calls to tos iData server
#    def initHigh =  CompoundValue(1, high, high);  # creates and initialized variable for High
    def vLow = low;
#    def initLow = CompoundValue(1, low, low);
    def vOpen = open;
#    def initOpen = CompoundValue(1, open, open);
    def vClose = close;
#    def initClose = CompoundValue(1, close, close);
    def vVolume = volume;
#    def initVolume = CompoundValue(1, volume, volume);
    def nan = Double.NaN;
# Bar Time & Date
    def bn = BarNumber();
    def currentBar = HighestAll(if !IsNaN(vHigh) then bn else nan);
#    def Today = GetDay() ==GetLastDay();
#    def time = GetTime();
#    def GlobeX = GetTime() < RegularTradingStart(GetYYYYMMDD());
    # def globeX_v2 = if time crosses below RegularTradingEnd(GetYYYYMMDD()) then bn else GlobeX[1];
#    def RTS  = RegularTradingStart(GetYYYYMMDD());
#    def RTE  = RegularTradingEnd(GetYYYYMMDD());
#    def RTH = GetTime() > RegularTradingStart(GetYYYYMMDD());
#    def RTH_v2 = if time crosses above RegularTradingStart(GetYYYYMMDD()) then bn else RTH[1];

# bars that start and end the sessions  #(borrowed from nube)
#    def rthStartBar    = CompoundValue(1,
#                         if   !IsNaN(vClose)
#                         &&   time crosses above RegularTradingStart(GetYYYYMMDD())
#                         then bn
#                         else rthStartBar[1], 0);
#    def rthEndBar      = CompoundValue(1,
#                         if   !IsNaN(vClose)
#                         &&   time crosses above RegularTradingEnd(GetYYYYMMDD())
#                         then bn
#                         else rthEndBar[1], 1);
#    def globexStartBar = CompoundValue(1,
#                         if   !IsNaN(vClose)
#                         &&   time crosses below RegularTradingEnd(GetYYYYMMDD())
#                         then bn
#                         else globexStartBar[1], 1);
#    def rthSession = if   bn crosses above rthStartBar #+ barsExtendedBeyondSession
#                     then 1
#                     else if   bn crosses above rthEndBar #+ barsExtendedBeyondSession
#                          then 0
#                     else rthSession[1];

# Bubble Locations
    def x_AxisLastExpansionBar = BarNumber() == HighestAll(BarNumber());  #corrected 11.12.2018 (JQ)
        # syntax: addChartBubble(x_AxisLastExpansionBar, y-axis coordinate," text", Color.LIME); #verified 12.25.2018 (JQ)

def PH;
   def PL;
   def hh = fold i = 1 to n + 1
            with p = 1
            while p
            do vHigh > getValue(vHigh, -i);
       PH = if (bn > n and
                vHigh == highest(vHigh, n) and
                hh)
            then vHigh
            else double.NaN;
   def ll = fold j = 1 to n + 1
            with q = 1
            while q
            do vLow < getValue(low, -j);
       PL = if (bn > n and
                vLow == lowest(vLow, n) and
                ll)
            then vLow
            else double.NaN;
   def PHBar = if !isNaN(PH)
               then bn
               else PHBar[1];
   def PLBar = if !isNaN(PL)
               then bn
               else PLBar[1];
   def PHL = if !isNaN(PH)
             then PH
             else PHL[1];
   def priorPHBar = if PHL != PHL[1]
                    then PHBar[1]
                    else priorPHBar[1];
   def PLL = if !isNaN(PL)
             then PL
             else PLL[1];
   def priorPLBar = if PLL != PLL[1]
                    then PLBar[1]
                    else priorPLBar[1];
   def HighPivots = bn >= highestAll(priorPHBar);
   def LowPivots = bn >= highestAll(priorPLBar);
   def FirstRpoint = if HighPivots
                     then bn - PHBar
                     else 0;
   def PriorRpoint = if HighPivots
                     then bn - PriorPHBar
                     else 0;
   def RSlope = (getvalue(PH, FirstRpoint) - getvalue(PH, PriorRpoint))
                       / (PHBar - PriorPHBar);
   def FirstSpoint = if LowPivots
                     then bn - PLBar
                     else 0;
   def PriorSpoint = if LowPivots
                     then bn - PriorPLBar
                     else 0;
   def SSlope = (getvalue(PL, FirstSpoint) - getvalue(PL, PriorSpoint))
                   / (PLBar - PriorPLBar);
   def RExtend = if bn == highestall(PHBar)
                 then 1
                 else RExtend[1];
   def SExtend = if bn == highestall(PLBar)
                 then 1
                 else SExtend[1];

  plot pivotHigh = if HighPivots
                   then PH
                   else double.NaN;
       pivotHigh.SetDefaultColor(GetColor(1));
       pivotHigh.setPaintingStrategy(PaintingStrategy.VALUES_ABOVE);
       pivotHigh.setHiding(!showValues);

  plot pivotHighLine = if PHL > 0 and
                          HighPivots
                       then PHL
                       else double.NaN;
       pivotHighLine.SetPaintingStrategy(PaintingStrategy.DASHES);  # Mobius original was DASHES
       pivotHighLine.setDefaultColor(color.uptick);    #JQ 7.8.2018 added
       pivotHighLine.setHiding(!showLines);

  plot RLine = pivotHigh;
       RLine.enableApproximation();
       RLine.SetDefaultColor(Color.LIGHT_GRAY);
       RLine.SetStyle(Curve.Short_DASH);

# Added code to limit resistance estension line (JQ 03.04.2019)
  def calc_ResistanceExtension = if RExtend
                    then (bn - PHBar) * RSlope + PHL
                    else double.NaN;
  plot line_ResistanceExtension = if bn <= (Currentbar + ExtensionLengthBars)
                                   and calc_ResistanceExtension[1] >=  (lowestall(vLow) * (1-(lowerExtensionPercentLimit/100)))
                                   and calc_ResistanceExtension[1] <= (Highestall(vHigh) * (1 + (upperExtensionPercentLimit/100)))
                               then calc_ResistanceExtension else double.nan;
       line_ResistanceExtension.SetStyle(Curve.Short_DASH);
       line_ResistanceExtension.SetDefaultColor(color.LIGHT_GRAY); #was 7
       line_ResistanceExtension.setLineWeight(1);

# Low Plots
  plot pivotLow = if LowPivots
                  then PL
                  else double.NaN;
       pivotLow.setDefaultColor(GetColor(4));
       pivotLow.setPaintingStrategy(PaintingStrategy.VALUES_BELOW);
       pivotLow.setHiding(!showValues);

  plot pivotLowLine = if PLL > 0 and
                         LowPivots
                      then PLL
                      else double.NaN;
       pivotLowLine.SetPaintingStrategy(PaintingStrategy.DASHES);  # Mobius original was DASHES
       pivotLowLine.setDefaultColor(color.DOWNTICK);#  #  JQ 7.8.2018 added
       pivotLowLine.setHiding(!showLines);

  plot SupportLine = pivotLow;
       SupportLine.enableApproximation();
       SupportLine.SetDefaultColor(color.LIGHT_GRAY);
       SUpportLine.SetStyle(Curve.Short_DASH);

# Added code to limit support estension line (JQ 03.04.2019)
  def calc_SupportExtension = if SExtend
                          then (bn - PLBar) * SSlope + PLL
                          else double.NaN;
  plot line_SupportExtension = if bn <= (Currentbar + ExtensionLengthBars)
                                   and calc_SupportExtension[1] >= (lowestall(vLow) * (1-(lowerExtensionPercentLimit/100)))
                                   and calc_SupportExtension[1] <= (Highestall(vHigh) * (1 + (upperExtensionPercentLimit/100)))
                               then calc_supportExtension else double.nan;
       line_SupportExtension.SetDefaultColor(color.LIGHT_GRAY); #was 7
       line_SupportExtension.SetStyle(Curve.Short_DASH);
       line_SupportExtension.setLineWeight(1);

  plot BarNumbersBelow = bn;
       BarNumbersBelow.SetDefaultColor(GetColor(0));
       BarNumbersBelow.setHiding(!showBarNumbers);
       BarNumbersBelow.SetPaintingStrategy(PaintingStrategy.VALUES_BELOW);

  plot PivotDot = if !isNaN(pivotHigh)
                  then pivotHigh
                  else if !isNaN(pivotLow)
                  then pivotLow
                  else double.NaN;
       pivotDot.SetDefaultColor(GetColor(7));
       pivotDot.SetPaintingStrategy(PaintingStrategy.POINTS);
       pivotDot.SetLineWeight(3);
##



# End Code

Hey @guacamole Is there a video or an explanation anywhere how to use this greatest indicator new to using custom indicators