当前位置：→ 公式网 > 通达信公式 > 正文 ℃ 公式解密、改选股等业务 联系点击查看详情...
以下是通达信DMI新编代替MACD效果不错背离明显副图源码（无源码的请下载附件导入）
通达信DMI新编代替MACD效果不错背离明显副图源码
{公式在线提供：www.gszx.com.cn}
C/C++ Code复制内容到剪贴板
- {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);
- OMD:(ADX-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;
上一篇：通达信抄底公式源码副图 下一篇：通达信主图热门点龙头的看盘板面
栏目导航 