Leavitt Slope and Leavitt Acceleration Indicators For ThinkOrSwim

[BillW]

@MerryDay I use this with Aroon up and down with standard 25 period. Aroon's lag pretty much eliminates what I call false entry signals with Leavitt. Aroon takes a little time to understand its nuances.

 

[MerryDay]

@BillW The TOS platform makes me crazy sometimes. But I keep coming back because of this forum and posters like you. The Aroon will work better with the MACD BB. Thanks!

 

[BillW]

@BillW The TOS platform makes me crazy sometimes. But I keep coming back because of this forum and posters like you. Using the Aroon eliminated 75% of my false signals. You are the best!

I do use different Aroon settings for different time frames 7 minute is 25 15 and 30min are 8

 

[Jtopaz]

@MerryDay
What is the difference between Leavitt Slope & TTM Squeeze (SqueezePro) ?
They look quite similar.
Leavitt Slope seems better than TTM Squeeze in presenting the overall trend.
TTM Squeeze is more sensitive to price changes.

 

[rad14733]

@MerryDay
What is the difference between Leavitt Slope & TTM Squeeze (SqueezePro) ?
They look quite similar.
Leavitt Slope seems better than TTM Squeeze in presenting the overall trend.
TTM Squeeze is more sensitive to price changes.

The histogram portions that look similar in both Studies are based on the Inertia() Study but I haven't checked to see if the settings are the same... The rest of both Studies is different...

 

[PapaTinnnnn]

Hello,

I have gone through the all the comments but am not sure if I am missing something for the Bull Begin/End verticle lines? I consider myself still a novice when it comes to the indicator game and am still getting a feel for what would work out for my style. However, I feel like on my chart they are lagging. Could I get another set of eyes to help me see what's could be wrong?

https://imgur.com/PGojK2U

This is the code that is for that section for the Verticle Lines. I was pretty sure that copied and pasted it directly in, so it shouldn't have been edited in any way.

AddVerticalLine(show_vertical_lines and trendState[1] != 1 and trendState == 1, "Bull End", GlobalColor("LabelRed"));
AddVerticalLine(show_vertical_lines and trendState[1] != 2 and trendState == 2, "Bull Begin", GlobalColor("LabelGreen"));

 

[MerryDay]

@PapaTinnnnn
I agree this study does not appear to provide anything constructive to your chart.
As I stated in the 1st post, it was something I was attempting to play with.
I found that I couldn't make it work w/ my strategies.

 

[Kbone]

Leavitt Convolution Slope w Bollinger Bands

#
# TD Ameritrade IP Company, Inc. (c) 2020-2021
#

declare lower;

input price = close;
input length = 49;

def lProjection = reference TimeSeriesForecast(price = price, length = length, "bar plus" = 1);
def convolutionLength = Floor(Sqrt(length));

plot LeavittConvolutionSlope = reference LinearRegressionSlope(price = lProjection, length = convolutionLength);
plot ZeroLine = 0;

LeavittConvolutionSlope.SetPaintingStrategy(PaintingStrategy.HISTOGRAM);
LeavittConvolutionSlope.DefineColor("Summer", Color.GREEN);
LeavittConvolutionSlope.DefineColor("Fall", Color.RED);
LeavittConvolutionSlope.DefineColor("Spring", Color.LIGHT_GREEN);
LeavittConvolutionSlope.DefineColor("Winter", Color.DARK_RED);
LeavittConvolutionSlope.AssignValueColor(if LeavittConvolutionSlope >= LeavittConvolutionSlope[1] and LeavittConvolutionSlope > 0 then LeavittConvolutionSlope.Color("Summer") else if LeavittConvolutionSlope < LeavittConvolutionSlope[1] and LeavittConvolutionSlope > 0 then LeavittConvolutionSlope.Color("Fall") else if LeavittConvolutionSlope < LeavittConvolutionSlope[1] and LeavittConvolutionSlope < 0 then LeavittConvolutionSlope.Color("Winter") else LeavittConvolutionSlope.Color("Spring"));
ZeroLine.SetDefaultColor(GetColor(7));
def LCS = LeavittConvolutionSlope;

input Num_Dev_Dn = -2.0;
input Num_Dev_up = 2.0;
input averageType = AverageType.Simple;

