N:=14; N1:=5;
JJ:=(H+L+C)/3;
QJ0:=VOL/IF(H=L,4,H-L);
TD1:=QJ0*(MIN(O,C)-L);
DD1:=QJ0*(JJ-MIN(C,O));
DD2:=QJ0*(H-MAX(O,C));
TD2:=QJ0*(MAX(C,O)-JJ);
TD:=TD1-TD2;DA:=DD1-DD2;
XD1:=1-(TD1+DD1);
XD2:=1-(TD2+DD2);
TZ:=VOL/SUM(VOL,60)*100;
DT:=((XD1-XD2)/10000)/TZ;
SHCC:SUM(DT,N),COLORWHITE;
MSHCC:EMA(EMA(EMA(SHCC,N1),N1),N1),COLORGREEN;
STICKLINE(DT>0,SHCC,SHCC+DT,1,0),COLORFF8800;
STICKLINE(DT<0,SHCC+DT,SHCC,1,0),COLORFF00FF;