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

monk7788

感谢楼主分享

monk7788

感谢楼主分享

lin_weihong

有代码，有图，非常好！谢谢分享！

殷振华

学以求知，学以致用，学以做人

跌落于朝花夕拾

谢谢楼主分享！！

殷振华

感谢楼主分享!谢谢分享！向高手学习。

mxxxo

当前公式 : MI新编 (指标画线公式)  
错误句 :
OMDADX-2*ADMA+ADXR)/2, COLORSTICK
详细信息 :  
错误起始位置 : 323 ; 长度: 3

子小尹口

谢谢楼主！

殷振华

一点浩然气，千里快哉风

producercn

先下载试一试

殷振华

学以求知，学以致用，学以做人

东升123

{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;

lhl311

mxxxo 发表于 2017-3-22 08:31
当前公式 : MI新编 (指标画线公式)  
错误句 :
OMDADX-2*ADMA+ADXR)/2, COLORSTICK

(OMDADX-2*ADMA+ADXR)/2, COLORSTICK;

lhl311

戴初升 发表于 2010-11-17 20:30
当前公式 : MI新编 (指标画线公式)  
错误句 :
OMDADX-2*ADMA+ADXR)/2, COLORSTICK

(OMDADX-2*ADMA+ADXR)/2, COLORSTICK;