DMI新编代替MACD效果不错，背离明显（源码副图贴图）

殷振华 · 发表于 2017-5-5 03:58

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-5 10:04

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-5 16:14

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-10 13:18

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-10 19:36

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-11 01:57

谢谢老师辛苦了谢谢老师辛苦了

旭日123456 · 发表于 2017-5-11 08:01

{DMI新编}
N:=21;M:=6;M1:=20;
TR1:=EMA(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:=EMA(IF(HD>0 AND HD>LD,HD,0),N);
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N);
PDI:= DMP*100/TR1;
MDI:= DMM*100/TR1;
ADX: EMA((PDI-MDI)/(MDI+PDI)*100,M)*2;
ADXR:EMA(ADX,M);
ADMA:EMA(ADX,M1);
OMDADX-2*ADMA+ADXR)/2, COLORSTICK;
DRAWBAND(ADX,RGB(155,50,50),ADXR,RGB(0,100,50));
STICKLINE(OMD>REF(OMD,1) AND OMD>0,0,OMD,1,0),COLORRED;
STICKLINE(OMD>REF(OMD,1) AND OMD<0,0,OMD,1,0),COLORGREEN;
STICKLINE(OMD<REF(OMD,1),0,OMD,1,0),COLORCBCBC0;
STICKLINE(OMD>=0 OR OMD<=0,0,0,50,1),COLORWHITE;
ADX1:ADX,COLORRED;
ADXR1:ADXR,COLORGREEN;
ADMA1:ADMA;
强:IF(ADX1>=ADXR1,ADX1,DRAWNULL),COLORRED,LINETHICK3;
买入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0);
{OMD;}
110;
0;
-110;

殷振华 · 发表于 2017-5-11 16:25

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-11 22:38

谢谢老师辛苦了谢谢老师辛苦了

LWDLWDHY · 发表于 2017-5-11 23:09

伟人之所以伟大，是因为他与别人共处逆境时，别人失去了信心，他却下决心实现自己的目标。

殷振华 · 发表于 2017-5-12 05:02

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-12 11:14

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-12 17:27

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-12 23:40

谢谢老师辛苦了谢谢老师辛苦了

殷振华 · 发表于 2017-5-13 06:00

谢谢老师辛苦了谢谢老师辛苦了

		自动登录	找回密码
密码			立即注册

DMI新编代替MACD效果不错，背离明显（源码 副图 贴图）

DMI新编代替MACD效果不错，背离明显（源码副图贴图）