# NEOTICKER DATA BEGIN
ScriptType=Indicator
Description=My Hourly Pivots
Name=MyHourlyPivots
Language=Formula
Links=1
MinBars=0
TimerInterval=100
MetaStyle=Normal
ValueRange=Same as Source
Placement=Smart
Multiplot_num_plots=5
Multiplot_color_0=255
Multiplot_style_0=HLine
Multiplot_width_0=2
Multiplot_enabled_0=1
Multiplot_name_0=H2
Multiplot_breakstyle_0=0
Multiplot_color_1=50266367
Multiplot_style_1=Dot
Multiplot_width_1=1
Multiplot_enabled_1=1
Multiplot_name_1=H1
Multiplot_breakstyle_1=0
Multiplot_color_2=33587200
Multiplot_style_2=HLine
Multiplot_width_2=2
Multiplot_enabled_2=1
Multiplot_name_2=Pivot
Multiplot_breakstyle_2=0
Multiplot_color_3=50312193
Multiplot_style_3=Dot
Multiplot_width_3=1
Multiplot_enabled_3=1
Multiplot_name_3=L1
Multiplot_breakstyle_3=0
Multiplot_color_4=50266112
Multiplot_style_4=HLine
Multiplot_width_4=2
Multiplot_enabled_4=1
Multiplot_name_4=L2
Multiplot_breakstyle_4=0
UpdateByTick=0
TradingSystemUI=0
PrimaryLinkOnly=0
NotifyOnRemoval=0
Param_count=0
Explanation_Lines=0
# NEOTICKER DATA END

$new_hour :=
   date <> date (1) ' for a new day, it is definitely a new hour
   ' its a new hour if hour changed without landing on the round hour
   or (hour (time) <> hour (time (1)) and minute (time) <> 0)
   ' if landing right on the round hour, start from next bar
   or (hour (time) = hour (time (1)) and minute (time (1)) = 0);

current_hour_high :=
   if ($new_hour, high, MaxList (high, current_hour_high (1)));

current_hour_low :=
   if ($new_hour > 0 or current_hour_low (1) = 0, low, MinList (low, current_hour_low (1)));

$prev_hour_high :=
   if ($new_hour, current_hour_high (1), $prev_hour_high);

$prev_hour_low :=
   if ($new_hour, current_hour_low (1), $prev_hour_low);

$prev_hour_close :=
   if ($new_hour, close (1), $prev_hour_close);

' standard pivot point calculations

$prev_hour_avg :=
   ($prev_hour_high + $prev_hour_low + $prev_hour_close) / 3;

$prev_hour_h1 := $prev_hour_avg * 2 - $prev_hour_low;
$prev_hour_l1 := $prev_hour_avg * 2 - $prev_hour_high;
$prev_hour_h2 := $prev_hour_avg + $prev_hour_h1 - $prev_hour_l1;
$prev_hour_l2 := $prev_hour_avg + $prev_hour_l1 - $prev_hour_h1;

' assigning the calculated results to the plot series

$data_started := $prev_hour_high <> 0;

plot1 := $prev_hour_h2;
success1 := $data_started;

plot2 := $prev_hour_h1;
success2 := $data_started;

plot3 := $prev_hour_avg;
success3 := $data_started;

plot4 := $prev_hour_l1;
success4 := $data_started;

plot5 := $prev_hour_l2;
success5 := $data_started;