通达信指标公式源码概况:
指标类别: 通达信指标公式
授权方式: 免费版
指标评级: ★★★★★
指标分类: 策略
画线方法: 副图
一、通达信指标公式
主力控盘
N:=35;M:=35;N1:=3;
B1:=(HHV(H,N)-C)/(HHV(H,N)-LLV(LOW,N))*100-M;
B2:=SMA(B1,N,1)+100;
B3:=(C-LLV(L,N))/(HHV(H,N)-LLV(L,N))*100;
B4:=SMA(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2;
控盘程度:(IF(B6 N1,B6-N1+2,0))*2.5,COLORYELLOW;
控盘度:100,COLORRED;
STICKLINE(控盘程度,0,控盘程度,1.7,0),COLOR00FFFF;
STICKLINE(控盘程度AND控盘程度 100,100,控盘程
度,1.7,0),COLORRED;主力状态
ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力估算}
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*8
0,3);{//筹码估算}
ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//散户套牢筹码比率}
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}1/31/3
ZCMZL:=MA(ZLCM+SHCM,13);{//市场筹码总量}
ZZNTS:=BARSLAST(ZSHTL90);{//走牛天数}
ZSHJJ:=EMA(ZSHTL,89);{//散户警戒}
ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}
ZJLRQD:=INTPART(ZZLKP-ZZLJJ);{//流入强度}
SH8:=EMA(ZSHTL,8);
DKB:=IF(ZZLKP-REF(ZZLKP,1) ZSHTL-REF(ZSHTL,1),1,0);
{散户套牢筹码}
STICKLINE(C 0,ZSHTL,ZZLKP,1,0),COLORFFFFFF;
{散户筹码警戒}
STICKLINE(ZSHJJ REF(ZSHJJ,1),ZSHTL,ZSHJJ,2,0),COLOR00F
F00;
{主力控盘筹码}
STICKLINE(C 0,ZZLKP,0,1,0),COLORA4A4A4;
{筑顶风险区}
STICKLINE(ZZLKP 75,ZZLKP,0,1,0),COLORFFFFFF;
{顶部:(ZZLKP 75),COLORFFFFFF;}
{主力筹码警戒}
STICKLINE(ZZLJJ REF(ZZLJJ,1),ZZLKP,ZZLJJ,2,0),COLORRED;
{筑底散兵坑}
STICKLINE(ZSHTL =90,ZZLKP,0,2,0),COLOR66FFCC;
{底部:(ZSHTL =90),COLOR66FFCC;}
{筹码总量上升}
IF(ZCMZL,ZCMZL REF(ZCMZL,1),0),COLOR0066FF,LINETHIC
K1;
{增量资金};
{//------【数值显示】}
散户套牢系数:INTPART(ZSHTL),COLORCYAN,LINETHICK2;
主力控盘系数:INTPART(ZZLKP),COLORYELLOW,LINETHICK2;
资金流入强度:ZJLRQD,LINETHICK2,COLORRED;
资金流入强度
2:IF(ZJLRQD 10,ZJLRQD,0),LINETHICK2,COLORWHITE;
市场筹码总量:INTPART(ZCMZL),COLORWHITE,LINETHICK0;
DRAWICON(CROSS(主力控盘系数,散户套牢系数),散户套牢
系数-5,11);
DRAWICON(CROSS(资金流入强度,散户套牢系数),散户套牢
系数-5,17);
N:=24;
VAR1:=EMA(EMA(CLOSE,13),13);
控盘指数:(VAR1-
REF(VAR1,1))/REF(VAR1,1)*1000,POINTDOT,COLORFFCCCC;
STICKLINE(控盘指数 0,控盘指数,0,2,0),COLORGRAY;
无庄控盘:控盘指数 0,LINETHICK0,COLORGRAY;
STICKLINE(控盘指数 REF(控盘指数,1)AND控盘指数 0AND
控盘指数 3,控盘指数,0,2,1),COLORRED;
STICKLINE(控盘指数 REF(控盘指数,1)AND控盘指数 0AND
控盘指数 3,控盘指数,0,2,1),COLORRED;
STICKLINE(控盘指数 REF(控盘指数,1)AND控盘指数 3,控盘指
数,3,4,1),COLORFF00FF;
主力控盘:控盘指数 REF(控盘指数,1)AND控盘指数 0,LINETHICK0,COLORRED;
STICKLINE(控盘指数0,控盘指
数,0,2,0),COLOR00FF00;
控盘减弱:控盘指数0,LINETHICK0,COLOR00FF00;
VARA:=EMA(0.667*REF(控盘指数,1)+0.333*控盘指数,2);
STICKLINE(控盘指数 VARA,控盘指数,VARA,2,0),COLORRED;
B2:=控盘指数 VARA;
准备: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+L+O+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*RE
F(A,17)+2*REF(A,18)+
REF(A,20))/210;
MTM:=C-REF(C,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)ANDCOUNT(DX 0,2)AND
CROSS(DX,MA(DX,2)),1,0);
DRAWICON(FILTER(买=1,5),L*0.11,1);
DIFF:(EMA(CLOSE,12)
EMA(CLOSE,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
MACD1 0,0,MACD1,2,0),COLORRED;
STICKLINE(MACD1 MACD2
MACD1 0,0,MACD1,2,0),COLORYELLOW;
STICKLINE(MACD1 MACD2,0,MACD1,1,0),COLORGREEN;
S1:=MACD
S2:=(MACD
S3:=BARSLAST(CROSS(DIFF,DEA));
S4:=REF(S3,S3+1);
S5:=DEA REF(DEA,S4);
S6:=DEA;
上成立:=CROSS(DIFF,DEA)ANDS5;
下成立:=CROSS(DIFF,DEA)ANDS6;
AND
AND
-
L1:=(EMA(CLOSE,3)-EMA(CLOSE,13));
L2:=EMA(L1,9);
L3:=BARSLAST(CROSS(L1,L2));
L4:=REF(L3,L3+1);
L5:=L2;
变盘:CROSS(L1,L2)ANDL5,NODRAW,COLORD6FF9C;
STICKLINE(变盘,5,0,0,1),COLORD6FF9C;
LS:=IF(DIFF DEAANDDIFF 0,1,0);
加速上扬:IF(REF(LS=0,1)ANDLS=1,0.1,0);
XG1:CROSS(MACD1,MACD2)ANDMACD1 0,NODRAW;
XG2:CROSS(DIFF,DEA),NODRAW;
M1:=MACD REF(MACD,1)ANDDIFF
绿柱短了:M1ANDCOUNT(M1,10)=1ANDC MA(C,55)AND
COUNT(MACD 0,5) =5,NODRAW;
DRAWTEXT(绿柱短了,MACD, 买点来了
DIFL:=EMA(V,12)-EMA(V,26);
DIF:=EMA(C,12)-EMA(C,26);
BL:=DIFL REF(DIFL,1)ANDDIF REF(DIF,1);
四天:REF(BL,3)=1ANDREF(BL,2)=1ANDREF(BL,1)=1AND
BL;
三天:REF(BL,2)=1ANDREF(BL,1)=1ANDBL;
{VERTLINE(上成立,3),COLORYELLOW;
VERTLINE(下成立,3),COLORRED;}
IF(DIFF DEA,DIFF,DRAWNULL),COLORFF11CC,LINETHICK1;
IF(DIFF DEA
DIFF 0,DIFF,DRAWNULL),COLORRED,LINETHICK1;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
DRAWTEXT(FILTER(D 80,6),H*1.018, D 80
AND
DRAWTEXT(FILTER(CROSS(K,D)ANDD 26,6),H*0.95, KD低
位 ),COLORFFCCCC;
STICKLINE(FILTER(CROSS(K,D)
D 26,6),H*0.97,H*0.95,4,0),COLORFFCCCC;
DIFFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEAF:=EMA(DIFFF,9);
MACDD:=2*(DIFFF-DEAF);
DRAWTEXT(FILTER(CROSS(DIFFF,DEAF)ANDDEAF 0,6),L-
0.02, MACD低位金叉 ),COLORRED;
STICKLINE(FILTER(CROSS(DIFFF,DEAF)ANDDEAF 0,6),L-
0.02,L-0.1,4,0),COLOR00FF00;
DRAWTEXT(FILTER(CROSS(DIFFF,DEAF)
DEAF 0,13),H+0.25, MACD下拐点 ),COLORYELLOW;
STICKLINE(FILTER(CROSS(DIFFF,DEAF)
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),C
OLORWHITE;
ROC:=(CLOSE-REF(CLOSE,21))/REF(CLOSE,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;