皮皮网

1.ͬ?同花?˳????Դ??

ͬ??˳????Դ??

       KDJ、MACD金叉共振（两合一指标 附带选股）

       DIF:(EMA(CLOSE,顺背518源码网)-EMA(CLOSE,))*;

       DEA:EMA(DIF,9);

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

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

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

       IF(DIF<DEA,DIF,DRAWNULL),COLORGREEN;

       DD:=C=HHV(C,);

       EE:=DEA< ref(DEA,1) AND ref(DEA< ref(DEA,1),1)=1;

       CC:=C> ref(C,1) AND ref(C> ref(C,1),1)=1;

       顶背离:=(DD AND EE AND DEA< HHV(DEA,))*DEA;

       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),COLORRED,LINETHICK2;

       RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*;

       K:SMA(RSV,9,3),COLORYELLOW;

       D:SMA(K,9,3),COLORWHITE;

       J:3*K-2*D,COLORMAGENTA;

       IF(J<D,J,DRAWNULL),COLORFFEE;

       0,COLORRED,LINETHICK2;,COLORLIMAGENTA;{ ,COLORWHITE;}

       ,COLORBLUE;,COLORGREEN,LINETHICK2;

       DRAWTEXT(ISLASTBAR,0,'高安全区'),COLORRED;

       DRAWTEXT(ISLASTBAR,,'安 全 区'),COLORLIMAGENTA;

       DRAWTEXT(ISLASTBAR,,'风 险 区'),COLORBLUE;

       DRAWTEXT(ISLASTBAR,,'高风险区'),COLORGREEN;

       A1:=BARSLAST(ref(CROSS(DIF,DEA),1));{ 本文 来源：小牛网www____com }

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

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

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

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

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

       DRAWTEXT(B1,DEA-0.,'▲MACD底背'),COLORWHITE;

       DRAWTEXT(B2,D-0.,'●KDJ底背'),COLORFFFF;

       { DJ:=CROSS(J,D) AND D<;

       DRAWTEXT(DJ,J-0.3,'低金叉'),COLORCYAN;

       MDJ:=CROSS(DIF,DEA) AND DEA<0;

       DRAWTEXT(MDJ,DEA-0.3,'低金叉'),COLORGREEN;

       DRAWTEXT(CROSS(DEA,DIF),DIF+0.3,'死叉'),COLORYELLOW;

       DRAWTEXT(CROSS(D,J),J+0.3,'死叉'),COLORRED;}

       A:=CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(J,D);

       DRAWICON(A,LOW*0.,1);

       B4:CROSS(DIF,DEA) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));

       DRAWTEXT(B4,L-0.,'★金叉共振'),COLORFF;

       DRAWICON(CROSS(K,D),D,1);

       DRAWICON(CROSS(D,K),D,2);

       BA:=DEA>ref(DEA,1);

       BB:=SUM(BA,5)>=4;

       BC:=C<O;

       BD:=SUM(BC,5)>=2;

       BXG:FILTER(BB AND BD AND J>ref(J,1) AND ref(J,1)<ref(J,2),3);

       STICKLINE(BXG,HHV(J,),HHV(J,)-,1,0),COLORRED;

       SS:=EMA(C,);

       LL:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,5))/4;

       { 短:EMA(LL,2),COLORGREEN,LINETHICK2;}

       { 长:EMA(SS,2),COLORMAGENTA,LINETHICK2;}

       AA:=(C-LLV(C,))/(HHV(C,)-LLV(C,));

       (CROSS(AA,0.)-1);

       选股公式

       DIF:=(EMA(CLOSE,)-EMA(CLOSE,))*;

       DEA:=EMA(DIF,9);

       RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*;

       K:=SMA(RSV,9,1);

       D:=SMA(K,9,1);

       B4:CROSS(DIF,DEA) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));