Repaints Keltner Channel multiple timeframe in ThinkorSwim?

[ezrollin]

Does anyone have a script or can tell me how to build one that shows the 4hr kelts on all timeframes? My friends use theirs alot

Thanks

 

[horserider]

# KeltnerChannels Channels with aggregation Period
# Horserider 4/7/2020

declare weak_volume_dependency;

input displace = 0;
input factor = 1.5;
input length = 20;
input averageType = AverageType.SIMPLE;
input trueRangeAverageType = AverageType.SIMPLE;
input agg = aggregationPeriod.FOUR_HOURS;
def shift = factor * MovingAverage(trueRangeAverageType, TrueRange(high(period = agg), close(period = agg), low(period = agg)), length);

def average = MovingAverage(averageType, close(period = agg), length);

plot Avg = average[-displace];
Avg.SetDefaultColor(GetColor(1));

plot Upper_Band = average[-displace] + shift[-displace];
Upper_Band.SetDefaultColor(GetColor(8));

plot Lower_Band = average[-displace] - shift[-displace];
Lower_Band.SetDefaultColor(GetColor(5));

 

[ezrollin]

You are amazing, Thanks so much!

 

[ezrollin]

Why do you think it doesnt work on mobile?

 

[horserider]

Do not use mobile so no idea. Thought someone had said aggregations do not work on mobile. I do know mobile is hit or miss for many custom studies. Maybe a mobile user can chime in here.

 

[ShinJ]

# KeltnerChannels Channels with aggregation Period
# Horserider 4/7/2020

declare weak_volume_dependency;

input displace = 0;
input factor = 1.5;
input length = 20;
input averageType = AverageType.SIMPLE;
input trueRangeAverageType = AverageType.SIMPLE;
input agg = aggregationPeriod.FOUR_HOURS;
def shift = factor * MovingAverage(trueRangeAverageType, TrueRange(high(period = agg), close(period = agg), low(period = agg)), length);

def average = MovingAverage(averageType, close(period = agg), length);

plot Avg = average[-displace];
Avg.SetDefaultColor(GetColor(1));

plot Upper_Band = average[-displace] + shift[-displace];
Upper_Band.SetDefaultColor(GetColor(8));

plot Lower_Band = average[-displace] - shift[-displace];
Lower_Band.SetDefaultColor(GetColor(5));

Thank you for your study, this one is very helpful!

Can you please add label that will indicate if price is outside or inside of Keltner Channel?

 

[red_man_1111]

# KeltnerChannels Channels with aggregation Period # Horserider 4/7/2020 declare weak_volume_dependency; input displace = 0; input factor = 1.5; input length = 20; input averageType = AverageType.SIMPLE; input trueRangeAverageType = AverageType.SIMPLE; input agg = aggregationPeriod.FOUR_HOURS; def shift = factor * MovingAverage(trueRangeAverageType, TrueRange(high(period = agg), close(period = agg), low(period = agg)), length); def average = MovingAverage(averageType, close(period = agg), length); plot Avg = average[-displace]; Avg.SetDefaultColor(GetColor(1)); plot Upper_Band = average[-displace] + shift[-displace]; Upper_Band.SetDefaultColor(GetColor(8)); plot Lower_Band = average[-displace] - shift[-displace]; Lower_Band.SetDefaultColor(GetColor(5));

Hello, i know its been quite some time, wonder if its possible to include custom name on the right for every level? thanks.

 

[useThinkScript]

Hello, i know its been quite some time, wonder if its possible to include custom name on the right for every level? thanks.

Chart Bubbles On The Right Of Levels

Append this code snippet to the bottom of your study:

input offSet = 2;
def bar = barNumber();
def timeAxis = if IsNaN(close[-1]) and !IsNaN(close) then bar else timeAxis[1];
AddChartBubble(bar == HighestAll(timeAxis+offSet), Upper_Band, "Upper", GetColor(8));
AddChartBubble(bar == HighestAll(timeAxis+offSet), Avg, "Mid", GetColor(1));
AddChartBubble(bar == HighestAll(timeAxis+offSet), Lower_Band, "Lower", GetColor(5));

 

[red_man_1111]

Chart Bubbles On The Right Of Levels

Append this code snippet to the bottom of your study:

input offSet = 2;
def bar = barNumber();
def timeAxis = if IsNaN(close[-1]) and !IsNaN(close) then bar else timeAxis[1];
AddChartBubble(bar == HighestAll(timeAxis+offSet), Upper_Band, "Upper", GetColor(8));
AddChartBubble(bar == HighestAll(timeAxis+offSet), Avg, "Mid", GetColor(1));
AddChartBubble(bar == HighestAll(timeAxis+offSet), Lower_Band, "Lower", GetColor(5));

thank you very much, it doesn't seem to plot in Daily chart?
Attached image on 3m timeframe; wonder if its possible to plot them on the far right like the other plots?

I've tried to work around with the other bubble code with no luck

input ShowBubbles = yes;
input locate_bubbles_at_time = 0930;
def displace = -1;
def timeopen = SecondsFromTime(locate_bubbles_at_time) == 0;
input bubble_placement = {default right_edge, timeopen};

def right_edge = barnumber() == highestall(barnumber() - 1);

DefineGlobalColor("PD_High", CreateColor(255,204,153));
AddChartBubble(ShowBubbles and
if bubble_placement == bubble_placement.timeopen
then timeopen
else right_edge, PD_High, "PD High: " + PD_High, GlobalColor("PD_High"));

unfortunately that doesn't align them to the right when zoom in

 

[useThinkScript]

Attached image on 3m timeframe; wonder if its possible to plot them on the far right like the other plots?

Yes, you can adjust the offset to move the bubble