VAR1:=EMA(EMA(C,9),9);
VAR2:=REF(VAR1,1);
KP:=(VAR1-VAR2)/VAR2*100000;
VAR81:=VOL/((H-L)*2-ABS(C-O));
VARR1:=IFELSE(C<O,VAR81*(H-O+C-L),VOL/2);
VARR2:=IFELSE(C<O,VAR81*(H-L),0-VOL/2);
//QHQQW.COM
STICKLINE(KP>0 AND KP>REF(KP,1),KP,0,COLORRED,0);
STICKLINE(KP<0   ,KP,0,COLORGREEN,0);
STICKLINE(KP>0 AND KP<REF(KP,1),KP,0,COLORYELLOW,0);