TR:=MAX(ABS(H-REF(H,1)),ABS(L-REF(L,1)));

DMZ:=IF(( H+L)<=(REF(H,1)+REF(L,1)),0,MAX(ABS(H-REF(H,1)),ABS(L-REF(L,1))) );

DMF:=IF((H+L)>=(REF(H,1)+REF(L,1)),0,MAX(ABS(H-REF(H,1) )),ABS(L-REF(L,1))));

DIZ:=SUM(DMZ,N)/(SUM(DMZ,N)+SUM(DMF,N));

DIF:=SUM(DMF,N)/(SUM(DMF,N)+SUM(DMZ,N));

DDI:DIZ-DIF,{COLORSTICK}linethick0 ;

ADDI:SMA(DDI,N1,M);

AD:MA(ADDI,M1);