通達信實用背離指標公式

1、通達信實用背離指標公式來源：Internet，編輯：股旁網(wǎng)，2017-01-11MACD背離DIFF:EMA(CLOSE,12) - EMA(CLOSE,26);DEA:EMA(DIFF,9);MACD:2*(DIFF-DEA), COLORSTICK,DRAWABOVE;MACD金叉:=BARSLAST(REF(CROSS(DIFF,DEA),1);MACD死叉:=BARSLAST(REF(CROSS(DEA,DIFF),1);MACD上次金叉:=SUMBARS(REF(CROSS(DIFF,DEA),1),2);MACD上次死叉:=SUMBARS(REF(CROSS(DEA,DIFF),1

2、),2);MACD底背離MACD次低點:=LLV(DIFF,MACD金叉);MACD最低點:=LLV(DIFF,MACD上次死叉);MACD底背離:=REF(CLOSE,MACD金叉+1)>CLOSE AND MACD次低點>MACD最低點 AND CROSS(DIFF,DEA);DRAWLINE(MACD金叉=0,DEA,MACD底背離,DEA,0),COLORRED,LINETHICK2;MACD頂背離MACD次高點:=HHV(DIFF,MACD金叉);MACD最高點:=HHV(DIFF,MACD上次金叉);MACD頂背離:=REF(CLOSE,MACD死叉+1)<CLO

3、SE AND MACD次高點<MACD最高點 AND CROSS(DEA,DIFF);DRAWLINE(MACD死叉=0,DEA,MACD頂背離,DEA,0),COLORGREEN,LINETHICK2;紅面積:SUM(MACD,BARSLAST(MACD<0)*(MACD>0),COLOR0000FF,NODRAW;綠面積:SUM(MACD,BARSLAST(MACD>0)*(MACD<0),COLORFFFF00,NODRAW;AA:=ROUND(REF(綠面積,1)*100);BB:=ROUND(REF(紅面積,1)*100);DRAWNUMBER(CROS

4、S(0,MACD),0.04,ABS(BB),COLORMAGENTA;DRAWNUMBER(CROSS(MACD,0),-0.01,ABS(AA),COLORGREEN;CCITYP:=(HIGH+LOW+CLOSE)/3;CCI:=(TYP-MA(TYP,14)/(0.015*AVEDEV(TYP,14);BOLLBOLL:=MA(CLOSE,20);UB:=BOLL+2*STD(CLOSE,20);LB:=BOLL-2*STD(CLOSE,20);KDJRSV:=(CLOSE-LLV(LOW,9)/(HHV(HIGH,9)-LLV(LOW,9)*100;K:=SMA(RSV,3,1);D

5、:=SMA(K,3,1);J:=3*K-2*D;PP:=CCI<-160 AND CLOSE<LB AND J<20;QQ:=CCI>160 AND J>100;KDJ中J值在0-90間為黃色，小于0為綠色，大于90為紅色顯示J值和CCI值CCI值小于160且收盤價在BOLL下軌一下，J值小于20為紅色箭頭，CCI大于160且J值大于100為綠色箭頭DRAWICON(QQ,0,2);DRAWICON(PP,0,1);KDJ金叉:=BARSLAST(REF(CROSS(J,D),1);KDJ死叉:=BARSLAST(REF(CROSS(D,J),1);KDJ上次金叉

6、:=SUMBARS(REF(CROSS(J,D),1),2);KDJ上次死叉:=SUMBARS(REF(CROSS(D,J),1),2);KDJ底背離AAA1:=BARSLAST(REF(CROSS(J,D),1);KDJ次低點:=LLV(J,AAA1);KDJ最低點:=LLV(J,KDJ上次死叉);KDJ底背離:=REF(CLOSE,AAA1+1)>CLOSE AND KDJ次低點>KDJ最低點 AND CROSS(J,D);DRAWTEXT(KDJ底背離,MACD,'KDJ底'),COLORRED;STICKLINE(KDJ底背離,MACD,0,2,0),COL

7、ORRED;KDJ頂背離BBB1:=BARSLAST(REF(CROSS(D,J),1);KDJ次高點:=HHV(J,AAA1);KDJ最高點:=HHV(J,KDJ上次金叉);KDJ頂背離:=REF(CLOSE,BBB1+1)<CLOSE AND KDJ次高點<KDJ最高點 AND CROSS(D,J);DRAWTEXT(KDJ頂背離,MACD,'KDJ頂'),COLORGREEN;STICKLINE(KDJ頂背離,MACD,0,2,0),COLORGREEN;九轉(zhuǎn)A1:=C>=REF(C,4);A2:=C<REF(C,4);A3:=C<REF(C

8、,4) AND REF(A1,1);T:=BARSLAST(A3),NODRAW;M0:=(T=0 AND REFX(T=1 AND NOT(A2),1) OR (REFX(T=2 AND NOT(A2),2) OR (REFX(T=3 AND NOT(A2),3) OR (REFX(T=4 AND NOT(A2),4) OR (REFX(T=5 AND NOT(A2),5) OR (REFX(T=6 AND NOT(A2),6) OR (REFX(T=7 AND NOT(A2),7) OR (REFX(T=8 AND NOT(A2),8);M1:=T=1 AND REFX(T=2 AND N

9、OT(A2),1) OR (REFX(T=3 AND NOT(A2),2) OR (REFX(T=4 AND NOT(A2),3) OR (REFX(T=5 AND NOT(A2),4) OR (REFX(T=6 AND NOT(A2),5) OR (REFX(T=7 AND NOT(A2),6) OR (REFX(T=8 AND NOT(A2),7);M2:=T=2 AND REFX(T=3 AND NOT(A2),1) OR (REFX(T=4 AND NOT(A2),2) OR (REFX(T=5 AND NOT(A2),3) OR (REFX(T=6 AND NOT(A2),4) OR

10、 (REFX(T=7 AND NOT(A2),5) OR (REFX(T=8 AND NOT(A2),6);M3:=T=3 AND REFX(T=4 AND NOT(A2),1)OR (REFX(T=5 AND NOT(A2),2) OR (REFX(T=6 AND NOT(A2),3) OR (REFX(T=7 AND NOT(A2),4) OR (REFX(T=8 AND NOT(A2),5);M4:=T=4 AND REFX(T=5 AND NOT(A2),1) OR (REFX(T=6 AND NOT(A2),2) OR (REFX(T=7 AND NOT(A2),3) OR (REF

11、X(T=8 AND NOT(A2),4);M5:=T=5 AND REFX(T=6 AND NOT(A2),1) OR (REFX(T=7 AND NOT(A2),2) OR (REFX(T=8 AND NOT(A2),3);M6:=T=6 AND REFX(T=7 AND NOT(A2),1) OR (REFX(T=8 AND NOT(A2),2);M7:=T=7 AND REFX(T=8 AND NOT(A2),1);N0:=T=1 AND REF(T=0 AND A3,1) AND A2;N1:=T=2 AND REF(N0,1) AND A2;N2:=T=3 AND REF(N1,1)

12、 AND A2;N3:=T=4 AND REF(N2,1) AND A2;N4:=T=5 AND REF(N3,1) AND A2;N5:=T=6 AND REF(N4,1) AND A2;N6:=T=7 AND REF(N5,1) AND A2;N7:=T=8 AND REF(N6,1) AND A2;WZD:=DEA;WZG:=DEA;DRAWTEXT(N6 AND NOT(M7),WZD,'8'),COLORGREEN;DRAWTEXT(N7,WZG,'9'),COLORMAGENTA;B1:=C<=REF(C,4);B2:=C>REF(C,4

13、);B3:=C>REF(C,4) AND REF(B1,1);T1:=BARSLAST(B3),NODRAW;M8:=(T1=0 AND REFX(T1=1 AND NOT(B2),1) OR (REFX(T1=2 AND NOT(B2),2) OR (REFX(T1=3 AND NOT(B2),3) OR (REFX(T1=4 AND NOT(B2),4) OR (REFX(T1=5 AND NOT(B2),5) OR (REFX(T1=6 AND NOT(B2),6) OR (REFX(T1=7 AND NOT(B2),7) OR (REFX(T1=8 AND NOT(B2),8);

14、M9:=T1=1 AND REFX(T1=2 AND NOT(B2),1) OR (REFX(T1=3 AND NOT(B2),2) OR (REFX(T1=4 AND NOT(B2),3) OR (REFX(T1=5 AND NOT(B2),4) OR (REFX(T1=6 AND NOT(B2),5) OR (REFX(T1=7 AND NOT(B2),6) OR (REFX(T1=8 AND NOT(B2),7);M10:=T1=2 AND REFX(T1=3 AND NOT(B2),1) OR (REFX(T1=4 AND NOT(B2),2) OR (REFX(T1=5 AND NO

15、T(B2),3) OR (REFX(T1=6 AND NOT(B2),4) OR (REFX(T1=7 AND NOT(B2),5) OR (REFX(T1=8 AND NOT(B2),6);M11:=T1=3 AND REFX(T1=4 AND NOT(B2),1)OR (REFX(T1=5 AND NOT(B2),2) OR (REFX(T1=6 AND NOT(B2),3) OR (REFX(T1=7 AND NOT(B2),4) OR (REFX(T1=8 AND NOT(B2),5);M12:=T1=4 AND REFX(T1=5 AND NOT(B2),1) OR (REFX(T1

16、=6 AND NOT(B2),2) OR (REFX(T1=7 AND NOT(B2),3) OR (REFX(T1=8 AND NOT(B2),4);M13:=T1=5 AND REFX(T1=6 AND NOT(B2),1) OR (REFX(T1=7 AND NOT(B2),2) OR (REFX(T1=8 AND NOT(B2),3);M14:=T1=6 AND REFX(T1=7 AND NOT(B2),1) OR (REFX(T1=8 AND NOT(B2),2);M15:=T1=7 AND REFX(T1=8 AND NOT(B2),1);N8:=T1=1 AND REF(T1=0 AND B3,1) AND B2;N9:=T1=2 AND REF(N8,1) AND B2;N10:=T1=3 AND REF(N9,1) AND B2;N11:=T