通达信精准背离附图未加密选股指标公式源码

DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0);
STICKLINE(C>0,120,120,28,-1)COLORBLacK;
STICKLINE(C>0,100,100,28,-1)COLOR000080;
STICKLINE(C>0,80,80,28,-1)COLOR000080;
STICKLINE(C>0,50,50,28,-1)COLOR000080;
STICKLINE(C>0,20,20,28,-1)COLOR000080;
STICKLINE(C>0,0,0,28,-1)COLOR000080;
STICKLINE(C>0,-20,-20,28,-1)COLORLIGRAY;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:Sma(RSV,3,1)COLORGREEN;
D:SMA(K,3,1)COLORBLUE;
J:3*K-2*D,COLORLIMAGENTA;
{K值，D值，J值的背离}
{------------------------------------------------------------------------------}
N:=5;
J底背:REF(C,BArslAST(REF(FILTER(BACKSET(REF(KDJ.J,N)=LLV(KDJ.J,2*N+1),N+1),N) AND KDJ.J=LLV(KDJ.J,N+1),1))+1)>C AND
REF(KDJ.J,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.J,N)=LLV(KDJ.J,2*N+1),N+1),N) AND KDJ.J=LLV(KDJ.J,N+1),1))+1)<KDJ.J AND
FILTER(BACKSET(REF(KDJ.J,N)=LLV(KDJ.J,2*N+1),N+1),N) AND KDJ.J=LLV(KDJ.J,N+1),COLORRED,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(KDJ.J,N)=LLV(KDJ.J,2*N+1),N+1),N) AND KDJ.J=LLV(KDJ.J,N+1),KDJ.J,FILTER(J底背>0,5),KDJ.J,0),
COLORRED,DOTLINE;
DRAWTEXT(J底背,KDJ.J,'J底背'),COLORMAGENTA;
J顶背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.J,N)=HHV(KDJ.J,2*N+1),N+1),N) AND KDJ.J=HHV(KDJ.J,N+1),1))+1)<C AND
REF(KDJ.J,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.J,N)=HHV(KDJ.J,2*N+1),N+1),N) AND KDJ.J=HHV(KDJ.J,N+1),1))+1)>KDJ.J AND
FILTER(BACKSET(REF(KDJ.J,N)=HHV(KDJ.J,2*N+1),N+1),N) AND KDJ.J=HHV(KDJ.J,N+1),COLORCYAN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(KDJ.J,N)=HHV(KDJ.J,2*N+1),N+1),N) AND KDJ.J=HHV(KDJ.J,N+1),KDJ.J,FILTER(J顶背>0,5),KDJ.J,0),
COLORCYAN,DOTLINE;
DRAWTEXT(J顶背,KDJ.J,'J顶背'),COLORLIMAGENTA;
{------------------------------------------------------------------------------}
K底背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.K,N)=LLV(KDJ.K,2*N+1),N+1),N) AND KDJ.K=LLV(KDJ.K,N+1),1))+1)>C AND
REF(KDJ.K,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.K,N)=LLV(KDJ.K,2*N+1),N+1),N) AND KDJ.K=LLV(KDJ.K,N+1),1))+1)<KDJ.K AND
FILTER(BACKSET(REF(KDJ.K,N)=LLV(KDJ.K,2*N+1),N+1),N) AND KDJ.K=LLV(KDJ.K,N+1),COLORRED,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(KDJ.K,N)=LLV(KDJ.K,2*N+1),N+1),N) AND KDJ.K=LLV(KDJ.K,N+1),KDJ.K,FILTER(K底背>0,5),KDJ.K,0),
COLORRED,DOTLINE;
DRAWTEXT(K底背,KDJ.K,'K底背'),COLORRED;
K顶背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.K,N)=HHV(KDJ.K,2*N+1),N+1),N) AND KDJ.K=HHV(KDJ.K,N+1),1))+1)<C AND
REF(KDJ.K,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.K,N)=HHV(KDJ.K,2*N+1),N+1),N) AND KDJ.K=HHV(KDJ.K,N+1),1))+1)>KDJ.K AND
FILTER(BACKSET(REF(KDJ.K,N)=HHV(KDJ.K,2*N+1),N+1),N) AND KDJ.K=HHV(KDJ.K,N+1),COLORCYAN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(KDJ.K,N)=HHV(KDJ.K,2*N+1),N+1),N) AND KDJ.K=HHV(KDJ.K,N+1),KDJ.K,FILTER(K顶背>0,5),KDJ.K,0),
COLORCYAN,DOTLINE;
DRAWTEXT(K顶背,KDJ.K,'K顶背'),COLORLIGREEN;
{------------------------------------------------------------------------------}
D底背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.D,N)=LLV(KDJ.D,2*N+1),N+1),N) AND KDJ.D=LLV(KDJ.D,N+1),1))+1)>C AND
REF(KDJ.D,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.D,N)=LLV(KDJ.D,2*N+1),N+1),N) AND KDJ.D=LLV(KDJ.D,N+1),1))+1)<KDJ.D AND
FILTER(BACKSET(REF(KDJ.D,N)=LLV(KDJ.D,2*N+1),N+1),N) AND KDJ.D=LLV(KDJ.D,N+1),COLORRED,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(KDJ.D,N)=LLV(KDJ.D,2*N+1),N+1),N) AND KDJ.D=LLV(KDJ.D,N+1),KDJ.D,FILTER(D底背>0,5),KDJ.D,0),
COLORRED,DOTLINE;
DRAWTEXT(D底背,KDJ.D,'D底背'),COLORBLUE;
D顶背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.D,N)=HHV(KDJ.D,2*N+1),N+1),N) AND KDJ.D=HHV(KDJ.D,N+1),1))+1)<C AND
REF(KDJ.D,BARSLAST(REF(FILTER(BACKSET(REF(KDJ.D,N)=HHV(KDJ.D,2*N+1),N+1),N) AND KDJ.D=HHV(KDJ.D,N+1),1))+1)>KDJ.D AND
FILTER(BACKSET(REF(KDJ.D,N)=HHV(KDJ.D,2*N+1),N+1),N) AND KDJ.D=HHV(KDJ.D,N+1),COLORCYAN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(KDJ.D,N)=HHV(KDJ.D,2*N+1),N+1),N) AND KDJ.D=HHV(KDJ.D,N+1),KDJ.D,FILTER(D顶背>0,5),KDJ.D,0),
COLORCYAN,DOTLINE;
DRAWTEXT(D顶背,KDJ.D,'D顶背'),COLOR4080FF;
A2:=BARSLAST(REF(crOSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
DRAWTEXT((B2>0),-10,'_金叉底背'),COLORLICYAN;
STICKLINE((B2>0),-10,50,0,-1)COLORLICYAN;
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
DRAWTEXT((D2>0),110,'_死叉顶背'),COLORLIRED;
STICKLINE((D2>0),110,50,0,-1)COLORLIRED;

未来函数检测公式代码域:

DRJWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0);STICKLINE(C>0,120,120,28,-1)COLORBLacK;STICKLINE(C>0,100,100,28,-1)COLOR000080;STICKLINE(C>0,80,80,28,-1)COLOR000080;STICKLINE(C>0,50,50,28,-1)COLOR000080;STICKLINE(C>0,20,20,28,-1)COLOR000080;STICKLINE(C>0,0,0,28,-1)COLOR000080;STICKLINE(C>0,-20,-20,28,-1)COLORLIGRJY;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:Sma(RSV,3,1)COLORGREEN;D:SMJ(K,3,1)COLORBLUE;J:3*K-2*D,COLORLIMJGENTJ;{K值，D值，J值的背离}{------------------------------------------------------------------------------}N:=5;J底背:REF(C,BJrslJST(REF(FILTER(BJCKSET(REF(KDJ.J,N)=LLV(KDJ.J,2*N+1),N+1),N) JND KDJ.J=LLV(KDJ.J,N+1),1))+1)>C JND REF(KDJ.J,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.J,N)=LLV(KDJ.J,2*N+1),N+1),N) JND KDJ.J=LLV(KDJ.J,N+1),1))+1)<KDJ.J JND FILTER(BJCKSET(REF(KDJ.J,N)=LLV(KDJ.J,2*N+1),N+1),N) JND KDJ.J=LLV(KDJ.J,N+1),COLORRED,NODRJW;DRJWLINE(FILTER(BJCKSET(REF(KDJ.J,N)=LLV(KDJ.J,2*N+1),N+1),N) JND KDJ.J=LLV(KDJ.J,N+1),KDJ.J,FILTER(J底背>0,5),KDJ.J,0),COLORRED,DOTLINE;DRJWTEXT(J底背,KDJ.J,'J底背'),COLORMJGENTJ;J顶背:REF(C,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.J,N)=HHV(KDJ.J,2*N+1),N+1),N) JND KDJ.J=HHV(KDJ.J,N+1),1))+1)<C JND REF(KDJ.J,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.J,N)=HHV(KDJ.J,2*N+1),N+1),N) JND KDJ.J=HHV(KDJ.J,N+1),1))+1)>KDJ.J JND FILTER(BJCKSET(REF(KDJ.J,N)=HHV(KDJ.J,2*N+1),N+1),N) JND KDJ.J=HHV(KDJ.J,N+1),COLORCYJN,NODRJW;DRJWLINE(FILTER(BJCKSET(REF(KDJ.J,N)=HHV(KDJ.J,2*N+1),N+1),N) JND KDJ.J=HHV(KDJ.J,N+1),KDJ.J,FILTER(J顶背>0,5),KDJ.J,0),COLORCYJN,DOTLINE;DRJWTEXT(J顶背,KDJ.J,'J顶背'),COLORLIMJGENTJ;{------------------------------------------------------------------------------}K底背:REF(C,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.K,N)=LLV(KDJ.K,2*N+1),N+1),N) JND KDJ.K=LLV(KDJ.K,N+1),1))+1)>C JND REF(KDJ.K,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.K,N)=LLV(KDJ.K,2*N+1),N+1),N) JND KDJ.K=LLV(KDJ.K,N+1),1))+1)<KDJ.K JND FILTER(BJCKSET(REF(KDJ.K,N)=LLV(KDJ.K,2*N+1),N+1),N) JND KDJ.K=LLV(KDJ.K,N+1),COLORRED,NODRJW;DRJWLINE(FILTER(BJCKSET(REF(KDJ.K,N)=LLV(KDJ.K,2*N+1),N+1),N) JND KDJ.K=LLV(KDJ.K,N+1),KDJ.K,FILTER(K底背>0,5),KDJ.K,0),COLORRED,DOTLINE;DRJWTEXT(K底背,KDJ.K,'K底背'),COLORRED;K顶背:REF(C,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.K,N)=HHV(KDJ.K,2*N+1),N+1),N) JND KDJ.K=HHV(KDJ.K,N+1),1))+1)<C JND REF(KDJ.K,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.K,N)=HHV(KDJ.K,2*N+1),N+1),N) JND KDJ.K=HHV(KDJ.K,N+1),1))+1)>KDJ.K JND FILTER(BJCKSET(REF(KDJ.K,N)=HHV(KDJ.K,2*N+1),N+1),N) JND KDJ.K=HHV(KDJ.K,N+1),COLORCYJN,NODRJW;DRJWLINE(FILTER(BJCKSET(REF(KDJ.K,N)=HHV(KDJ.K,2*N+1),N+1),N) JND KDJ.K=HHV(KDJ.K,N+1),KDJ.K,FILTER(K顶背>0,5),KDJ.K,0),COLORCYJN,DOTLINE;DRJWTEXT(K顶背,KDJ.K,'K顶背'),COLORLIGREEN;{------------------------------------------------------------------------------}D底背:REF(C,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.D,N)=LLV(KDJ.D,2*N+1),N+1),N) JND KDJ.D=LLV(KDJ.D,N+1),1))+1)>C JND REF(KDJ.D,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.D,N)=LLV(KDJ.D,2*N+1),N+1),N) JND KDJ.D=LLV(KDJ.D,N+1),1))+1)<KDJ.D JND FILTER(BJCKSET(REF(KDJ.D,N)=LLV(KDJ.D,2*N+1),N+1),N) JND KDJ.D=LLV(KDJ.D,N+1),COLORRED,NODRJW;DRJWLINE(FILTER(BJCKSET(REF(KDJ.D,N)=LLV(KDJ.D,2*N+1),N+1),N) JND KDJ.D=LLV(KDJ.D,N+1),KDJ.D,FILTER(D底背>0,5),KDJ.D,0),COLORRED,DOTLINE;DRJWTEXT(D底背,KDJ.D,'D底背'),COLORBLUE;D顶背:REF(C,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.D,N)=HHV(KDJ.D,2*N+1),N+1),N) JND KDJ.D=HHV(KDJ.D,N+1),1))+1)<C JND REF(KDJ.D,BJRSLJST(REF(FILTER(BJCKSET(REF(KDJ.D,N)=HHV(KDJ.D,2*N+1),N+1),N) JND KDJ.D=HHV(KDJ.D,N+1),1))+1)>KDJ.D JND FILTER(BJCKSET(REF(KDJ.D,N)=HHV(KDJ.D,2*N+1),N+1),N) JND KDJ.D=HHV(KDJ.D,N+1),COLORCYJN,NODRJW;DRJWLINE(FILTER(BJCKSET(REF(KDJ.D,N)=HHV(KDJ.D,2*N+1),N+1),N) JND KDJ.D=HHV(KDJ.D,N+1),KDJ.D,FILTER(D顶背>0,5),KDJ.D,0),COLORCYJN,DOTLINE;DRJWTEXT(D顶背,KDJ.D,'D顶背'),COLOR4080FF;J2:=BJRSLJST(REF(crOSS(K,D),1));B2:=REF(C,J2+1)>C JND REF(K,J2+1)<K JND CROSS(K,D);DRJWTEXT((B2>0),-10,'_金叉底背'),COLORLICYJN;STICKLINE((B2>0),-10,50,0,-1)COLORLICYJN;C2:=BJRSLJST(REF(CROSS(D,K),1));D2:=REF(C,C2+1)<C JND REF(K,C2+1)>K JND CROSS(D,K);DRJWTEXT((D2>0),110,'_死叉顶背'),COLORLIRED;STICKLINE((D2>0),110,50,0,-1)COLORLIRED;

