This program
https://usethinkscript.com/threads/how-do-you-get-the-time-of-high-of-day.3751/#post-57408
had display only Highest of Day and I just add addition for display bubble on chart for LOWEST price showing of the day but it's not working, is anybody know how to fix it? Thank you.
# Example of Plotting Hour:Min Time Stamp at Regular Trading Hours High of Day ( RTH HOD )
#By Mobius
# Request 01.19.2021
#(Zero fix and hours offset by XeoNoX)
#Change Hours_Offset in the input to HRS you need to adjust for daylight savings or your local timezone
input Hours_Offset = 0;
input Start = 9.5;
input End = 1600;
def h = high;
def l = low;
def c = close;
def x = BarNumber();
def D = 86400;
def Hr = 3600;
def epoch = (GetTime() / 1000);
def hour = ((epoch % D) / Hr); # 5 hour diff for GMT
def roll = if hour > 5
then hour - 5
else if hour < 5
then (hour + 24) - 5
else 0;
def min = Floor(((epoch % D) % Hr)) / 60;
def RTH_HOD = if roll crosses above Start
then h
else if Between(roll, Start, End)
then Max(h, RTH_HOD[1])
else RTH_HOD[1];
def HODx;
def HODHr;
def HODmin;
if RTH_HOD == h
{
HODx = x;
HODHr = roll;
HODmin = min;
}
else
{
HODx = HODx[1];
HODHr = HODHr[1];
HODmin = HODmin[1];
}
AddChartBubble(x == HighestAll(HODx), RTH_HOD, if HODmin > 9 then "HOD " + (RTH_HOD) + " @" + Floor(HODHr + Hours_Offset) + ":" + HODmin + "AM" else "Highest Volume Today " + (RTH_HOD) + " @" + Floor(HODHr + Hours_Offset) + ":0" + HODmin + "AM" , Color.CYAN);
AddVerticalLine(roll crosses above Start);
AddLabel (yes, if HODmin > 9 then "HOD " + (RTH_HOD) + " @" + Floor(HODHr + Hours_Offset) + ":" + HODmin + "AM" else "Highest Volume Today " + (RTH_HOD) + " @" + Floor(HODHr + Hours_Offset) + ":0" + HODmin + "AM" );
def RTH_LOD = if roll crosses above Start
then l
else if Between(roll, Start, End)
then Max(l, RTH_LOD[1])
else RTH_LOD[1];
def LODx;
def LODHr;
def LODmin;
if RTH_LOD == l
{
LODx = x;
LODHr = roll;
LODmin = min;
}
else
{
LODx = LODx[1];
LODHr = LODHr[1];
LODmin = LODmin[1];
}
AddChartBubble(x == LowestAll(LODx), RTH_LOD, if LODmin > 9 then "LOD " + (RTH_LOD) + " @" + Floor(LODHr + Hours_Offset) + ":" + LODmin + "AM" else "Lowest Volume Today " + (RTH_LOD) + " @" + Floor(LODHr + Hours_Offset) + ":0" + LODmin + "AM" , Color.CYAN);
AddVerticalLine(roll crosses above Start);
AddLabel (yes, if LODmin > 9 then "LOD " + (RTH_LOD) + " @" + Floor(LODHr + Hours_Offset) + ":" + LODmin + "AM" else "Lowest Volume Today " + (RTH_LOD) + " @" + Floor(LODHr + Hours_Offset) + ":0" + LODmin + "AM" );
# End Code
https://usethinkscript.com/threads/how-do-you-get-the-time-of-high-of-day.3751/#post-57408
had display only Highest of Day and I just add addition for display bubble on chart for LOWEST price showing of the day but it's not working, is anybody know how to fix it? Thank you.
# Example of Plotting Hour:Min Time Stamp at Regular Trading Hours High of Day ( RTH HOD )
#By Mobius
# Request 01.19.2021
#(Zero fix and hours offset by XeoNoX)
#Change Hours_Offset in the input to HRS you need to adjust for daylight savings or your local timezone
input Hours_Offset = 0;
input Start = 9.5;
input End = 1600;
def h = high;
def l = low;
def c = close;
def x = BarNumber();
def D = 86400;
def Hr = 3600;
def epoch = (GetTime() / 1000);
def hour = ((epoch % D) / Hr); # 5 hour diff for GMT
def roll = if hour > 5
then hour - 5
else if hour < 5
then (hour + 24) - 5
else 0;
def min = Floor(((epoch % D) % Hr)) / 60;
def RTH_HOD = if roll crosses above Start
then h
else if Between(roll, Start, End)
then Max(h, RTH_HOD[1])
else RTH_HOD[1];
def HODx;
def HODHr;
def HODmin;
if RTH_HOD == h
{
HODx = x;
HODHr = roll;
HODmin = min;
}
else
{
HODx = HODx[1];
HODHr = HODHr[1];
HODmin = HODmin[1];
}
AddChartBubble(x == HighestAll(HODx), RTH_HOD, if HODmin > 9 then "HOD " + (RTH_HOD) + " @" + Floor(HODHr + Hours_Offset) + ":" + HODmin + "AM" else "Highest Volume Today " + (RTH_HOD) + " @" + Floor(HODHr + Hours_Offset) + ":0" + HODmin + "AM" , Color.CYAN);
AddVerticalLine(roll crosses above Start);
AddLabel (yes, if HODmin > 9 then "HOD " + (RTH_HOD) + " @" + Floor(HODHr + Hours_Offset) + ":" + HODmin + "AM" else "Highest Volume Today " + (RTH_HOD) + " @" + Floor(HODHr + Hours_Offset) + ":0" + HODmin + "AM" );
def RTH_LOD = if roll crosses above Start
then l
else if Between(roll, Start, End)
then Max(l, RTH_LOD[1])
else RTH_LOD[1];
def LODx;
def LODHr;
def LODmin;
if RTH_LOD == l
{
LODx = x;
LODHr = roll;
LODmin = min;
}
else
{
LODx = LODx[1];
LODHr = LODHr[1];
LODmin = LODmin[1];
}
AddChartBubble(x == LowestAll(LODx), RTH_LOD, if LODmin > 9 then "LOD " + (RTH_LOD) + " @" + Floor(LODHr + Hours_Offset) + ":" + LODmin + "AM" else "Lowest Volume Today " + (RTH_LOD) + " @" + Floor(LODHr + Hours_Offset) + ":0" + LODmin + "AM" , Color.CYAN);
AddVerticalLine(roll crosses above Start);
AddLabel (yes, if LODmin > 9 then "LOD " + (RTH_LOD) + " @" + Floor(LODHr + Hours_Offset) + ":" + LODmin + "AM" else "Lowest Volume Today " + (RTH_LOD) + " @" + Floor(LODHr + Hours_Offset) + ":0" + LODmin + "AM" );
# End Code
Last edited by a moderator: