Mô tả
⋅ This indicator has the following:
1. volume rsi based on Ricardo Santos great work
2.DMI
3.fib candle
the buy points are based on volume break of rsi (not rsi) filter by DMI and the candle fib based on fibo points
sell point the same just in reverse
this indicator give you volume based on rsi to gether with other stuff so the buy points seems to be more accurate and it not repainting.
I hope you will like it
Phát hành các Ghi chú
⋅ just add 1 more exit point without the candles = light red
this based only on volume rsi and d+
Phát hành các Ghi chú
⋅ add another buy point based only on volume rsi and d-
src = input(close)
length = input(14)
smooth = input(8)
r = rsi(cum(change(src) * volume), length)
m = sma(r, smooth)
plot(series=r, title='Vrsi', color=black, transp=0)
plot(series=m, title='M', color=black, transp=0)
hline(0)
hline(30)
hline(70)
hline(100)
///DIRECTIONAL MOVEMENT INDEX///
len3 = input(14, minval=1, title="DI Length")
lensig3 = input(14, title="ADX Smoothing", minval=1, maxval=50)
up3 = change(high)
down3 = -change(low)
plusDM3 = na(up3) ? na : (up3 > down3 and up3 > 0 ? up3 : 0)
minusDM3 = na(down3) ? na : (down3 > up3 and down3 > 0 ? down3 : 0)
trur3 = rma(tr, len3)
plus3 = fixnan(100 * rma(plusDM3, len3) / trur3)
minus3 = fixnan(100 * rma(minusDM3, len3) / trur3)
sum3 = plus3 + minus3
adx3 = 100 * rma(abs(plus3 - minus3) / (sum3 == 0 ? 1 : sum3), lensig3)
plot(plus3, color=green, style=line, linewidth=2, title="+DI")
plot(minus3, color=red, style=line, linewidth=2, title="-DI")
plot(adx3, color=blue, style=line, linewidth=3, title="ADX")
p = input(120,title="Length")
//scale
hh = highest(high,p)
ll = lowest(low,p)
scale = hh-ll
//dynamic OHLC
dyno = ((open-ll)/scale)*100
dynl = ((low-ll)/scale)*100
dynh = ((high-ll)/scale)*100
dync = ((close-ll)/scale)*100
//candle color
color=close>open?1:0
//drawcandle
hline(78.6)
hline(61.8)
hline(50)
hline(38.2)
hline(23.6)
plotcandle(dyno,dynh,dynl,dync,title="Candle",color=color==1?green:red)
plot(10,color=green)
plot(30,color=red)
plot(80,color=black)
plot(90,color=red)
up =crossover(r,m) and minus3>20 and dync<30
down = crossunder(r,m) and plus3>20 and dync>70
plot(up,"Go Long",color=lime,linewidth=20,style=histogram)
plot(down,"Go Short",color=red,linewidth=20,style=histogram)
up1 =crossover(r,m) and minus3>25
down1 = crossunder(r,m) and plus3>20
plot(up1,"Go Long",color=lime,linewidth=20,style=histogram)
plot(down1,"Go Short",color=red,linewidth=20,style=histogram)
alertcondition(up, title='go long', message='go long')
alertcondition(down, title='go short', message='go go short')
alertcondition(down1, title='go short1', message='go go short1')
alertcondition(up1, title='go long1', message='go long1')
bgcolor(down > 0 ? red : na, transp=50)
bgcolor(up > 0 ? green : na, transp=50)
bgcolor(down1 > 0 ? red : na, transp=90)
bgcolor(up1 > 0 ? green : na, transp=90)