declare lower;
input timeStart = 0;
def time1 = timeStart + 100;
def time2 = time1 + 100;
def time3 = time2 + 100;
def time4 = time3 + 100;
def time5 = time4 + 100;
def time6 = time5 + 100;
def time7 = time6 + 100;
def time8 = time7 + 100;
def time9 = time8 + 100;
def time10 = time9 + 100;
def time11 = time10 + 100;
def time12 = time11 + 100;
def time13 = time12 + 100;
def time14 = time13 + 100;
def time15 = time14 + 100;
def time16 = time15 + 100;
def time17 = time16 + 100;
def time18 = time17 + 100;
def time19 = time18 + 100;
def time20 = time19 + 100;
def time21 = time20 + 100;
def time22 = time21 + 100;
def time23 = time22 + 100;
def hourStart = SecondsFromTime(timeStart) > 0 and SecondsFromTime(timeStart)[2] < 0;
def hour1 = SecondsFromTime(time1) > 0 and SecondsFromTime(time1)[2] < 0;
def hour2 = SecondsFromTime(time2) > 0 and SecondsFromTime(time2)[2] < 0;
def hour3 = SecondsFromTime(time3) > 0 and SecondsFromTime(time3)[2] < 0;
def hour4 = SecondsFromTime(time4) > 0 and SecondsFromTime(time4)[2] < 0;
def hour5 = SecondsFromTime(time5) > 0 and SecondsFromTime(time5)[2] < 0;
def hour6 = SecondsFromTime(time6) > 0 and SecondsFromTime(time6)[2] < 0;
def hour7 = SecondsFromTime(time7) > 0 and SecondsFromTime(time7)[2] < 0;
def hour8 = SecondsFromTime(time8) > 0 and SecondsFromTime(time8)[2] < 0;
def hour9 = SecondsFromTime(time9) > 0 and SecondsFromTime(time9)[2] < 0;
def hour10 = SecondsFromTime(time10) > 0 and SecondsFromTime(time10)[2] < 0;
def hour11 = SecondsFromTime(time11) > 0 and SecondsFromTime(time11)[2] < 0;
def hour12 = SecondsFromTime(time12) > 0 and SecondsFromTime(time12)[2] < 0;
def hour13 = SecondsFromTime(time13) > 0 and SecondsFromTime(time13)[2] < 0;
def hour14 = SecondsFromTime(time14) > 0 and SecondsFromTime(time14)[2] < 0;
def hour15 = SecondsFromTime(time15) > 0 and SecondsFromTime(time15)[2] < 0;
def hour16 = SecondsFromTime(time16) > 0 and SecondsFromTime(time16)[2] < 0;
def hour17 = SecondsFromTime(time17) > 0 and SecondsFromTime(time17)[2] < 0;
def hour18 = SecondsFromTime(time18) > 0 and SecondsFromTime(time18)[2] < 0;
def hour19 = SecondsFromTime(time19) > 0 and SecondsFromTime(time19)[2] < 0;
def hour20 = SecondsFromTime(time20) > 0 and SecondsFromTime(time20)[2] < 0;
def hour21 = SecondsFromTime(time21) > 0 and SecondsFromTime(time21)[2] < 0;
def hour22 = SecondsFromTime(time22) > 0 and SecondsFromTime(time22)[2] < 0;
def hour23 = SecondsFromTime(time23) > 0 and SecondsFromTime(time23)[2] < 0;
def markHours = hourStart or hour1 or hour2 or hour3 or hour4 or hour5 or 
    hour6 or hour7 or hour8 or hour9 or hour10 or hour11 or hour12 or 
    hour13 or hour14 or hour15 or hour16 or hour17 or hour18 or hour19 or
    hour20 or hour21 or hour22 or hour23;
rec countBars = if markHours then 0 else countBars[1] + 1;
plot numberOfBarsInHour = countBars;