顶底背离MACD、RSI、KDJ顶底背离副图 EA

DIFF:EMA(CLOSE,12) – EMA(CLOSE,26);
r DEA:EMA(DIFF,9);
r MACD:2*(DIFF-DEA),COLORSTICK,COLORBROWN;
r A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
r B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);

r

 RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
r K:=SMA(RSV,3,1);
r D:=SMA(K,3,1);
r J:=3*K-2*D;

r

 LC:=REF(CLOSE,1);
r RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
r RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;

r

 A2:=BARSLAST(REF(CROSS(K,D),1));
r B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
r A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
r B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
r C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
r D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
r C2:=BARSLAST(REF(CROSS(D,K),1));
r D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
r C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
r D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
r LL:= CONST(LLV(MACD, 180));
r HH:= CONST(HHV(MACD, 180));

r

 MACD底背:IF(B1>0, 1,0),NODRAW, COLORRED;
r RSI底背:IF(B3>0, 1,0),NODRAW, COLORFF00FF;
r KDJ底背:IF(B2>0, 1,0),NODRAW, COLORYELLOW;

r

 MACD顶背:IF(D1>0, 1,0),NODRAW, COLOR00FF00;
r KDJ顶背:IF(D2>0, 1,0),NODRAW, COLORFFCC66;
r RSI顶背:IF(D3>0,1,0),NODRAW, COLORWHITE;

r

 STICKLINE(B1>0, LL,0,2,0), COLORRED;
r STICKLINE(B2>0, LL * 0.75 ,0,2,0), COLORFF00FF;
r STICKLINE(B3>0, LL * 0.5, 0,2,0), COLORYELLOW;
r STICKLINE(D1>0,0,HH,2,0), COLOR00FF00;
r STICKLINE(D2>0,0,HH * 0.75,2,0), COLORFFCC66;
r STICKLINE(D3>0,0,HH * 0.75,2,0), COLORWHITE;

r

============================================

r

三底背离选股
r 

r

DIFF:=EMA(CLOSE,12) – EMA(CLOSE,26);
r DEA:=EMA(DIFF,9);
r MACD:=2*(DIFF-DEA);
r A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
r B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);

r

 RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
r K:=SMA(RSV,3,1);
r D:=SMA(K,3,1);
r J:=3*K-2*D;

r

 LC:=REF(CLOSE,1);
r RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
r RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;

r

 A2:=BARSLAST(REF(CROSS(K,D),1));
r B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
r A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
r B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
r C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
r D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
r C2:=BARSLAST(REF(CROSS(D,K),1));
r D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
r C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
r D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);

r

 XG1:= IF(MACD底背, B1, 0);
r XG2:= IF(KDJ底背, B2, 0);
r XG3:= IF(RSI底背, B3, 0);

r

 XG1 OR XG2 OR XG3;

r

===================================================

r

三底共振选股
r 

r

DIFF:=EMA(CLOSE,12) – EMA(CLOSE,26);
r DEA:=EMA(DIFF,9);
r MACD:=2*(DIFF-DEA);
r A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
r B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);

r

 RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
r K:=SMA(RSV,3,1);
r D:=SMA(K,3,1);
r J:=3*K-2*D;

r

 LC:=REF(CLOSE,1);
r RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
r RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;

r

 A2:=BARSLAST(REF(CROSS(K,D),1));
r B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
r A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
r B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
r C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
r D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
r C2:=BARSLAST(REF(CROSS(D,K),1));
r D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
r C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
r D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);

r

 XG1:= BARSLAST(B1) < 3;
r XG2:= BARSLAST(B2) < 3;
r XG3:= BARSLAST(B3) < 3;

r

共振:= XG1 + XG2 + XG3 >= N;
r XG:BARSLAST(共振) < 3 AND CLOSE < OPEN AND REF(CLOSE < OPEN, 1);

r