// Downloaded From https://www.WiseStockTrader.com
X=((C-Ref(C,-1))/(HHV(H,2)-LLV(L,2)));
A=0;
A=IIf(C>Ref(C,-1),A+(X*V),A+0);/*portion of bull volume*/

B=0;
B=IIf(C<=Ref(C,-1),B+(X*V),B+0);/*portion of bear volume*/
I=Sum(A,10);
D=Sum(B,10);
E=(I/(I-D));


F=-(D/(I-D));


G=0;
H=0;


Buy=Cross(E,F) AND EMA(E,5)>EMA(E,10) AND E>0.55;

Sell=E<0.85 AND Ref(E,-1)>0.85  ;
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);




shbuy=Buy*shapeUpArrow;

shsell=Sell*shapeDownArrow;

Plot(E,"A.N.KUMAR-BULL VOLUME INDICATOR",colorGreen,style=styleDots);

Plot(F,"A.N.KUMAR-BEAR VOLUME INDICATOR",colorRed,style=styleDots);
PlotShapes(Buy*shapeUpArrow,colorGreen,Layer=0,yposition=H,Offset=50);
PlotShapes(Sell*shapeDownArrow,colorRed,Layer=0,yposition=H,Offset=-50);