X:=MAX(HHV(C,10)-LLV(C,10),ABS(C-REF(C,10))/SUM(ABS(C-REF(C,1)),10)); 
X1:=EMA(X,10);
Y:=ABS(INTPART(10-(X1-0.5)*13));
Y1:=SUM((C-REF(C,1))*VOL,Y);
Z:=EMA(Y1,10);
//  QHQQW.COM
STICKLINE1( Z>=REF(Z,1),C ,O ,4 ,0 ),COLORRED;
STICKLINE1( Z>=REF(Z,1),H ,L ,0 ,0 ),COLORRED;
STICKLINE1( Z<REF(Z,1),C ,O ,4 ,0 ),COLORGREEN;
STICKLINE1( Z<REF(Z,1),H ,L ,0 ,0 ),COLORGREEN;