MBZD
This is for U And All
Note:- As I told u don't enter in to trade only after looking at BBand Width indicator , Mix other indictor for best result
//MBZD Bollinger Bands Width + Scan + Exp BY Hulk
_SECTION_BEGIN("Bollinger_Bands_width");
pds=Param("Periods",20,2,200);
sd=Param("Band Width",2, 0.01,10);
alpha=2/(pds+1);
mt=AMA( C, alpha );
ut=AMA( mt, alpha );
dt=((2-alpha)*mt-ut)/(1-alpha);
mt2=AMA(abs(C-dt), alpha );
ut2=AMA(mt2,alpha );
dt2=((2-alpha)*mt2-ut2)/(1-alpha);
but=dt+sd*dt2;
blt=dt-sd*dt2;
Plot( but, "Upper band", colorLightGrey, styleLine | styleDots, maskAll );
Plot( blt, "Lower band", colorLightGrey, styleLine | styleDots, maskAll);
Plot( C, "Close", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
//Note:- If you change parameter of BBands then change manually also in Explorer, otherwise you will NOT get desire result.
_SECTION_BEGIN("Explorer");
bb= C > BBandTop( C, 20, 2) AND Ref (C,-1) < Ref(BBandTop( C, 20, 2),-1);
bb1= C < BBandBot( C, 20, 2) AND Ref (C,-1) > Ref(BBandBot( C, 20, 2),-1);
bb_status= WriteIf(BB, "AboveTop", WriteIf(bb1, "BelowBottom", "Neutral"));
bb_Col=IIf(bb, colorGreen, IIf(bb1, colorRed, colorLightGrey));
/* RESULTS */
Filter = MA(Volume,20) > 10000;
AddColumn( Close, "Close " );
AddColumn( Volume, "Volume " );
AddTextColumn(bb_status, "BBand", 1, colorWhite, bb_Col);
Buy = Cross(C , but);
Sell = Cross(blt , C);
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
shape = Buy * shapeUpTriangle + Sell * shapeDownTriangle;
PlotShapes( shape, IIf( Buy, colorWhite, colorCustom12 ), IIf( Buy, Low, High ) );
_SECTION_END();
SetChartOptions(0,chartShowArrows|chartShowDates);
SetChartBkColor(ParamColor("Outer panel color ",colorDarkGrey)); // color of outer border
SetChartBkGradientFill( ParamColor("Inner panel color upper half", colorBlack),
ParamColor("Inner panel color lower half", colorDarkOliveGreen)); // color of inner panel
Title = EncodeColor(colorWhite)+ "BBW+SCAN+EXP By HULK" + " - " + Name() + " - " + EncodeColor(colorRed)+ Interval(2) + EncodeColor(colorWhite) +" - " + Date() +" - "+"\n" +EncodeColor(colorYellow) +"Op-"+O+" "+"Hi-"+H+" "+"Lo-"+L+" "+
"Cl-"+C+" "+ "Vol= "+ WriteVal(V);
HULK