// Downloaded From https://www.WiseStockTrader.com
Period = Param("Period(Total)",20);
OB=Sum(OpenInt,Period);
Color = IIf(OpenInt > 0 , colorGreen, colorRed);

Plot(0,"",colorBlack,styleThick);
Plot(OpenInt,"Net Foreign Buying/Selling", Color, styleHistogram|styleThick);
Plot(OB,"Total",ParamColor("Color(Total)", colorViolet),styleHistogram|styleThick);