来函数检测结果如下：
该公式没有未来函数
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);
A1:=BARSLAST(REF(CROSS(ADX,ADXR),1));
B1:=REF(C,A1+1)>C AND REF(ADXR,A1+1)<ADXR AND CROSS(ADX,ADXR);
DRAWTEXT(B1>0,ADX-0.1,'底背离'),COLORFF00FF;
STICKLINE(B1,0,ADX,0.5,0),COLOR0000FF;
C1:=BARSLAST(REF(CROSS(ADXR,ADX),1));
D1:=REF(C,C1+1)<C AND REF(ADX,C1+1)>ADX AND CROSS(ADXR,ADX);
DRAWTEXT(D1> 0,ADX+0.1,'顶背离'),COLOR00FF00;
STICKLINE(D1,0,ADX,0.5,0),COLOR00FFFF;
110;
0;
-110;
原理解析：
N赋值:21
M赋值:6
M1:=20
TR1赋值:EMA(MAX(MAX(最高价-最低价,最高价-1日前的收盘价的绝对值),ABS(1日前的收盘价-最低价)),N)
HD :=最高价-1日前的最高价
LD :=1日前的最低价-最低价
如果HD>0 AND HD>LD返回HD否则返回0
如果LD>0 AND LD>HD返回LD否则返回0
PDI赋值: DMP*100/TR1
MDI:= DMM*100/TR1
输出
ADX: EMA((PDI-MDI)/(MDI+PDI)*100,M)*2
ADXR:ADX的M日指数移动平均
输出
ADMA:ADX的M1日指数移动平均
输出
OMD:(ADX-2*ADMA+ADXR)/2, COLORSTICK
DRAWBAND(ADX,RGB(155,50,50),ADXR,RGB(0,100,50))
STICKLINE(OMD>1日前的OMD AND OMD>0,0,OMD,1,0),画红色
STICKLINE(OMD>1日前的OMD AND OMD<0,0,OMD,1,0),COLORGREEN
STICKLINE(OMD<1日前的OMD,0,OMD,1,0),COLORCBCBC0
当满足条件OMD>=0 OR OMD<=0时,在0和0之间画柱状线
ADX1:ADX,画红色
ADXR1:ADXR,COLORGREEN
ADMA1:ADMA
如果ADX1>=ADXR1返回ADX1否则返回DRAWNULL
输出
买入:IF(OMD>0 AND OMD-1日前的OMD>0,30,0)
A1赋值:上次1日前的ADX上穿ADXR距今天数
B1赋值:A1+1日前的C>C AND A1+1日前的ADXR
当满足条件B1时,在0和ADX之间画柱状线
C1赋值:上次1日前的ADXR上穿ADX距今天数
D1赋值:C1+1日前的C
当满足条件D1> 0时,在ADX+0.1和'顶背离'位置书写文字
当满足条件D1时,在0和ADX之间画柱状线
110
0
-110
