N:=28;M:=22;
TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),N);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),N);
＋DI: DMP*100/TR;
－DI: DMM*100/TR;
ADX: MA(ABS(－DI-＋DI)/(－DI+＋DI)*100,M);
ADXR:(ADX+REF(ADX,M))/2;
STICKLINE(＋DI>－DI,＋DI,－DI,1,1),colormagenta;
STICKLINE(＋DI<－DI,＋DI,－DI,1,1),colorgreen;
PARTLINE(ADX,(＋DI>－DI) AND (REF(ADX,1)<ADX),colorred,(＋DI<－DI) AND (REF(ADX,1)<ADX),coloryellow,1,colorcyan),Linethick3;