HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);

LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);

A:=REF(CLOSE,BARSLAST(HD));

B:=REF(CLOSE,BARSLAST(LD));

T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;

T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);

波浪頂:IF(T1,A,A),COLORFF00FF,DOT,LINETHICK2;

STICKLINE1(T1,A,A,9,0),COLORFF00FF;

波浪底:IF(T2,B,B),COLOR00FF80,DOT,LINETHICK2;  

M:=6;

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(IFELSE(HD>0 && HD>LD,HD,0),N);

DMM:= SUM(IFELSE(LD>0 && LD>HD,LD,0),N);

PDI: DMP*100/TR;

MDI: DMM*100/TR;

ADX: MA(ABS(MDI-PDI)/(MDI+PDI)*100,M);

ADXR:(ADX+REF(ADX,M))/2;