[RS]Flappy Swinger V0
EXPERIMENTAL:
its a experiment, use at your own discretion.
its a experiment, use at your own discretion.
study(title='[RS]Flappy Swinger V0', overlay=true) src = input(hl2) dc_interval = input(10) l1 = na(l1[1]) ? src : (l1[1]+src)*0.5 //l2 = na(l2[1]) ? l1 : (l2[1]+l1)*0.5 //l3 = na(l3[1]) ? l2 : (l3[1]+l2)*0.5 h = highest(l1, dc_interval) l = lowest(l1, dc_interval) //plot(l3, color=gray, linewidth=1) //plot(l2, color=black, linewidth=1) plot(l1, color=black, linewidth=2) plot(src,color=red) //bgcolor(cross(close, l1)? na : l1 > l3 ? green : maroon,transp=50) //bgcolor(cross(close, l1)? l1 > l3 ? green : maroon : na, transp=50) //bgcolor(close > h ? green : close < l ? maroon : na,transp=50) //bgcolor(l1 >= h ? lime : l1 <= l ? red : na,transp=50) signal_sel = close > h ? low : l1 >= h ? low : signal_sel[1] signal_buy = close < l ? high : l1 <= l ? high : signal_buy[1] plot(signal_buy, style=linebr, color=change(signal_buy) != 0 ? na : green, linewidth=4) plot(signal_sel, style=linebr, color=change(signal_sel) != 0 ? na : maroon, linewidth=4) plot(signal_buy ? min(signal_buy, lowest(dc_interval)) : na, style=linebr, color=change(signal_buy) != 0 ? na : green, linewidth=4) plot(signal_sel ? max(signal_sel, highest(dc_interval)) : na, style=linebr, color=change(signal_sel) != 0 ? na : maroon, linewidth=4) plot(h, color=black) plot(l, color=black)