机构控盘度指标公式
机构控盘度 拓赢版本新建的时候，需设置参数
N1 0,1,1
N2 0,1,0
N3 0,1,0
N4 0,1,0机构控盘度线以研究机构大资金的持仓变化为前提，通过观察机构仓位的增减变化了
解机构的操作行为和意图，并以此判断未来股价走势。
红柱表明机构进货，绿柱表明机构出货，长短表明进出的强度。
黄线代表机构的累计控盘度。
上市交易20个交易日以内，柱体的位置在当日机构控盘度的基础上显示；
上市交易20个交易日以上，柱体的位置在机构月平均控盘度的基础上显示。注：若曲线突然出现巨量增长，并非完全是机构增持导致，可能是由于流通盘变化导
致，出现这类情况的原因主要有以下几种：
1.大股东解禁
2.上市公司增发
3.分红转增送股所致实时流通盘发生变化。
在出现以上情况下，曲线上会有三角形提醒用户注意。
用法：
1、股价在相对低位进行震荡整理，此时机构控盘度若出现逐步增加的情况，表明
机构很可能在悄悄建仓。
2、在股价上涨过程中，若机构控盘度仍逐步上升，表明机构还在收集筹码。
3、在股价上涨过程中，若机构控盘度持续下降，表明机构趁拉高出货。
4、股价在高位盘整时期，若机构控盘度持续下降，绿柱放出，表明机构在出货。
5、需要结合股价历史走势综合研判机构持仓的变化和股价的变动关系，从而分析不
同个股的机构操作行为。要将机构控盘度线的方向变化和变化量大小进行综合考
量，但也要特别注意一些机构的骗线手法。源码
原理解析：
如果PERIODNAME不等于"日线",返回?,否则返回?//判断周期B1=如果ISNULL(BIGBUYCOUNT1[-1]),返回0,否则返回BIGBUYCOUNT1[-1]+如果ISNULL(WAITBUYCOUNT1[-1]),返回0,否则返回WAITBUYCOUNT1[-1]
S1=如果ISNULL(BIGSELLCOUNT1[-1]),返回0,否则返回BIGSELLCOUNT1[-1]+如果ISNULL(WAITSELLCOUNT1[-1]),返回0,否则返回WAITSELLCOUNT1[-1]
B2=如果ISNULL(BIGBUYCOUNT2[-1]),返回0,否则返回BIGBUYCOUNT2[-1]+如果ISNULL(WAITBUYCOUNT2[-1]),返回0,否则返回WAITBUYCOUNT2[-1]
S2=如果ISNULL(BIGSELLCOUNT2[-1]),返回0,否则返回BIGSELLCOUNT2[-1]+如果ISNULL(WAITSELLCOUNT2[-1]),返回0,否则返回WAITSELLCOUNT2[-1]
POS赋值:-2
赋值: LV_D_SUPER_HLD_RATIO*100
赋值: LV_D_CH_HLD_RATIO*100
赋值: 97.18
赋值: 2.08
赋值: 96
赋值:0
}ELSE//---------------------------------------------------------大户持仓比RET2=RET-RET1
//-----------------------------------------------------------中户持仓比A3=100-RET
//A为实时的散户持仓比例IF(LV_D_ZH_HLD_RATIO[POS]]NULL)ELSEIF(ZZ20.95*A3,返回?,否则返回? RET3=0.95 *A3
如果RET30 AND LV_D_SUPER_HLD_RATIO不等于NULL)ELSE}}//如果N2>0ANDLV_D_SUPER_HLD_RATIO不等于NULL,返回?,否则返回?//超级: RET1
输出//如果N3>0ANDLV_D_SUPER_HLD_RATIO不等于NULL,返回?,否则返回?//机构: RET2
输出//如果N4>0ANDLV_D_SUPER_HLD_RATIO不等于NULL,返回?,否则返回?//中户:RET3
//当满足条件(TV_D_PUBLIC_SHARES>1.05*TV_D_PUBLIC_SHARES[1]ORTV_D_PUBLIC_SHARES"日线")//判断周期
{
机构控盘度:"本只适用于日线周期";
RETURN;
}
b1=IF(ISNULL(BIGBUYCOUNT1[-1]),0,BIGBUYCOUNT1[-1])+IF(ISNULL(WAITBUYCOUNT1[-1]),0,WAITBUYCOUNT1[-1]);
s1=IF(ISNULL(BIGSELLCOUNT1[-1]),0,BIGSELLCOUNT1[-1])+IF(ISNULL(WAITSELLCOUNT1[-1]),0,WAITSELLCOUNT1[-1]);
b2=IF(ISNULL(BIGBUYCOUNT2[-1]),0,BIGBUYCOUNT2[-1])+IF(ISNULL(WAITBUYCOUNT2[-1]),0,WAITBUYCOUNT2[-1]);
s2=IF(ISNULL(BIGSELLCOUNT2[-1]),0,BIGSELLCOUNT2[-1])+IF(ISNULL(WAITSELLCOUNT2[-1]),0,WAITSELLCOUNT2[-1]);
pos:=-2;
//--------------------------------------------------------
IF(LV_D_SUPER_HLD_RATIO[pos]==NULL)//控盘度、超户曲线
{
m=JGCGS/(TV_D_PUBLIC_SHARES*LV_D_SUPER_HLD_RATIO);
IF(ISNULL(m) OR m==0) m=0.4663866413;
IF(m>0.9) m=0.9;
ddx:=((b1-s1)+(b2-s2)*0.7)/TV_D_PUBLIC_SHARES *100;
//控盘度变化
ddx1:=((b1-s1)+(b2-s2)*0.7*m)/TV_D_PUBLIC_SHARES *100;
//超户变化
IF(ISNULL(LV_D_SUPER_HLD_RATIO))//判断新股
{
RET=(B1+b2)/TV_D_PUBLIC_SHARES *100;
RET1=B1/TV_D_PUBLIC_SHARES *100;
}
ELSE
{
X1=LV_D_SUPER_HLD_RATIO*100;
//昨天控盘度
ret:=X1+ddx;
//今天控盘度
X11=LV_D_CH_HLD_RATIO*100;
//昨天超户
Ret1:=X11+ddx1;
//今天超户
//-------------------------------控盘度，超户同步调整
IF(ddx > 0)//增加，控盘度调整，超户同步调整
{
IF(x1>95)
{
ret := x1+ddx*0.1;
Ret1 := x11+ddx1*0.1;
}
ELSE IF(x1>90)
{
ret := x1+ddx*0.5;
Ret1 := x11+ddx1*0.5;
}
ELSE IF(x1>85)
{
ret := x1+ddx*0.8;
Ret1 := x11+ddx1*0.8;
}
}
IF(ddx 97.18)
ret := 97.18;
IF(ret 96)
Ret1 := 96;
IF(ret1 =0)
{
IF ( XX1>0.9*a3)//a是实时的原散户持仓比
RET3=XX1+ZZ2*0.1;
ELSE IF (XX1>0.85*a3)
RET3=XX1+ZZ2*0.5;
}
IF(ZZ2 0.95*a3) ret3=0.95 *a3;
IF (ret3 0 AND LV_D_SUPER_HLD_RATIO!=NULL)
{
控盘度:ret;
IF(LV_D_SUPER_HLD_RATIO[1]!=NULL)
{
IF(COUNT(ret>0,0)ret[1],ret,ret*2-ret[1],5),colorred;
STICKLINE(ret1.05*TV_D_PUBLIC_SHARES[1] OR TV_D_PUBLIC_SHARESret[1],MA(ret,20),MA(ret,20)+(ret-ret[1]),5),colorred;
STICKLINE(ret1.05*TV_D_PUBLIC_SHARES[1] OR TV_D_PUBLIC_SHARES0 AND LV_D_SUPER_HLD_RATIO!=NULL)
//超级: ret1;
//IF(n3>0 AND LV_D_SUPER_HLD_RATIO!=NULL)
//机构: ret2;
//IF(n4>0 AND LV_D_SUPER_HLD_RATIO!=NULL)
//中户:ret3;
//DRAWICON((TV_D_PUBLIC_SHARES>1.05*TV_D_PUBLIC_SHARES[1] OR TV_D_PUBLIC_SHARES<0.95*TV_D_PUBLIC_SHARES[1]),MA(ret,20),"kaka")
TIPTEXT(ISNULL(REFX(CLOSE,1)),0,' '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'');