N  2  90  3   
       M   2  60  2    
    TR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);   
    HD :=HIGH-REF(HIGH,1);   
    LD :=REF(LOW,1)-LOW;   
    DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N);   
    DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N);   
    PDI: DMP*100/TR;   
    MDI: DMM*100/TR;   
    ADX: EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M);   
    ADXR:EXPMEMA(ADX,M);