同花顺优化DMI副图源码 EA

分享一个自用的指标。低位红线对绿线金叉时买入，高位红线对绿线死叉时卖出。顺势而为，逆势而谋。

r

N:=21;M:=6;M1:=20;
r TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
r HD :=HIGH-REF(HIGH,1);
r LD :=REF(LOW,1)-LOW;
r DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N);
r DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N);
r PDI:= DMP*100/TR1;
r MDI:= DMM*100/TR1;
r ADX: EMA((PDI-MDI)/(MDI+PDI)*100,M)*2;
r ADXR:EMA(ADX,M);
r ADMA:EMA(ADX,M1);
r OMD:(ADX-2*ADMA+ADXR)/2, COLORSTICK;
r DRAWBAND(ADX,RGB(155,50,50),ADXR,RGB(0,100,50));
r STICKLINE(OMD>REF(OMD,1) AND OMD>0,0,OMD,1,0),colorred;
r STICKLINE(OMD>REF(OMD,1) AND OMD<0,0,OMD,1,0),colorgreen;
r STICKLINE(OMD<REF(OMD,1),0,OMD,1,0),COLORCBCBC0;
r STICKLINE(OMD>=0 OR OMD<=0,0,0,50,1),colorwhite;
r ADX1:ADX,colorred;
r ADXR1:ADXR,colorgreen;
r ADMA1:ADMA;
r强:IF(ADX1>=ADXR1,ADX1,DRAWNULL),colorred,LINETHICK3;
r买入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0);
r 110;0;-110;

r

r