[RS]Fib Donchian Flow V0

study("[RS]Fib Donchian Flow V0", overlay=true)
lv1_buy_moves = open >= lowest(open[1], 1) ? lowest(open[1], 1) : na
lv2_buy_moves = open >= lowest(open[1], 2) ? lowest(open[1], 2) : na
lv3_buy_moves = open >= lowest(open[1], 3) ? lowest(open[1], 3) : na
lv5_buy_moves = open >= lowest(open[1], 5) ? lowest(open[1], 5) : na
lv8_buy_moves = open >= lowest(open[1], 8) ? lowest(open[1], 8) : na
lv13_buy_moves = open >= lowest(open[1], 13) ? lowest(open[1], 13) : na
lv21_buy_moves = open >= lowest(open[1], 21) ? lowest(open[1], 21) : na

lv1_sel_moves = open <= highest(open[1], 1) ? highest(open[1], 1) : na
lv2_sel_moves = open <= highest(open[1], 2) ? highest(open[1], 2) : na
lv3_sel_moves = open <= highest(open[1], 3) ? highest(open[1], 3) : na
lv5_sel_moves = open <= highest(open[1], 5) ? highest(open[1], 5) : na
lv8_sel_moves = open <= highest(open[1], 8) ? highest(open[1], 8) : na
lv13_sel_moves = open <= highest(open[1], 13) ? highest(open[1], 13) : na
lv21_sel_moves = open <= highest(open[1], 21) ? highest(open[1], 21) : na


plot(lv21_buy_moves, style=linebr, color=green, linewidth=4)
plot(lv13_buy_moves, style=linebr, color=green, linewidth=3)
plot(lv8_buy_moves, style=linebr, color=green, linewidth=2)
plot(lv5_buy_moves, style=linebr, color=lime, linewidth=2)
plot(lv3_buy_moves, style=linebr, color=lime, linewidth=1)
plot(lv2_buy_moves, style=linebr, color=olive, linewidth=1)
plot(lv1_buy_moves, style=linebr, color=olive, linewidth=1)

plot(lv21_sel_moves, style=linebr, color=maroon, linewidth=4)
plot(lv13_sel_moves, style=linebr, color=maroon, linewidth=3)
plot(lv8_sel_moves, style=linebr, color=maroon, linewidth=2)
plot(lv5_sel_moves, style=linebr, color=red, linewidth=2)
plot(lv3_sel_moves, style=linebr, color=red, linewidth=1)
plot(lv2_sel_moves, style=linebr, color=orange, linewidth=1)
plot(lv1_sel_moves, style=linebr, color=orange, linewidth=1)