通达信适用于短线的DMI优化副图指标 回测胜率还不错 源码附图

来函数检测结果如下：
该公式没有未来函数

N:=3;M:=2;



MTR:=SUM(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:=SUM(IF(HD>0&&HD>LD,HD,0),N);

DMM:=SUM(IF(LD>0&&LD>HD,LD,0),N);

PDI: DMP*100/MTR,LINETHICK3;

DRAWTEXT(ISLASTBAR,PDI,STRCAT6('  ---多方PDI ',CON2STR(PDI,2),'','','',''));

MDI: DMM*100/MTR;

ADX: MA(ABS(MDI-PDI)/(MDI+PDI)*100,M);

DRAWTEXT(ISLASTBAR,ADX,STRCAT6('  ---趋势ADX ',CON2STR(ADX,2),'','','',''));

ADXR:(ADX+REF(ADX,M))/2;

DRAWTEXT_FIX(1,0.01,0.01,0,'市场行情趋明显时效果理想。1.PDI线从下向上突破MDI线，新多头进场，做多；2.PDI线从上向下跌破MDI线，新空头进场，做空；

3.ADX值持续高于前一日时，行情将维持原趋势；4.ADX值递减，降到20以下且横向行进时，市场为盘整；5.ADX从上升倾向转为下降，行情即将反转');

原理解析：
N赋值:3
M赋值:2

MTR:=SUM(MAX(MAX(最高价-最低价,最高价-1日前的收盘价的绝对值),ABS(1日前的收盘价-最低价)),N)
HD :=最高价-1日前的最高价
LD :=1日前的最低价-最低价
如果HD>0&&HD>LD返回HD否则返回0
如果LD>0&&LD>HD返回LD否则返回0
输出PDI: DMP*100/MTR,LINETHICK3
DRAWTEXT(ISLASTBAR,PDI,STRCAT6(' ---多方PDI ',CON2STR(PDI,2),'','','',''))
MDI: DMM*100/MTR
输出ADX: MA(MDI-PDI的绝对值/(MDI+PDI)*100,M)
DRAWTEXT(ISLASTBAR,ADX,STRCAT6(' ---趋势ADX ',CON2STR(ADX,2),'','','',''))
ADXR:(ADX+M日前的ADX)/2
当满足条件1时,在横轴0.01纵轴0.01位置书写文字