True Volume Strength v0

//@version=2
study("True Volume Strength")


//x1 = efi <= lowest(efi,252)



UpperLim =  highest(high,10)
LowerLim =  lowest(low,10)

lowerlim1 = LowerLim[1]

at10dayhi = high == UpperLim

at10daylo = low == LowerLim

loisarisin = LowerLim > lowerlim1

trade = at10dayhi + at10daylo

var21 =  highest(volume,5)
var22 =  lowest(volume,5)
var23 = volume-var22
var24 = var21-var22
var25 = var23/var24

VOLK = var25*100
VOLD = sma(VOLK,5)

//var1 = high >= highest(high,5)
//lo5 = low <= lowest(low,5)

var1 =  highest(high,5)
lo5 = lowest(low,5)

var3 = close-lo5
var4 = var1-lo5
var5 = var3/var4

PRICEK = var5*100
PRICED = sma(PRICEK,5)

bear = crossover(VOLD,PRICED)
bull = crossover(PRICED,VOLD)

alertcondition(bull, title='Buyers Overweigh Sellers', message='Bullish Volume!')
alertcondition(bear, title='Sellers Overweigh Buyers', message='Bearish Volume!')

plot(VOLD,color=red,style=histogram,title="Sell Pressure",linewidth=4,transp=0)
plot(PRICED,color=green,style=histogram,title="Buy Pressure",linewidth=4,transp=0)
///