控盤騙線拐點指標公式源碼:
?
?
cxh1:= EMA(EMA(C,13),13);
?
控盤指數: (cxh1-REF(cxh1,1))/REF(cxh1,1)*1000,POINTDOT,COLORFFCCCC;
STICKLINE(控盤指數<0,控盤指數,0,2,0),colorgray;
無莊控盤: 控盤指數<0,LINETHICK0,colorgray;
STICKLINE(控盤指數>REF(控盤指數,1) AND 控盤指數>0 AND 控盤指數<3,控盤指數,0,2,1),colorred;
STICKLINE(控盤指數>REF(控盤指數,1) AND 控盤指數>0 AND 控盤指數>3,控盤指數,0,2,1),colorred;
STICKLINE(控盤指數>REF(控盤指數,1) AND 控盤指數>3,控盤指數,3,4,1),COLORFF00FF;
主力控盤: 控盤指數>REF(控盤指數,1) AND 控盤指數>0,LINETHICK0,colorred;
STICKLINE(控盤指數<REF(控盤指數,1) AND 控盤指數>0,控盤指數,0,2,0),COLOR00FF00;
控盤減弱: 控盤指數<REF(控盤指數,1) AND 控盤指數>0,LINETHICK0,COLOR00FF00;
cxhA:= EMA(0.667*REF(控盤指數,1)+0.333*控盤指數,2);
STICKLINE(控盤指數>cxhA,控盤指數,cxhA,2,0),colorred;
B2:= 控盤指數>cxhA;
準備: B2>REF(B2,1) AND 控盤指數<(-2),coloryellow;
DRAWTEXT(準備,3,'準備'),coloryellow;
B1:= (控盤指數>REF(控盤指數,1) AND 控盤指數>0)=1;
開始控盤: B1>REF(B1,1),colormagenta,LINETHICK3;
A:=(3*C+LOW+OPEN+H)/6;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210;
MTM:=C-REF(CLOSE,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
CB:=EMA(X,13);
買:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
DRAWICON(FILTER(買=1,5),L*0.11,1);
DIFF:(EMA(C,12) - EMA(C,26))*20,colorwhite,LINETHICK1;
DEA:EMA(DIFF,9),coloryellow,LINETHICK1;
MACD:2*(DIFF-DEA), COLORSTICK;
MACD1:=2*(DIFF-DEA),colorred,NODRAW;
MACD2:=EMA(MACD1,3),colorcyan,NODRAW;
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2,0),colorred;
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2,0),coloryellow;
STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLORGREEN;//http://www.kzuj.com.cn
S1:=MACD<0;
S2:= (MACD>=0);
S3:=BARSLAST(CROSS(DIFF,DEA));
S4:=REF(S3,S3+1);
S5:=DEA>REF(DEA,S4);
S6:=DEA;
上成立:=CROSS(DIFF,DEA) AND S5;
下成立:=CROSS(DIFF,DEA) AND S6;
L1:=(EMA(C,3) - EMA(C,13));
L2:=EMA(L1,9);
L3:=BARSLAST(CROSS(L1,L2));
L4:=REF(L3,L3+1);
L5:=L2;
變盤:CROSS(L1,L2) AND L5,NODRAW,COLORD6FF9C;
STICKLINE(變盤,5,0,0,1),COLORD6FF9C;
LS:=IF(DIFF>DEA AND DIFF>0,1,0);
加速上揚:IF(REF(LS=0,1) AND LS=1,0.1,0);
XG1:CROSS(MACD1,MACD2) AND MACD1<0,NODRAW;
XG2:CROSS(DIFF,DEA),NODRAW;
M1:=MACD>REF(MACD,1) AND DIFF<DEA;
綠柱短了:M1 AND COUNT(M1,10)=1 AND C>MA(CLOSE,55) AND COUNT(MACD<0,5)>=5,NODRAW;
DRAWTEXT(綠柱短了,MACD,'買點來了');
DIFL:=EMA(VOL,12)-EMA(VOL,26);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
BL:=DIFL>REF(DIFL,1) AND DIF<REF(DIF,1);
四天: REF(BL,3)=1 AND REF(BL,2)=1 AND REF(BL,1)=1 AND BL;
三天:REF(BL,2)=1 AND REF(BL,1)=1 AND BL;
{VERTLINE(上成立,3),coloryellow;
VERTLINE(下成立,3),colorred;}
IF(DIFF>DEA,DIFF,DRAWNULL),COLORFF11CC,LINETHICK1;
IF(DIFF>DEA AND DIFF<0,DIFF,DRAWNULL),colorred,LINETHICK1;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);//www.kzuj.com.cn
DRAWTEXT(FILTER(D>80,6),H*1.018,'D>80');
DRAWTEXT(FILTER(CROSS(K,D) AND D<26,6),H*0.95,'KD低位金叉'),COLORFFCCCC;
STICKLINE(FILTER(CROSS(K,D) AND D<26,6),H*0.97,H*0.95,4,0),COLORFFCCCC;
DIFFF:=EMA(C,12) - EMA(C,26);
DEAF :=EMA(DIFFF,9);
MACDD:=2*(DIFFF-DEAF);
DRAWTEXT(FILTER(CROSS(DIFFF,DEAF) AND DEAF<0,6),L-0.02,'MACD低位金叉'),colorred;
STICKLINE(FILTER(CROSS(DIFFF,DEAF) AND DEAF<0,6),L-0.02,L-0.1,4,0),COLOR00FF00;
DRAWTEXT(FILTER(CROSS(DIFFF,DEAF) AND DEAF>0,13),H+0.25,'MACD下拐點'),coloryellow;
STICKLINE(FILTER(CROSS(DIFFF,DEAF) AND DEAF>0,13),H+0.02,H+0.12,4,0),colorblue;
DRAWTEXT(FILTER(CROSS(MACDD,0),13),L*0.65,'MACD上拐點'),colorred;
STICKLINE(FILTER(CROSS(MACDD,0),13),L*0.97,L*0.95,4,0),colorwhite;
ROC:=(C-REF(C,21))/REF(C,21)*100;
DRAWTEXT(FILTER(CROSS(ROC,0),6),L-2.25,'騙線拐點'),colorwhite;
STICKLINE(FILTER(CROSS(ROC,0),6),L-0.02,L-0.15,4,0),COLORFF00FF;
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?
打印本文
關閉窗口