通达信三指底顶背离公式副图源码

以下是通达信三指底顶背离公式副图源码

三指底顶背离

三公式分别是 MACD、KDJ和RSI

背离包含有：底背离和顶背离

本人感觉不错，源码分享。

SQX:=(C-MA(CLOSE,13))*100;

DIF:=EMA(MA(SQX,7),1);

DEA:=EMA(DIF,7);

MACD:=(DIF-DEA)*2;

STICKLINE(MACD>0 AND MACD>REF(MACD,1),MACD,0,0.1,0),COLORRED;

STICKLINE(MACD>0 AND MACD<REF(MACD,1),MACD,0,0.1,0),COLOR00FFFF;

STICKLINE(MACD<0 AND MACD<REF(MACD,1),MACD,0,0.1,0),COLORFFFF00;

STICKLINE(MACD<0 AND MACD>REF(MACD,1),MACD,0,0.1,0),COLORFF00FF;

RSV:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*247.2-123.6;

K:SMA(SMA( RSV,3,1),3,1),COLORWHITE;

D:MA(EMA(K,3),3),COLORYELLOW;

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

A11:=BARSLAST(REF(CROSS(DIF,DEA),1));

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

A12:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));

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

A13:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));

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

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

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

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

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

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

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

MACD底背:IF(B1>0,50,0),LINETHICK2,COLORRED;

KDJ底背:IF(B2>0,65,0),LINETHICK2,COLORFF00FF;

RSI底背:IF(B3>0,80,0),LINETHICK2,COLORYELLOW;

MACD顶背:IF(D1>0,-50,0),LINETHICK2,COLORFF00FF;

KDJ顶背:IF(D2>0,-65,0),LINETHICK2,COLORFFCC66;

RSI顶背:IF(D3>0,-80,0),LINETHICK2,COLORWHITE;

DRAWICON((CROSS(K,D) AND K<0 ),K,1);

DRAWICON((CROSS(D,K) AND K>0 ),D,2);

DRAWICON(J<(REF(J,1))AND K>(REF(K,1)) AND D>(REF(D,1) AND J>0),REF(J,1),8);

DRAWICON(J>(REF(J,1)) AND K<(REF(K,1)) AND D<(REF(D,1) AND J<0),REF(J,1),7);