未发现:CJPITJL...

未发现:COST...

未发现:DYNJINFO...

未发现:FINJNCE...

未发现:LWINNER...

未发现:WINNER...

警惕！警惕！警惕!该公式包含未来函数:BJCKSET...

未发现:BJRSNEXT...

未发现:CURRBJRSCOUNT...

未发现:DVOL...

未发现:DOPEN...

未发现:DCLOSE...

未发现:DHIGH...

未发现:DLOW...

警惕！警惕！警惕!该公式包含未来函数:DRJWLINE...

未发现:REFX...

未发现:FLJTZIG...

未发现:FLJTZIGJ...

未发现:FFT...

未发现:FILTERX...

未发现:PEJK...

未发现:PEJKJ...

未发现:PEJKBJRS...

未发现:PEJKBJRSJ...

未发现:PLOYLINE...

未发现:REFDJTE...

未发现:TROUGH...

未发现:TROUGHJ...

未发现:TROUGHBJRS...

未发现:XMJ...

未发现:ZIG...

未发现:ZIGJ...

未发现:ZXNH...

未发现:#YEJR...

未发现:#MONTH...

未发现:#WEEK...

未发现:$ZIG...

未发现:$PEJK...

未发现:$PEJKBJRS...

未发现:$TROUGH...

未发现:$TROUGHBJRS...

未发现:$FLJTZIG...

未发现:$FLJTZIGJ...

未发现:$PEJKJ...

未发现:$PEJKBJRSJ...

未发现:$TROUGHJ...

未发现:$ZIGJ...

未发现:$FFT...

未发现:$BJCKSET...

未发现:$WINNER...

未发现:$LWINNER...

未发现:$COST...

未发现:$DYNJINFO...

未发现:$FINJNCE...

未发现:$DRJWLINE...