通达信公式优化DMI

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

MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);

HD :=HIGH-REF(HIGH,1);

LD :=REF(LOW,1)-LOW;

DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);

DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);

PDI:=DMP*100/MTR;

MDI:=DMM*100/MTR;

ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);

ADXR:=EXPMEMA(ADX,6);

{股票指标网}

DRAWBAND(ADX,RGB(250,0,00),ADXR,RGB(100,80,200));

MDI1:DMM*100/MTR,COLORGREEN;

98;

黑:IF(ADX<20,19,0);

40;

60;

DRAWBAND(19,RGB(0,200,00),MDI1,RGB(0,200,0));

DRAWBAND(19,RGB(0,0,00),黑,RGB(0,0,0));

PDI1:DMP*100/MTR,LINETHICK2,COLORYELLOW;

高危区:95;

 

原理解析：
MTR赋值:EXPMEMA(MAX(MAX(最高价-最低价,最高价-1日前的收盘价的绝对值),ABS(1日前的收盘价-最低价)),14)


HD :=最高价-1日前的最高价


LD :=1日前的最低价-最低价
如果HD>0&&HD>LD返回HD否则返回0
如果LD>0&&LD>HD返回LD否则返回0


PDI赋值:DMP*100/MTR


MDI赋值:DMM*100/MTR


ADX赋值:EXPMEMA(MDI-PDI的绝对值/(MDI+PDI)*100,6)


ADXR:=EXPADX的6日平滑移动平均


{股票指标网}

DRAWBAND(ADX,RGB(250,0,00),ADXR,RGB(100,80,200))


MDI1:DMM*100/MTR,画绿色


98
如果ADX<20返回19否则返回0


40


60


DRAWBAND(19,RGB(0,200,00),MDI1,RGB(0,200,0))


DRAWBAND(19,RGB(0,0,00),黑,RGB(0,0,0))


PDI1:DMP*100/MTR, 线宽为2,画黄色
输出

高危区:95