通达信超实用macd公式

此源码一出，必成为未来新股软必备指标

大智慧macd底背离选股测试40天20%。2015年1月1日-5月9日。
 参数：12、26、9.。
          测试结果
 测试股票数:2659
共发出指示:554 成功指示:503 失败指示:34 未完成指示:17
平均成功率:93.67%, 成功率达到50%的股票有:16.9%
利润1总平均:49.08% 最大平均利润1:蓝鼎控股 185.34% 最小平均利润1:翠微股份 3.20%
利润2总平均:38.01% 最大平均利润2:蓝鼎控股 151.06% 最小平均利润2:信威集团 -0.10%
参数：21、44、11.。
          测试结果
 测试股票数:2659
共发出指示:253 成功指示:230 失败指示:17 未完成指示:6
平均成功率:93.12%, 成功率达到50%的股票有:8.4%
利润1总平均:51.37% 最大平均利润1:久其软件 148.67% 最小平均利润1:惠而浦   7.14%
利润2总平均:39.58% 最大平均利润2:万方发展 129.67% 最小平均利润2:信威集团 -0.10%
 

此源码一出，必成为未来新股软必备指标

 参数：

short：最小，1；最大，999；缺省，21.。
Long：最小，1；最大，999；缺省，44.。
MID：最小，1；最大，999；缺省，11.。

DIFF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
 DEA:EMA(DIFF,MID);
 MACD:(DIFF-DEA)*2,COLORFFFF00,COLORSTICK;
 A1:=BARSLAST(REF(CROSS(0,DEA),1));
 B1:= BARSLAST(REF(COUNT(DEA<=0,A1+1)=A1+1  AND  REF(DEA=LLV(DEA,A1+1),1)  AND  CROSS(DIFF,DEA),1));
金叉:=IF(CROSS(DIFF,DEA) AND DIFF<=0,0,DEA),COLORYELLOW;
低位多次金叉:IF(CROSS(DIFF,DEA) AND COUNT(B1>=1,B1+1)>=1  AND  COUNT(DEA<=0,B1+1)=B1+1,0,DEA),COLORYELLOW;
 DIBL1:=DIFF>=REF(DIFF,B1+1)  AND CLOSE<=REF(CLOSE,B1+1)   AND CROSS(DIFF,DEA) AND COUNT(B1>=1,B1+1)>=1  AND  COUNT(DEA<=0,B1+1)=B1+1;
底背离:=IF(DIBL1,0,DEA);
 DRAWLINE(B1=0,DEA,DIBL1=1,DEA,0),COLORRED,LINETHICK3;
 A2:=BARSLAST(REF(CROSS(DEA,0),1));
 B2:=BARSLAST(REF(COUNT(DEA>=0,A2+1)=A2+1   AND   REF(DEA=HHV(DEA,A1+1),1)  AND  CROSS(DEA,DIFF),1));
死叉:=IF(CROSS(DEA,DIFF) AND DIFF>=0,0,DEA),COLORFFFF00;
高位多次死叉:IF(CROSS(DEA,DIFF) AND COUNT(B2>=1,B2+1)>=1   AND REF(COUNT(DEA>=0,B2+1)=B2+1,1),0,DEA),COLORFFFF00;
 DINGBL1:=DIFF<=REF(DIFF,B2+1) AND CLOSE>=REF(CLOSE,B2+1)    AND CROSS(DEA,DIFF) AND COUNT(B2>=1,B2+1)>=1   AND REF(COUNT(DEA>=0,B2+1)=B2+1,1);
顶背离:=IF(DINGBL1,0,DEA);
 DRAWLINE(B2=0,DEA,DINGBL1,DEA,0),COLOR00FF00,LINETHICK3;
 STICKLINE(DIFF>DEA,MACD,0,1,0),COLORRED;
 STICKLINE(DEA>DIFF,MACD,0,1,0),COLORFFFF00;

底背离选股：

DIFF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
 DEA:=EMA(DIFF,MID);
 MACD:=(DIFF-DEA)*2;
 A1:=BARSLAST(REF(CROSS(0,DEA),1));
 B1:= BARSLAST(REF(COUNT(DEA<=0,A1+1)=A1+1  AND  REF(DEA=LLV(DEA,A1+1),1)  AND  CROSS(DIFF,DEA),1));
 DIBL1:DIFF>=REF(DIFF,B1+1) AND CROSS(DIFF,DEA) AND COUNT(B1>=1,B1+1)>=1  AND  COUNT(DEA<=0,B1+1)=B1+1;