通达信逃顶利器副图指标 会买更要会卖 源码 附图

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

{逃顶利器(DMI+DMK)}

{牛熊力量}

MTR:=EMA(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:=EMA(IF(HD>0 AND HD>LD,HD,0),14);

DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),14);

PDI:=DMP*100/MTR;

MDI:=DMM*100/MTR;

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

ADXR:=EMA(ADX,6);

NX:=PDI/(PDI+MDI)*100;



{买卖压力}

MM1:=SUM(IF(H-REF(C,1)>0,(H-REF(C,1))+(C-L),C-L),8);

MM2:=SUM(IF(REF(C,1)-L>0,(REF(C,1)-L)+(H-C),H-C),8);

DMK:=MM1/(MM1+MM2)*100;



BD:=(NX+DMK)/2;

MBD:EMA(BD,5),COLORGREEN;

IF(MBD>=REF(MBD,1),MBD,DRAWNULL),COLORRED;



STICKLINE(C>0,75,75,4,0),COLORC6C600;

STICKLINE(C>0,50,50,1,0),COLORWHITE;

STICKLINE(C>0,25,25,4,0),COLORYELLOW;

原理解析：
{逃顶利器(DMI+DMK)}
{牛熊力量}
MTR赋值:EMA(MAX(MAX(最高价-最低价,最高价-1日前的收盘价的绝对值),ABS(1日前的收盘价-最低价)),14)
HD :=最高价-1日前的最高价
LD :=1日前的最低价-最低价
如果HD>0 AND HD>LD返回HD否则返回0
如果LD>0 AND LD>HD返回LD否则返回0
PDI赋值:DMP*100/MTR
MDI赋值:DMM*100/MTR
ADX赋值:EMA(MDI-PDI的绝对值/(MDI+PDI)*100,6)
ADXR:=ADX的6日指数移动平均
NX赋值:PDI/(PDI+MDI)*100

{买卖压力}
MM1赋值:SUM(IF(H-1日前的C>0,(H-1日前的C)+(C-L),C-L),8)
MM2赋值:SUM(IF(1日前的C-L>0,(1日前的C-L)+(H-C),H-C),8)
DMK赋值:MM1/(MM1+MM2)*100

BD赋值:(NX+DMK)/2
M输出BD:BD的5日指数移动平均,画绿色
IF(MBD>=1日前的MBD,MBD,DRAWNULL),画红色
当满足条件C>0时,在75和75之间画柱状线
当满足条件C>0时,在50和50之间画柱状线
当满足条件C>0时,在25和25之间画柱状线