DMI改进副图指标 源码 通达信

N:=14;M:=3;
TRTR:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N,1);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DMP:=SMA(IF(HD>0 AND HD>LD,HD,0),N,1);
DMM:=SMA(IF(LD>0 AND LD>HD,LD,0),N,1);
PDI:DMP*100/TRTR,COLORRED;
MDI:DMM*100/TRTR,COLORGREEN;
ADX:SMA(ABS(MDI-PDI)/(MDI+PDI)*100,N,1),COLORYELLOW;
ADXR:=SMA(ADX,M,1);
MA62:=MA(CLOSE,5);
MA20:=MA(CLOSE,4);
MA10:=MA(CLOSE,3);
VOL5:=MA(VOL,5);
DMR:=MA62>MA20 AND SLOPE(MA62,5)<0 AND SLOPE(MA20,4)<0 AND SLOPE(MA10,3) AND REF(MA20>MA10,1) AND CROSS(MA10,MA20) AND VOL>VOL5;
VAR2:=LLV(LOW,10);
VAR3:=HHV(HIGH,25);
VAR1:= EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4);
16;
30;
MR1:STICKLINE(LONGCROSS(PDI,MDI,2) AND LONGCROSS(PDI,ADX,2),28,15,1,0),COLORWHITE;
MR2:=(CROSS(PDI, MDI)AND CROSS(PDI, ADX)AND CROSS(PDI, ADXR))AND CLOSE>OPEN
AND C/REF(C,1)>0.5 AND VOL>MA(VOL,5)*1.5,COLORRED,LINETHICK3;
DRAWICON(MR2,16,9),LINETHICK3;
DRAWICON(DMR,17,15),LINETHICK3;
JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;
DRAWICON(CROSS(84,JH),31,10);
DRAWICON( FILTER(CROSS(3.5,VAR1),20),29,16);