New High/Low Bar Counter

[static]

I am looking for a script that would count new highs or lows bar by bar based on the timeframe that's been set.

See example below, each time the 15 min bar made a new high above the previous high, the counter would be indexed up.

Not looking for this to be drawn on the chart, just a simple numerical counter that could be used for scanning purposes.

Inputs:
Aggregation Time: 1 min, 5 min, 1 hr, 1 day, or whatever
Start Time: 9:30 AM
End Time: 4 PM

Output:
Number of new highs from start time to current time
+ would indicate new highs
- would indicate new lows

If anyone can help, I really appreciate it

Thank you

 

[Svanoy]

@static this should fit your needs. You choose your aggregation period when setting up the scan.

input Start_Time = 0930;
input Hide_Plots = yes;

def H = if SecondsTillTime(Start_Time) == 0 then high else if high > H[1] then high else H[1];
def HCount = if SecondsTillTime(Start_Time) == 0 then 0 else if H <> H[1] then HCount[1] + 1 else HCount[1];
plot HCP = HCount;
HCP.setpaintingStrategy(paintingStrategy.VALUES_ABOVE);
HCP.SetHiding(Hide_Plots);

def L = if SecondsTillTime(Start_Time) == 0 then low else if low < L[1] then low else L[1];
def LCount = if SecondsTillTime(Start_Time) == 0 then 0 else if L <> L[1] then LCount[1] - 1 else LCount[1];
plot LCP = LCount;
LCP.setpaintingStrategy(paintingStrategy.VALUES_BELOW);
LCP.SetHiding(Hide_Plots);

 

[static]

Thanks so much!

 

[ProJazz]

@Svanoy how do you change color of values above or below? is this correct?

input Start_Time = 0930;
input Hide_Plots = yes;

def H = if SecondsTillTime(Start_Time) == 0 then high else if high > H[1] then high else H[1];
def HCount = if SecondsTillTime(Start_Time) == 0 then 0 else if H <> H[1] then HCount[1] + 1 else HCount[1];
plot HCP = HCount;
HCP.setpaintingStrategy(paintingStrategy.VALUES_ABOVE);
HCP.SetHiding(Hide_Plots);
HCP.SetDefaultColor(Color.white);


def L = if SecondsTillTime(Start_Time) == 0 then low else if low < L[1] then low else L[1];
def LCount = if SecondsTillTime(Start_Time) == 0 then 0 else if L <> L[1] then LCount[1] - 1 else LCount[1];
plot LCP = LCount;
LCP.setpaintingStrategy(paintingStrategy.VALUES_BELOW);
LCP.SetHiding(Hide_Plots);
LCP.SetDefaultColor(Color.white);

 

[Svanoy]

@ProJazz yes, and remove the 'SetHiding' line to unhide the plots.