candle value at x hour

[shakib3585]

Hello All,

Identify the High, Low, and Close values of a one-hour candle formed between 16:00 and 17:00 (EST)

I am looking for a ThinkScript code that can identify the high, low, and close values of a one-hour candle formed between 16:00 and 17:00 (EST) and plot them as horizontal lines. I also intend to utilize this script for scanning purposes with a one-hour aggregation period, enabling it to scan stocks where the closing price has crossed below the low of the 16:00–17:00 candle. Please help.

Thank you very much

Bumping up the post again for attention

 

[SleepyZ]

Hello All,

Identify the High, Low, and Close values of a one-hour candle formed between 16:00 and 17:00 (EST)

I am looking for a ThinkScript code that can identify the high, low, and close values of a one-hour candle formed between 16:00 and 17:00 (EST) and plot them as horizontal lines. I also intend to utilize this script for scanning purposes with a one-hour aggregation period, enabling it to scan stocks where the closing price has crossed below the low of the 16:00–17:00 candle. Please help.

Thank you very much

Bumping up the post again for attention

This is code for the chart. For the scan code, change the plots for the lines to defs and remove all the paintingstrategies code.

#HLC_Lookback_Periods_Time
input lookback = 1;
input time = 1700;
input agg = AggregationPeriod.HOUR;

def cond = SecondsFromTime(time)[1] < 0 and SecondsFromTime(time) >= 0 or SecondsFromTime(time) == 0;

def ymd = GetYYYYMMDD();
def count = if !IsNaN(close) and ymd != ymd[1] then count[1] + 1 else count[1];
def cond1 = HighestAll(count) - count ;

def H = if cond1 == lookback and cond then high(period = agg) else H[1];
def L = if cond1 == lookback and cond then low(period = agg) else L[1];
def C = if cond1 == lookback and cond then close(period = agg) else C[1];

plot Hi = H;
plot Lo = L;
plot Cl = C;

Hi.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Lo.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Cl.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);

input troubleshoot = no;
AddChartBubble(troubleshoot, low, cond + "\n" + cond1 + "\n" + GetDay() + "\n" + cond + "\n" + Hi, Color.GRAY, no);

#

 

[shakib3585]

This is code for the chart. For the scan code, change the plots for the lines to defs and remove all the paintingstrategies code.

Thank you @SleepyZ. I have one request, please, for this code. Can you modify the code by having a provision for getback. What I request is for any given getback (1 day back, 2 days back etc.) I would like to see the high, low and close plots for the same 1 hour bar.
Thank you

 

[SleepyZ]

Thank you @SleepyZ. I have one request, please, for this code. Can you modify the code by having a provision for getback. What I request is for any given getback (1 day back, 2 days back etc.) I would like to see the high, low and close plots for the same 1 hour bar.
Thank you

Try this

#HLC_Lookback_Periods_Time
input lookback = 1;
input time = 1700;
input agg = AggregationPeriod.HOUR;

def cond = SecondsFromTime(time)[1] < 0 and SecondsFromTime(time) >= 0 or SecondsFromTime(time) == 0;

def ymd = GetYYYYMMDD();
def count = if !IsNaN(close) and ymd != ymd[1] then count[1] + 1 else count[1];
def cond1 = HighestAll(count) - count ;

def H = if cond1 == lookback and cond then high(period = agg) else H[1];
def L = if cond1 == lookback and cond then low(period = agg) else L[1];
def C = if cond1 == lookback and cond then close(period = agg) else C[1];

plot Hi = H;
plot Lo = L;
plot Cl = C;

Hi.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Lo.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Cl.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);

input troubleshoot = no;
AddChartBubble(troubleshoot, low, cond + "\n" + cond1 + "\n" + GetDay() + "\n" + cond + "\n" + Hi, Color.GRAY, no);

#

plot scan = close crosses below Lo;
scan.SetPaintingStrategy(PaintingStrategy.BOOLEAN_ARROW_DOWN);

#

 

[shakib3585]

Try this

thank you @SleepyZ , I plotted your study on a 1-hour aggregation and on a 1-minute aggregation for the ticker NVFY. I see the values in 1 hour aggregation are correct but the same plot in 1 minute aggregation is showing different numbers. Can you please help to fix the error?

Thank you very much

 

[shakib3585]

thank you @SleepyZ , I plotted your study on a 1-hour aggregation and on a 1-minute aggregation for the ticker NVFY. I see the values in 1 hour aggregation are correct but the same plot in 1 minute aggregation is showing different numbers. Can you please help to fix the error?

Thank you very much

Fixed it

input lookback = 1;
input time = 1700;
input agg  = AggregationPeriod.HOUR;
def cond   = SecondsFromTime(time)[1] < 0 and SecondsFromTime(time) >= 0;
def H = if getday()== getlastday() - lookback and cond then high(period=agg) else H[1];
def L = if getday()== getlastday() - lookback and cond then low(period=agg) else L[1];
def C = if getday()== getlastday() - lookback and cond then close(period=agg) else C[1];

plot Hi = H;
plot Lo = L;
plot Cl = C;

 

[shakib3585]

Fixed it

input lookback = 1;
input time = 1700;
input agg  = AggregationPeriod.HOUR;
def cond   = SecondsFromTime(time)[1] < 0 and SecondsFromTime(time) >= 0;
def H = if getday()== getlastday() - lookback and cond then high(period=agg) else H[1];
def L = if getday()== getlastday() - lookback and cond then low(period=agg) else L[1];
def C = if getday()== getlastday() - lookback and cond then close(period=agg) else C[1];

plot Hi = H;
plot Lo = L;
plot Cl = C;

Hello @SleepyZ , I had a strange issue with this code today, pre-market. I used a 1-day lookback with the time given as 0900. the ticker was IMCC. I saw that even though there were values for the high, low, and close, the code was showing "0" values. Can you please help to resolve it.

Thank you very much

 

[SleepyZ]

Hello @SleepyZ , I had a strange issue with this code today, pre-market. I used a 1-day lookback with the time given as 0900. the ticker was IMCC. I saw that even though there were values for the high, low, and close, the code was showing "0" values. Can you please help to resolve it.

Thank you very much

Fixed.
Regrettably, time and timeframes are not straight forward with TOS.
This needed more complex code than just using the getday() or getyyyymmdd() by themselves.
The optional troubleshooter is what I often use to detact problems.

#HLC_Lookback_Periods_Time
input lookback = 1;
input time     = 1700;
input agg      = AggregationPeriod.HOUR;

def cond   = SecondsFromTime(time)[1] < 0 and SecondsFromTime(time) >= 0 or SecondsFromTime(time) == 0;

def ymd    = GetYYYYMMDD();
def count  = if !IsNaN(close) and ymd != ymd[1] then count[1] + 1 else count[1];
def cond1  = HighestAll(count) - count ;

def H = if cond1 == lookback and cond then high(period = agg) else H[1];
def L = if cond1 == lookback and cond then low(period = agg) else L[1];
def C = if cond1 == lookback and cond then close(period = agg) else C[1];

plot Hi = H;
plot Lo = L;
plot Cl = C;

Hi.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Lo.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Cl.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);

input troubleshoot = no;
AddChartBubble(troubleshoot, low, cond + "\n" + cond1 + "\n" + GetDay() + "\n" + cond + "\n" + Hi, Color.GRAY, no);

#

 

[shakib3585]

Fixed.
Regrettably, time and timeframes are not straight forward with TOS.
This needed more complex code than just using the getday() or getyyyymmdd() by themselves.
The optional troubleshooter is what I often use to detact problems.

Thank you so much, @SleepyZ . For a check, I used the 1 minute aggregation with a 1 day lookback and using the time as 1606. Unfortunately, it is showing the same error at 1 minute aggregation

 

[SleepyZ]

Thank you so much, @SleepyZ . For a check, I used the 1 minute aggregation with a 1 day lookback and using the time as 1606. Unfortunately, it is showing the same error at 1 minute aggregation

