这种二启信号见仁见智,我把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; 
 
  
 
 
  |