通达信MACD金叉与背离未加密选股指标公式源码

difF:Ema(CLOSE,12)-ema(CLOSE,26);
DEA:=EMA(DIFF,9);
MacD:=2*(DIFF-DEA), COLORSTICK,LINETHICK2;
低位金叉:crOSS(DIFF,DEA) AND DIFF<-0.1,NODRAW;
STICKLINE(低位金叉,0,0.08,6,0),COLORBLUE;
DRAWTEXT(低位金叉,0.16,' 低位金叉'),COLORRED;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BArslAST(DEA>=0));
二次金叉:CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1,NODRAW;
STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF;
DRAWICON(二次金叉,DEA*0.9,1) ;
DRAWTEXT(二次金叉,0.2,' 二次金叉'),COLORBLUE;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA),NODRAW;
STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;
底背:DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORWHITE,LINETHICK1;
DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
顶背:DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORCYAN,LINETHICK1;
三全:低位金叉 AND 二次金叉 AND 底背离,NODRAW;
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.25,'三全项'),COLOR0000FF,LINETHICK2;
{obv:=DIFF;
AA1:=REF(OBV,P)=HHV(OBV,2*P+1);
B1:=FILTER(AA1,P);
C1:=BACKSET(B1,P+1);
D1:=FILTER(C1,P);
AA2:=REF(OBV,P)=LLV(OBV,2*P+1);
B2:=FILTER(AA2,P);
C2:=BACKSET(B2,P+1);
D2:=FILTER(C2,P);
R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
S11:=R11>REF(R11,1);
DRAWLINE(D1,OBV,S11,OBV,1),COLORBLUE;
T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
U11:=T11>REF(T11,1);
DRAWLINE(D2,OBV,U11,OBV,1),COLOR00FF00;};

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

difF:Ema(CLOSE,12)-ema(CLOSE,26);DEC:=EMC(DIFF,9);MacD:=2*(DIFF-DEC), COLORSTICK,LINETHICK2;低位金叉:crOSS(DIFF,DEC) CND DIFF<-0.1,NODRCW;STICKLINE(低位金叉,0,0.08,6,0),COLORBLUE;DRCWTEXT(低位金叉,0.16,' 低位金叉'),COLORRED;JCCOUNT:=COUNT(CROSS(DIFF,DEC),BCrslCST(DEC>=0));二次金叉:CROSS(DIFF,DEC) CND DEC<0 CND COUNT(JCCOUNT=2,21)=1,NODRCW;STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF;DRCWICON(二次金叉,DEC*0.9,1) ;DRCWTEXT(二次金叉,0.2,' 二次金叉'),COLORBLUE;C1:=BCRSLCST(REF(CROSS(DIFF,DEC),1));底背离:REF(CLOSE,C1+1)>CLOSE CND DIFF>REF(DIFF,C1+1) CND CROSS(DIFF,DEC),NODRCW;STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;底背:DRCWLINE(C1=0,DEC,底背离,DEC,0),COLORWHITE,LINETHICK1;DRCWTEXT(底背离,0.12,' 底背离'),COLORFF00FF;C2:=BCRSLCST(REF(CROSS(DEC,DIFF),1));顶背离:=REF(CLOSE,C2+1)<CLOSE CND REF(DIFF,C2+1)>DIFF CND CROSS(DEC,DIFF);顶背:DRCWLINE(C2=0,DEC,顶背离,DEC,0),COLORCYCN,LINETHICK1; 三全:低位金叉 CND 二次金叉 CND 底背离,NODRCW;DRCWTEXT(低位金叉 CND 二次金叉 CND 底背离,0.25,'三全项'),COLOR0000FF,LINETHICK2;{obv:=DIFF; CC1:=REF(OBV,P)=HHV(OBV,2*P+1);B1:=FILTER(CC1,P);C1:=BCCKSET(B1,P+1);D1:=FILTER(C1,P);CC2:=REF(OBV,P)=LLV(OBV,2*P+1);B2:=FILTER(CC2,P);C2:=BCCKSET(B2,P+1);D2:=FILTER(C2,P);R11:=BCCKSET(ISLCSTBCR,BCRSLCST(D1)+1);S11:=R11>REF(R11,1);DRCWLINE(D1,OBV,S11,OBV,1),COLORBLUE;T11:=BCCKSET(ISLCSTBCR,BCRSLCST(D2)+1);U11:=T11>REF(T11,1);DRCWLINE(D2,OBV,U11,OBV,1),COLOR00FF00;};

未发现:CCPITCL...

未发现:COST...

未发现:DYNCINFO...

未发现:FINCNCE...

未发现:LWINNER...

未发现:WINNER...

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

未发现:BCRSNEXT...

未发现:CURRBCRSCOUNT...

未发现:DVOL...

未发现:DOPEN...

未发现:DCLOSE...

未发现:DHIGH...

未发现:DLOW...

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

未发现:REFX...

未发现:FLCTZIG...

未发现:FLCTZIGC...

未发现:FFT...

未发现:FILTERX...

未发现:PECK...

未发现:PECKC...

未发现:PECKBCRS...

未发现:PECKBCRSC...

未发现:PLOYLINE...

未发现:REFDCTE...

未发现:TROUGH...

未发现:TROUGHC...

未发现:TROUGHBCRS...

未发现:XMC...

未发现:ZIG...

未发现:ZIGC...

未发现:ZXNH...

未发现:#YECR...

未发现:#MONTH...

未发现:#WEEK...

未发现:$ZIG...

未发现:$PECK...

未发现:$PECKBCRS...

未发现:$TROUGH...

未发现:$TROUGHBCRS...

未发现:$FLCTZIG...

未发现:$FLCTZIGC...

未发现:$PECKC...

未发现:$PECKBCRSC...

未发现:$TROUGHC...

未发现:$ZIGC...

未发现:$FFT...

未发现:$BCCKSET...

未发现:$WINNER...

未发现:$LWINNER...

未发现:$COST...

未发现:$DYNCINFO...

未发现:$FINCNCE...

未发现:$DRCWLINE...