Sorry, too early here. I corrected this line that was missing an inportant exclamation mark and posted it in the above code.
def count = if !IsNaN(close) and ymd != ymd[1] then count[1] + 1 else count[1];

 

[shakib3585]

Sorry, too early here. I corrected this line that was missing an inportant exclamation mark and posted it in the above code.
def count = if !IsNaN(close) and ymd != ymd[1] then count[1] + 1 else count[1];
View attachment 21434

Thank you to the extreme, @SleepyZ !

 

[shakib3585]

Thank you to the extreme, @SleepyZ !

One request, please, @SleepyZ . Alongside the option of the lookback period, can you help to modify the code so that I can lookback based on a given previous date. For example, if I want to go to a date 5 days ago, I will just input the date 5 days back and it will go there. I would like to have the final option as I will have a choice to lookback either with a given earlier date, or with a lookback period.

Thank you very much

 

[SleepyZ]

One request, please, @SleepyZ . Alongside the option of the lookback period, can you help to modify the code so that I can lookback based on a given previous date. For example, if I want to go to a date 5 days ago, I will just input the date 5 days back and it will go there. I would like to have the final option as I will have a choice to lookback either with a given earlier date, or with a lookback period.

Thank you very much

This now has a mode input for Period or Date.

#HLC_Lookback_Periods_Time_or_Date

input mode     = {default Period, Date};
input lookback = 1;
input dateback = 20240401;
input time     = 1700;
input agg      = AggregationPeriod.HOUR;

def cond   = SecondsFromTime(time)[1] < 0 and SecondsFromTime(time) >= 0 or SecondsFromTime(time) == 0;

def ymd    = GetYYYYMMDD();
def count  = if !IsNaN(close) and ymd != ymd[1] then count[1] + 1 else count[1];
def cond1  = HighestAll(count) - count ;

def H = if
        if mode == mode.Date
        then GetYYYYMMDD() == dateback and cond
        else cond1 == lookback and cond
        then high(period = agg)
        else H[1];
def L = if
        if mode == mode.Date
        then GetYYYYMMDD() == dateback and cond
        else cond1 == lookback and cond
        then low(period = agg)
        else L[1];
def C = if
        if mode == mode.Date
        then GetYYYYMMDD() == dateback and cond
        else cond1 == lookback and cond
        then close(period = agg)
        else C[1];

plot Hi = H;
plot Lo = L;
plot Cl = C;

Hi.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Lo.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Cl.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);

input troubleshoot = no;
AddChartBubble(troubleshoot, low, cond + "\n" + cond1 + "\n" + GetDay() + "\n" + cond + "\n" + Hi, Color.GRAY, no);

#

 

[shakib3585]

This now has a mode input for Period or Date.

Thanks a ton @SleepyZ ! One request please, Could you kindly add a label indicating the Relative volume, calculated based on the standard deviation and the number of lengths used, at that specified lookback or previous date?

Thank you very much

 

[SleepyZ]

Thanks a ton @SleepyZ ! One request please, Could you kindly add a label indicating the Relative volume, calculated based on the standard deviation and the number of lengths used, at that specified lookback or previous date?

Thank you very much

RelVol@Stdevlevel @Agg Label added.
Since almost all levels @1700 were zero, the image shows @0900

#HLC_Lookback_Periods_Time_or_Date

input mode     = {default Period, Date};
input lookback = 1;
input dateback = 20240401;
input time     = 1700;
input agg      = AggregationPeriod.HOUR;

def cond   = SecondsFromTime(time)[1] < 0 and SecondsFromTime(time) >= 0 or SecondsFromTime(time) == 0;

def ymd    = GetYYYYMMDD();
def count  = if !IsNaN(close) and ymd != ymd[1] then count[1] + 1 else count[1];
def cond1  = HighestAll(count) - count ;

def H = if
        if mode == mode.Date
        then GetYYYYMMDD() == dateback and cond
        else cond1 == lookback and cond
        then high(period = agg)
        else H[1];
