HD:=H-REF(H,1);
LD:=REF(L,1)-L;
DMP:=EMA(IF(HD>0 && HD>LD,HD,0),14);
DMM:=EMA(IF(LD>0 && LD>HD,LD,0),14);
TRR:=EMA(MAX(MAX(H-L,ABS(H-REF(C,1))),ABS(REF(C,1)-L)),14);
PDI:DMP/TRR*100,COLORWHITE;
MDI:DMM/TRR*100,COLORYELLOW;
ADX:EMA((DMP-DMM)/(DMP+DMM)*100,6),COLORMAGENTA;
ADXR:EMA(ADX,6),COLORGREEN;