CB:=(C -REF(C ,1))/REF(C,1);
VB:=Abs(V-REF(V,1))/ABS(CB*100);
CV:=V/VB,volSTICK;
N:=SUMBARS((C-REF(C,1))/REF(C,1),0.3);
FV:=SLOPE(EMA(CV,7),7);
FC:=EMA(FV,5);
LY:= crOSS(FV ,FC) ;
ZZ:=BArslAST(LY);
E2:=EMA(BETA(13)/100*C+C,13) ;
X1:=((E2-REF(E2,ZZ))/REF(E2,ZZ))*180/3.14;
XG:IF(EXIST(X1<-5,7) AND CROSS(C,REF(C,ZZ)) ,0,-7);
X2:=((C-REF(C,ZZ))/REF(C,ZZ))*180/3.14;
XG2:IF(EXIST(X2<-5,7) AND CROSS(C,REF(C,ZZ)) ,0,-7);