【 原创 】 周线 D M I 指标副图公式 【梅花三弄】
{【梅花三弄】}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)<40;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;  |