def L = if
        if mode == mode.Date
        then GetYYYYMMDD() == dateback and cond
        else cond1 == lookback and cond
        then low(period = agg)
        else L[1];
def C = if
        if mode == mode.Date
        then GetYYYYMMDD() == dateback and cond
        else cond1 == lookback and cond
        then close(period = agg)
        else C[1];

plot Hi = H;
plot Lo = L;
plot Cl = C;

Hi.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Lo.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
Cl.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);

input troubleshoot = no;
AddChartBubble(troubleshoot, low, cond + "\n" + cond1 + "\n" + GetDay() + "\n" + cond + "\n" + Hi, Color.GRAY, no);

########### RelativeVolume @Stdev Level Label

input showlabel = yes;
input length = 60;
input numDev = 2.0;
input allowNegativeValues = no;

def rawRelVol = (volume(period = agg) - Average(volume(period = agg), length)) / StDev(volume(period = agg), length);
plot RelVol = if allowNegativeValues then rawRelVol else Max(0, rawRelVol);
plot StDevLevel = numDev;

def r = if
        if mode == mode.Date
        then GetYYYYMMDD() == dateback and cond
        else cond1 == lookback and cond
        then RelVol
        else r[1];

def xdate = if mode == mode.Date then dateback else if mode == mode.Period and cond1 then GetYYYYMMDD() else xdate[1];
AddLabel(showlabel, AsPrice(xdate) + " @" + AsPrice(time) + "  RVOL: " + r, Color.YELLOW);
#

 

[shakib3585]

RelVol@Stdevlevel @Agg Label added.
Since almost all levels @1700 were zero, the image shows @0900

Thank you @SleepyZ !

 

[shakib3585]

Thank you @SleepyZ !

Hello @SleepyZ , Could we check if stocks had any 1-hour candle exhibiting a relative volume of 2.1 (length = 20, standard deviation = 2.0). If so, I'd request to find stocks where the closing price of the current hour is higher than the high of that candle.

Thank you very much

 

[SleepyZ]

Hello @SleepyZ , Could we check if stocks had any 1-hour candle exhibiting a relative volume of 2.1 (length = 20, standard deviation = 2.0). If so, I'd request to find stocks where the closing price of the current hour is higher than the high of that candle.

Thank you very much

This finds when the current bar's high is higher than the previous bar's high where your relative volume condition occurred.

input agg = AggregationPeriod.HOUR;

input showlabel = yes;
input length = 20;
input numDev = 2.0;
input allowNegativeValues = no;

def bn = BarNumber();
def na = Double.NaN;

def rawRelVol  = (volume(period = agg) - Average(volume(period = agg), length)) / StDev(volume(period = agg), length);
def RelVol     = if allowNegativeValues then rawRelVol else Max(0, rawRelVol);
def StDevLevel = numDev;
def condbar    = if RelVol crosses above 2.1 then bn else na;
plot scan      = bn - 1 == HighestAll(condbar) and high(period = agg) > high(period = agg)[1];

#

 

[shakib3585]

This finds when the current bar's high is higher than the previous bar's high where your relative volume condition occurred.

input agg = AggregationPeriod.HOUR;

input showlabel = yes;
input length = 20;
input numDev = 2.0;
input allowNegativeValues = no;

def bn = BarNumber();
def na = Double.NaN;

def rawRelVol  = (volume(period = agg) - Average(volume(period = agg), length)) / StDev(volume(period = agg), length);
def RelVol     = if allowNegativeValues then rawRelVol else Max(0, rawRelVol);
def StDevLevel = numDev;
def condbar    = if RelVol crosses above 2.1 then bn else na;
plot scan      = bn - 1 == HighestAll(condbar) and high(period = agg) > high(period = agg)[1];

#

Thank you @SleepyZ . Can I directly use it in the scanner?

 

[SleepyZ]

Thank you @SleepyZ . Can I directly use it in the scanner?

Yes