pds:=Input("period for FVE",10,80,22);
pds1:=Input("periods for bollinger bands",10,80,20); mf:=C-(H+L)/2+Typical()-Ref(Typical(),-1);
fve:=Sum(If(mf>0.3*C/100,+V, If(mf<-0.3*C/100, -V,0)),pds)/Mov(V,pds,S)/pds*100;
bbfve:=(fve-BBandBot(fve,pds1,S,2))/(BBandTop(fve,pds1,S,2)-BBandBot(fve,pds1,S,2));
bbc:=(C-BBandBot(C,pds1,S,2))/(BBandTop(C,pds1,S,2)-BBandBot(C,pds1,S,2));
bbfve-bbc