def sDev = stdev(data = LCS, 20);

plot MidLine = MovingAverage(averageType, LCS, 20);
plot Ldev2 = MidLine + -2 * sDev;
plot Udev2 = MidLine + 2* sDev;
plot Ldev1 = MidLine + -1 * sDev;
plot Udev1 = MidLine + 1* sDev;



#vw.setdefaultColor(color.yellow);
Udev1.SetDefaultColor(Color.violet);
Udev2.SetDefaultColor(Color.Plum);
Udev1.SetPaintingStrategy(PaintingStrategy.DASHES);
Udev2.SetPaintingStrategy(PaintingStrategy.DASHES);
Udev1.SetLineWeight(1);
Udev2.SetLineWeight(1);
Ldev1.SetDefaultColor(Color.Violet);
Ldev2.SetDefaultColor(Color.Plum);
Ldev1.SetPaintingStrategy(PaintingStrategy.DASHES);
Ldev2.SetPaintingStrategy(PaintingStrategy.DASHES);
Ldev1.SetLineWeight(1);
Ldev2.SetLineWeight(1);

Thank you very much for your ongoing contributions, Henry.

 

[shansp]

@Novaskimo here you go. I trust you know how to create a watch list column. All I did was remove the Vertical Lines for WL.

Full credit goes to @MerryDay

EDIT: Just realized CreateColor will not work for Watch list. So modified with static Color codes, Please feel free to change them to match the actual study colors. @Novaskimo

-Surya

# TOS Leavitt Convolution Slope TOS Leavitt Convolution Acceleration
# labels by @MerryDay January 2021
# https://www2.wealth-lab.com/wl5wiki/TASCJan2020.ashx

# TOS Leavitt Convolution Slope + # TOS Leavitt Convolution Acceleration
def LCSlope = reference LeavittConvolutionSlope("price" = close, "length" = 49)."LeavittConvolutionSlope" ;

# TOS Leavitt Convolution Acceleration
def LCAcceleration = reference LeavittConvolutionAcceleration("price" = close, "length" = 49)."LeavittConvolutionAcceleration" ;
def TrendBegin = LCSlope[1] < LCSlope[2] and LCSlope > LCSlope[1] and LCAcceleration > LCAcceleration[1];
def Trending = LCSlope > LCSlope[1] and LCAcceleration > LCAcceleration[1] ;
def Sloping = LCSlope > LCSlope[1];

AddLabel(LCSlope>=-.15,
if LCSlope[1] > LCSlope[2] and LCSlope < LCSlope[1] and LCAcceleration < LCAcceleration[1] then "Bull End"
else if LCSlope > LCSlope[1] and LCSlope crosses above -.15 and LCAcceleration > LCAcceleration[1] then "Bull Begin"
else if LCSlope[1] < LCSlope[2] and LCSlope > LCSlope[1] and LCAcceleration > LCAcceleration[1] then "Bull Begin"
else if LCSlope > LCSlope[1] and LCAcceleration > LCAcceleration[1] then "Slope & acceleration rising"
else if LCSlope > LCSlope[1] then "Slope rising-acceleration not"
else if LCSlope <= LCSlope[1] and LCAcceleration <= LCAcceleration[1] then "Slope & acceleration falling"
else if LCSlope < LCSlope[1] then "Slope falling"
else "Slope neutral" ,
if LCSlope[1] > LCSlope[2] and LCSlope < LCSlope[1] and LCAcceleration < LCAcceleration[1] then Color.Yellow
else if LCSlope > LCSlope[1] and LCSlope crosses above -.15 and LCAcceleration > LCAcceleration[1] then Color.Green
else if LCSlope[1] < LCSlope[2] and LCSlope > LCSlope[1] and LCAcceleration > LCAcceleration[1] then Color.Green
else if LCSlope > LCSlope[1] and LCAcceleration > LCAcceleration[1] then Color.Green
else if LCSlope > LCSlope[1] then Color.Plum
else if LCSlope <= LCSlope[1] and LCAcceleration <= LCAcceleration[1] then Color.Red
else if LCSlope < LCSlope[1] then Color.Red
else Color.Plum);

For some reason this is not getting refreshed and still shows "Bull Begin" when its actually ended. Does anyone have the same issue?