// Downloaded From https://www.WiseStockTrader.com
BOP = (Close - Open) / (High - Low);
parameter = Param("BOP MA",14,2,30);
BOP = MA(bop,parameter);

mabop = MA(bop,4);
colorbop = IIf(bop > 0, colorGreen, colorred);

Plot( BOP, "", colorbop, styleHistogram | styleThick | styleNoLabel, maskHistogram );
Plot(mabop,"MA BOP", IIf(bop>mabop,colorGold,colorBlue), stylethick);