这种二启信号见仁见智,我把MACD连续3天小于0再翻红算一次新的开始,跟原思路会有所不同! 预警条件中少了量比条件,需自己盘中观察!
这种信号只有在大盘回调或盘整后才能出现,若大盘没有再次走强,又因为是追涨买入,亏损程度会很大!!!
信号量可能会较多也可能会有其他一些问题,都等以后有空再优化,测试几天再说
{MACD二启 通达信版预警 去ST} DIF:=(EMA(C,5)-EMA(C,21))/EMA(C,21)*100; DEA:=EMA(DIF,8); MACD:=2*(DIF-DEA); ER:=VOL/CAPITAL*100; ZD:=C/REF(C,1)*100-100; A0:=BARSLAST(CROSS(0.5,COUNT(MACD<0,3)>=3) AND (MACD>=1 OR DIF>=2)); A1:=CROSS(0.5,COUNT(MACD>REF(MACD,1),A0+1)=A0+1); A2:=REF(HHV(ER,A0+1),1)>=3 AND REF(HHV(ZD,A0+3),1)>=5; B0:=BARSLAST(A1 AND A2); B1:=COUNT(MACD<REF(MACD,1),B0+1)=B0+1; B2:=COUNT(MACD<0,B0+1)<=2 AND (COUNT(C<O AND ZD<0,2)=2 OR B0>=1); ST:=(NAMELIKE('S') OR NAMELIKE('*S'))=0;{剔除ST} XZ:=FROMOPEN>=1 AND FROMOPEN<=230 AND DYNAINFO(8)>=100; B3:=B1 AND B2 and ST;{备选} REF(B3,1) AND MACD>REF(MACD,1) AND C>O AND ZD>0 AND XZ;
{MACD二启 通达信低版本预警,不去ST} DIF:=(EMA(C,5)-EMA(C,21))/EMA(C,21)*100; DEA:=EMA(DIF,8); MACD:=2*(DIF-DEA); ER:=VOL/CAPITAL*100; ZD:=C/REF(C,1)*100-100; A0:=BARSLAST(CROSS(0.5,COUNT(MACD<0,3)>=3) AND (MACD>=1 OR DIF>=2)); A1:=CROSS(0.5,COUNT(MACD>REF(MACD,1),A0+1)=A0+1); A2:=REF(HHV(ER,A0+1),1)>=3 AND REF(HHV(ZD,A0+3),1)>=5; B0:=BARSLAST(A1 AND A2); B1:=COUNT(MACD<REF(MACD,1),B0+1)=B0+1; B2:=COUNT(MACD<0,B0+1)<=2 AND (COUNT(C<O AND ZD<0,2)=2 OR B0>=1); XZ:=FROMOPEN>=1 AND FROMOPEN<=230 AND DYNAINFO(8)>=100; B3:=B1 AND B2;{备选} REF(B3,1) AND MACD>REF(MACD,1) AND C>O AND ZD>0 AND XZ;
{MACD二启 大智慧飞狐版预警} DIF:=(EMA(C,5)-EMA(C,21))/EMA(C,21)*100; DEA:=EMA(DIF,8); MACD:=2*(DIF-DEA); ER:=VOL/CAPITAL*100; ZD:=C/REF(C,1)*100-100; A0:=BARSLAST(CROSS(0.5,COUNT(MACD<0,3)>=3) AND (MACD>=1 OR DIF>=2)); A1:=CROSS(0.5,COUNT(MACD>REF(MACD,1),A0+1)=A0+1); A2:=REF(HHV(ER,A0+1),1)>=3 AND REF(HHV(ZD,A0+3),1)>=5; B0:=BARSLAST(A1 AND A2); B1:=COUNT(MACD<REF(MACD,1),B0+1)=B0+1; B2:=COUNT(MACD<0,B0+1)<=2 AND (COUNT(C<O AND ZD<0,2)=2 OR B0>=1); ST:=STRFIND(STKNAME,'S',1)=0;{剔除ST} XZ:=CURRENTTIME>=93000 AND CURRENTTIME<145000 AND DYNAINFO(8)>=100; B3:=B1 AND B2 and ST;{备选} REF(B3,1) AND MACD>REF(MACD,1) AND C>O AND ZD>0 AND XZ;
{MACD优,通达信版副图} DIF:(EMA(C,5)-EMA(C,21))/EMA(C,21)*100,COLORF0F0F0; DEA:EMA(DIF,8),COLOR00DCDC; MACD:2*(DIF-DEA),COLORSTICK,COLOR0000DC; STICKLINE(MACD>0,MACD,0,2,1),COLOR0000DC; STICKLINE(MACD>0 AND MACD<REF(MACD,1),MACD,0,2,1),COLOR00B400; STICKLINE(MACD<=0,MACD,0,2,1),COLORGRAY; STICKLINE(MACD<=0 AND MACD>REF(MACD,1),MACD,0,2,1),COLORC800C8; X0:=BARSLAST((CROSS(MACD,REF(MACD,1)) AND MACD>0) OR CROSS(MACD,0)); X1:=BARSLAST(CROSS(0.5,COUNT(MACD>REF(MACD,1),X0+1)=X0+1));{回} X2:=COUNT(MACD<REF(MACD,1),X1+1)=X1+1 AND COUNT(MACD<0,X1+1)<=2; X3:=REF(X2,1) AND MACD>REF(MACD,1) AND C>O AND C>REF(C,1); STICKLINE(X1=0 AND MACD>0,MACD,0,2,0),COLORDCDC00; STICKLINE(X3,MACD,0,2,0),COLOR0854FF; NOTEXTDIF:DIF,COLORWHITE; NOTEXTDEA:DEA,COLORYELLOW; NOTEXT:IF(DIF>=REF(DIF,1),DIF,DRAWNULL),COLORRED; ER:=VOL/CAPITAL*100; ZD:=C/REF(C,1)*100-100; A0:=BARSLAST(CROSS(0.5,COUNT(MACD<0,3)>=3) AND (MACD>=1 OR DIF>=2)); A1:=CROSS(0.5,COUNT(MACD>REF(MACD,1),A0+1)=A0+1); A2:=REF(HHV(ER,A0+1),1)>=3 AND REF(HHV(ZD,A0+3),1)>=5; B0:=BARSLAST(A1 AND A2); B1:=COUNT(MACD<REF(MACD,1),B0+1)=B0+1; B2:=COUNT(MACD<0,B0+1)<=2 AND (COUNT(C<O AND ZD<0,2)=2 OR B0>=1); B3:=B1 AND B2; B4:=REF(B3,1) AND MACD>REF(MACD,1) AND C>O AND ZD>0; DRAWICON(B4,ABS(MACD)+1,1);
{MACD优,飞狐版副图} DIF:(EMA(C,5)-EMA(C,21))/EMA(C,21)*100,ColorF0F0F0; DEA:EMA(DIF,8),COLOR00DCDC; MACD:2*(DIF-DEA),COLORSTICK,COLOR0000DC; STICKLINE(MACD>0,MACD,0,8,1),COLOR0000DC; STICKLINE(MACD>0 AND MACD<REF(MACD,1),MACD,0,8,1),COLOR00B400; STICKLINE(MACD<=0,MACD,0,8,1),COLORGRAY; STICKLINE(MACD<=0 AND MACD>REF(MACD,1),MACD,0,8,1),COLORC800C8; X0:=BARSLAST((CROSS(MACD,REF(MACD,1)) AND MACD>0) OR CROSS(MACD,0)); X1:=BARSLAST(CROSS(0.5,COUNT(MACD>REF(MACD,1),X0+1)=X0+1));{回} X2:=COUNT(MACD<REF(MACD,1),X1+1)=X1+1 AND COUNT(MACD<0,X1+1)<=2; X3:=REF(X2,1) AND MACD>REF(MACD,1) AND C>O AND C>REF(C,1); STICKLINE(X1=0 AND MACD>0,MACD,0,8,0),ColorDCDC00; STICKLINE(X3,MACD,0,8,0),Color0854FF; POLYLINE(C>0,DIF),ColorF0F0F0; POLYLINE(C>0,DEA),COLOR00DCDC; PARTLINE(DIF>REF(DIF,1),DIF),COLORRED; ER:=VOL/CAPITAL*100; ZD:=C/REF(C,1)*100-100; A0:=BARSLAST(CROSS(0.5,COUNT(MACD<0,3)>=3) AND (MACD>=1 OR DIF>=2)); A1:=CROSS(0.5,COUNT(MACD>REF(MACD,1),A0+1)=A0+1); A2:=REF(HHV(ER,A0+1),1)>=3 AND REF(HHV(ZD,A0+3),1)>=5; B0:=BARSLAST(A1 AND A2); B1:=COUNT(MACD<REF(MACD,1),B0+1)=B0+1; B2:=COUNT(MACD<0,B0+1)<=2 AND (COUNT(C<O AND ZD<0,2)=2 OR B0>=1); B3:=B1 AND B2; B4:=REF(B3,1) AND MACD>REF(MACD,1) AND C>O AND ZD>0; DRAWTEXT(B4,ABS(MACD)+1.5,'◆'),COLORYELLOW,,align0;
{MACD优,大智慧版副图} DIF:(EMA(C,5)-EMA(C,21))/EMA(C,21)*100,ColorF0F0F0; DEA:EMA(DIF,8),COLOR00DCDC; MACD:2*(DIF-DEA),COLOR0000DC,LINETHICK0; STICKLINE(MACD>0,MACD,0,8,1),COLOR0000DC; STICKLINE(MACD>0 AND MACD<REF(MACD,1),MACD,0,8,1),COLOR00B400; STICKLINE(MACD<=0,MACD,0,8,1),COLORGRAY; STICKLINE(MACD<=0 AND MACD>REF(MACD,1),MACD,0,8,1),COLORC800C8; X0:=BARSLAST((CROSS(MACD,REF(MACD,1)) AND MACD>0) OR CROSS(MACD,0)); X1:=BARSLAST(CROSS(0.5,COUNT(MACD>REF(MACD,1),X0+1)=X0+1));{回} X2:=COUNT(MACD<REF(MACD,1),X1+1)=X1+1 AND COUNT(MACD<0,X1+1)<=2; X3:=REF(X2,1) AND MACD>REF(MACD,1) AND C>O AND C>REF(C,1); STICKLINE(X1=0 AND MACD>0,MACD,0,8,0),ColorDCDC00; STICKLINE(X3,MACD,0,8,0),Color0854FF; POLYLINE(C>0,DIF),ColorF0F0F0; POLYLINE(C>0,DEA),COLOR00DCDC; PARTLINE(DIF,DIF>REF(DIF,1)),COLORRED,LAYER0; ER:=VOL/CAPITAL*100; ZD:=C/REF(C,1)*100-100; A0:=BARSLAST(CROSS(0.5,COUNT(MACD<0,3)>=3) AND (MACD>=1 OR DIF>=2)); A1:=CROSS(0.5,COUNT(MACD>REF(MACD,1),A0+1)=A0+1); A2:=REF(HHV(ER,A0+1),1)>=3 AND REF(HHV(ZD,A0+3),1)>=5; B0:=BARSLAST(A1 AND A2); B1:=COUNT(MACD<REF(MACD,1),B0+1)=B0+1; B2:=COUNT(MACD<0,B0+1)<=2 AND (COUNT(C<O AND ZD<0,2)=2 OR B0>=1); B3:=B1 AND B2; B4:=REF(B3,1) AND MACD>REF(MACD,1) AND C>O AND ZD>0; DRAWTEXT(B4,ABS(MACD)+1.5,'◆'),COLORYELLOW,align1;

  |