// Downloaded From https://www.WiseStockTrader.com
BDIn=IIf(C>O, V,0); BDOut=IIf(C< O,V,0);
BDAccW=Sum(BDIn, 20); BDAccM=Sum(BDIn, 50);
BDDistW=Sum( BDout,20); BDDistM=Sum( BDout,50) ;
BDWeek=(BDAccW- BDDistW);

ColorBW=IIf( BDWeek>O, colorBrightGreen ,colorRed) ;


Plot(BDWeek, "Bandar Detector Monthly",colorBW, styleHistogram| styleThick) ;