操盘手低位金叉MACD源码副图 EA

操盘手低位金叉MACD源码副图

rn

{低位金叉MACD}

rn

 

rn

DIFF:EMA(CLOSE,12)-EMA(CLOSE,27);

rn

 DEA:EMA(DIFF,9);

rn

 MACD:2*(DIFF-DEA), COLORSTICK,LINETHICK2;

rn

低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;

rn

 STICKLINE(低位金叉,0,0.08,6,0),COLORYELLOW;

rn

 DRAWTEXT(低位金叉,0.16,’ 低位金叉’),COLORWHITE;

rn

 JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));

rn

二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;

rn

 STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF;

rn

 DRAWICON(二次金叉,DEA*0.9,1) ;

rn

 DRAWTEXT(二次金叉,0.2,’ 二次金叉’),COLORYELLOW;

rn

 A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));

rn

底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);

rn

 STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;

rn

底背离;DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK4;

rn

 DRAWTEXT(底背离,0.12,’ 底背离’),COLORFF00FF;

rn

 A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));

rn

顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);

rn

顶背离;DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK4;

rn

 DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.25,’三全项’),COLOR0000FF,LINETHICK2;

rn

 B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);

rn

 B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));

rn

 A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));

rn

 B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));

rn

 C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));

rn

 D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);

rn

 C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));

rn

 D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));

rn

 C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));

rn

 D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));

rn

 MACD底背:IF(B1>0,-0.1,0),COLORRED,POINTDOT;

rn

 KDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT;

rn

 RSI底背:IF(B3>0,-0.1,0),COLORWHITE,POINTDOT;

rn

 MACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT;

rn

 KDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT;

rn

 RSI顶背:IF(D3>0,0.1,0),COLORWHITE,POINTDOT;

rn

 STICKLINE(B1>0,-0.1,0,6,0),COLORRED;

rn

 STICKLINE(B2>0,-0.1,0,6,0),COLORFF00FF;

rn

 STICKLINE(B3>0,-0.1,0,6,0),COLORYELLOW;

rn

 STICKLINE(D1>0,0.1,0,3,0),COLOR00FF00;

rn

 STICKLINE(D2>0,0.1,0,3,0),COLORFFCC66;

rn

 STICKLINE(D3>0,0.1,0,3,0),COLORWHITE;

rn

 LC:= REF(C,1);

rn

 F1:=ZIG(3,15);

rn

方向:IF((F1> REF(F1,1)),-0.2,0.5),COLOR00FF00,LINETHICK3,COLORWHITE;

rn