MACD将死不死优化 副图及选股预警 源码

　　需要注意的是免费的软件在计算MACD指标是参数值只取0.01，所以有的个股选出来后附图没有提示，用眼睛判断就可以了。

　　{将死不死}

　　DIF:EMA(CLOSE,12)-EMA(CLOSE,26);

　　DEA:EMA(DIF,9);

　　MACD:(DIF-DEA)*2;

　　NH:=REF(DIF,3)>=REF(DIF,2) AND REF(DIF,2)>=REF(DIF,1) AND DIF>REF(DIF,1)*1.1;

　　NH1:=ABS((REF(DIF,1)-REF(DEA,1))/REF(DIF,1))<=0.2;

　　DT:=REF(DIF,2)>REF(DEA,2) AND REF(DIF,1)>=REF(DEA,1) AND DIF>DEA;

　　NLZ:=MACD>REF(MACD,1) AND DIF>0;

　　NLZ1:=MACD>REF(MACD,1) AND DIF<0;

　　将死不死1:=(NH1 AND NH AND DT AND NLZ);

　　将死不死0:=(NH1 AND NH AND DT AND NLZ1);

　　将死不死:将死不死1 OR 将死不死0;

　　{MACD副图}

　　DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORRED,LINETHICK2;

　　DEA:EMA(DIF,9),COLORBLUE,LINETHICK2;

　　MACD:(DIF-DEA)*2,COLORSTICK,COLORMAGENTA;

　　STICKLINE(((MACD<REF(MACD,1)) AND (MACD>0)),0,MACD,0.05,0),COLORLIBLUE,LINETHICK2;

　　STICKLINE(((MACD>REF(MACD,1)) AND (MACD<0)),0,MACD,0.05,0),COLORFF00FF,LINETHICK2;

　　DRAWICON(CROSS(DIF,DEA),DIF+0.025,1);

　　DRAWICON(CROSS(DEA,DIF),DIF+0.025,2);

　　NH:=REF(DIF,3)>=REF(DIF,2) AND REF(DIF,2)>=REF(DIF,1) AND DIF>REF(DIF,1)*1.1;

　　NH1:=ABS((REF(DIF,1)-REF(DEA,1))/REF(DIF,1))<=0.2;

　　DT:=REF(DIF,2)>REF(DEA,2) AND REF(DIF,1)>=REF(DEA,1) AND DIF>DEA;

　　NLZ:=MACD>REF(MACD,1) AND DIF>0;

　　NLZ1:=MACD>REF(MACD,1) AND DIF<0;

　　将死不死1:=(NH1 AND NH AND DT AND NLZ);

　　将死不死0:=(NH1 AND NH AND DT AND NLZ1);

　　将死不死:将死不死1 OR 将死不死0,NODRAW;

　　DRAWTEXT(将死不死,DIF,'不死')LINETHICK5,COLORBLUE;

　　DRAWICON(将死不死,DEA-0.01,38);

　　DRAWICON(将死不死,DEA-0.03,38);