周线DMI指标副图公式
源码
{【梅花三弄】}
P:=14;
M:=6;
AA:= SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),P);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD 0 AND HD LD,HD,0),P);
DMM:= SUM(IF(LD 0 AND LD HD,LD,0),P);
PDI:= DMP*100/AA;
MDI:= DMM*100/AA;
ADX:= MA(ABS(MDI-PDI)/(MDI+PDI)*100,M);
ADXR:=(ADX+REF(ADX,M))/2;
WMA5:MA(PDI,6);
WMA10:MA(MDI,5);
WMA20:MA(ADX,5);
WMA30:MA(ADXR,5);
梅花1:(WMA5 =WMA10 AND WMA20 =WMA30 AND ( WMA20-WMA30 1.35 OR WMA5-WMA20 1.35) AND WMA5-WMA10 3.8 AND C REF(C,1)*1.002 AND WMA10 REF(WMA10,1) AND WMA5 30 AND MAX(WMA20,WMA30) 35)*15,COLORFF00FF,LINETHICK3;
梅花2:(WMA5 =WMA10 AND WMA20 =WMA10 AND ( WMA20-WMA10 1.35 OR WMA5-WMA20 1.35) AND WMA5-WMA10 2.8 AND C REF(C,1)*1.003 AND MAX(WMA20,WMA30) 30)*15,COLOR00FFFF,LINETHICK2;
梅花3:(WMA5 WMA10*1.01 AND (WMA20 =WMA30 OR WMA5 =WMA30 ) AND ( WMA20-WMA10 3.35 OR WMA5-WMA20 5.35) AND WMA5-WMA10 5.8 AND C O AND WMA5-WMA30 6.55 AND C REF(C,1)*1.004 AND MAX(WMA20,WMA30) 25)*15,COLOR0000FF,LINETHICK1;
AA2:(CROSS(WMA5,WMA10) AND (WMA10-WMA20 2.55 OR WMA20-WMA10 2.5))*5,COLOR0000FF,LINETHICK3;{神仙搭桥}
--------------------------------------------------------------
{ 周线的dmi指标中，当MDI数值是四个参数中最小的一个时选股。}
{【方远远方】}
P:=14;
M:=6;
AA:= SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),P);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD 0 AND HD LD,HD,0),P);
DMM:= SUM(IF(LD 0 AND LD HD,LD,0),P);
PDI:= DMP*100/AA;
MDI:= DMM*100/AA;
ADX:= MA(ABS(MDI-PDI)/(MDI+PDI)*100,M);
ADXR:=(ADX+REF(ADX,M))/2;
WMA5:MA(PDI,6);
WMA10:MA(MDI,5);
WMA20:MA(ADX,5);
WMA30:MA(ADXR,5);
YB:=WMA5 WMA10 AND WMA20-WMA30 0.35 AND MAX(WMA20,WMA30)
XG:=YB AND REF(YB 1,1);
方远:(EVERY(WMA5 MIN(MIN(WMA10,WMA20),WMA30) AND WMA5 =REF(LLV(WMA5,6),1)*1.008 AND REF(LLV(WMA5,6),1) 25 AND WMA20 60 AND WMA10-WMA5 30 AND WMA20 =WMA10*0.997,3))*10,COLOR00FFFF,LINETHICK3;
金叉:=(CROSS(WMA5,REF(LLV(WMA5,6),1)) AND WMA20 60 AND REF(LLV(WMA5,6),1) 25)*10,COLORRED{,NODRAW};
远方:(EVERY(WMA5 MIN(MIN(WMA10,WMA20),WMA30) AND WMA20 60 AND WMA5 =REF(WMA5,1) AND REF(WMA5,1) REF(WMA5,3) AND REF(WMA5,2) REF(WMA5,4) {WMA5 =REF(LLV(WMA5,6),1)} AND REF(LLV(WMA5,5),1) 35 AND C REF(C,1),2))*10,COLOR0000FF,LINETHICK2;
