devicemxl

Propagation Volumes and Trends

With this, i calculate RSI of the HL2 of the volume and use like an oscillator, this will use to measure the strength of the trend and the "Volume Flow" to follow the trend.

I use like foundation the LazyBear "Volume Flow Indicator" "honor a quien honor merece"

Background:
I think the volume as the price could be represented by candles or other graphic to use indicators and strengthen their analysis, due to lack of registration of this it is first necessary to calculate a volume graph, if the candle traditionally negative price brand then the total volume is taken as negative for the period. An example of this is in the On Balance Volume indicator, the problem is that there is no way to analyze the volume using other methods. An approximate volume of the spread could be the use of the price spread to make a synthetic behavior

As traditionally is observed if Open> Close then the candle and the volume will be negative and vice versa; the next step, is estimate the amounts of the candle necessary to calculate the ratio to use for the volume and thus idealize their spread within the candle:

VLOW = Volume x Low
vHigh = x High Volume
VOpen = vClose
vClose = Volume x Close

This graph can show a stable synthetic form of fluctuations in the volume trend affected by price.
ideas, comments and suggestions (or corrections).They are always welcome
Remove from Favorite Scripts Add to Favorite Scripts
//
// Volume Flow Indicator Original by: [LazyBear]
// Oscillator and volume candle [devicemxl]
//

study(title = "Propagation Volumes and Trends", shorttitle="PVT")
length = input(130, title="VFI length")
coef = input(0.2)
vcoef = input(2.5, title="Max. vol. cutoff")
signalLength=input(14)
smoothVFI=input(false, type=bool)
ma(x,y) => smoothVFI ? sma(x,y) : x

typical=hl2
inter = log( typical ) - log( typical[1] )
vinter = stdev(inter, 30 )
cutoff = coef * vinter * close
vave = sma( volume, length )[1]
vmax = vave * vcoef
vc = iff(volume < vmax, volume, vmax) //min( volume, vmax )
mf = typical - typical[1]
vcp = iff( mf > cutoff, vc, iff ( mf < -cutoff, -vc, 0 ) )

vfi = alma(sum( vcp , length )/vave, 3, 0, 6)
vfima=wma( vfi, signalLength )

plot( vfi, title="Volume Flow", color=red,linewidth=1)
plot( vfima, color=black,linewidth=2)

/// oscilador
profundidad = input(20, title="RSI Length")
////////////
volumex=volume*(close>close[1] ? 1 : -1)
V_OPEN  = V_CLOSE[1]
V_CLOSE = close*volumex
V_HIGH  = max(max(high*volumex,V_CLOSE),V_OPEN)
V_LOW   = min(min(low*volumex,V_OPEN),V_CLOSE)
V_HL2   = ( V_HIGH + V_LOW ) / 2
///////////

side = open > close ? -1 : 1
vols = side * rsi(V_HL2,profundidad)
tendencia = sma(vols,profundidad)

showHisto=input(true, type=bool)
plot(showHisto ? tendencia : na, color = (tendencia>tendencia[1] ? (tendencia >0 ? green : red) : (tendencia >0 ? olive : maroon)), style=histogram, title="Power",linewidth=3)
//plot(showHisto ? tendencia : na, color = black, style=histogram, title="Tendencia", transp=85,linewidth=2)
Ideas Scripts Chart
United States
United Kingdom
India
España
Italia
Brasil
Россия
Türkiye
日本
한국
Home Stock Screener Economic Calendar How It Works Chart Features House Rules Moderators For the WEB Widgets Stock Charting Library Priority Support Feature Request Blog & News FAQ Help & Wiki Twitter
Private Messages Chat Ideas Published Followers Following Priority Support Public Profile Profile Settings Billing Sign Out