DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORLIBLUE;
DEA:EMA(DIF,9),COLORBLUE;
MACD:(DIF-DEA)*2,COLORSTICK;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,1,0),COLORLIBLUE;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,1,0),COLORFF00FF;
IF(DEA<DIF,DEA,DRAWNULL),COLORRED;
IF(DIF>=REF(DIF,1),DIF,DRAWNULL),COLORBLACK;

C底:ABS((CROSS("MACD.DIF","MACD.DEA")
&&"MACD.DEA"<=-0.07)*"MACD.DIF")*1.50,COLORLIMAGENTA; 
DRAWTEXT(ABS(C底)>0,C底*1.30,' 抄底'),COLORRED;
DRAWICON(ABS(C底)>0,C底*1.10,4);

{低位金叉,二次金叉,背离}
低位金叉:=CROSS(DIF,DEA) AND DIF<-0.1; 
STICKLINE(低位金叉,0,0.3,2,0),COLORYELLOW; 
DRAWTEXT(低位金叉,0.16,' 低位金叉'),COLORBLACK; 
JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0)); 
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1; 
STICKLINE(二次金叉,0,0.2,2,0),COLORFF00FF;
DRAWICON(二次金叉,DEA*0.9,1) ; 
DRAWTEXT(二次金叉,0.2,' 二次金叉'),COLORYELLOW; 
A1:=BARSLAST(REF(CROSS(DIF,DEA),1)); 
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA); 
STICKLINE(底背离,0,0.1,2,0),COLOR00FF00; 
底背:DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK2; 
DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF; 
A2:=BARSLAST(REF(CROSS(DEA,DIF),1)); 
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)> DIF AND CROSS(DEA,DIF); 
顶背:DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK2; 
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.25,'三全项'),COLOR0000FF,LINETHICK2;
{黄金坑}
RR8:=MA(CLOSE,27);
RR9:=(CLOSE-RR8)/RR8;
RRA:=MA(RR9,2);
RRB:=BARSLAST(CROSS(-0.1,RRA)=1);
RRD:=RRA<-0.1 AND RRB>0.3; 
黄金坑:IF(RRD,-0.15,DRAWNULL),COLORYELLOW,STICK,LINETHICK3;

代理编写(对转)通达信 飞狐 同花顺 大智慧 文华财经 博易大师 依天财经等软件指标!