机构控盘度拓赢版本 EA-万能指标公式

机构控盘度拓赢版本

新建公式的时候，需设置参数
rN1 0,1,1
r N2 0,1,0
r N3 0,1,0
r N4 0,1,0

机构控盘度线以研究机构大资金的持仓变化为前提，通过观察机构仓位的增减变化了
r 解机构的操作行为和意图，并以此判断未来股价走势。
r 红柱表明机构进货，绿柱表明机构出货，长短表明进出的强度。
r 黄线代表机构的累计控盘度。
r 上市交易20个交易日以内，柱体的位置在当日机构控盘度的基础上显示；
r 上市交易20个交易日以上，柱体的位置在机构月平均控盘度的基础上显示。

注：若曲线突然出现巨量增长，并非完全是机构增持导致，可能是由于流通盘变化导
r    致，出现这类情况的原因主要有以下几种：
r    1.大股东解禁
r    2.上市公司增发
r    3.分红转增送股所致实时流通盘发生变化。
r    在出现以上情况下，曲线上会有三角形提醒用户注意。

r 用法：
r1、股价在相对低位进行震荡整理，此时机构控盘度若出现逐步增加的情况，表明
r    机构很可能在悄悄建仓。
r2、在股价上涨过程中，若机构控盘度仍逐步上升，表明机构还在收集筹码。
r3、在股价上涨过程中，若机构控盘度持续下降，表明机构趁拉高出货。
r4、股价在高位盘整时期，若机构控盘度持续下降，绿柱放出，表明机构在出货。
r5、需要结合股价历史走势综合研判机构持仓的变化和股价的变动关系，从而分析不
r    同个股的机构操作行为。要将机构控盘度线的方向变化和变化量大小进行综合考
r    量，但也要特别注意一些机构的骗线手法。

源码

rIF(PERIODNAME<>"日线")//判断周期
r{
r机构控盘度:"本指标只适用于日线周期";
r RETURN;
r}
rb1=IF(ISNULL(BIGBUYCOUNT1[-1]),0,BIGBUYCOUNT1[-1])+IF(ISNULL(WAITBUYCOUNT1[-1]),0,WAITBUYCOUNT1[-1]);
rs1=IF(ISNULL(BIGSELLCOUNT1[-1]),0,BIGSELLCOUNT1[-1])+IF(ISNULL(WAITSELLCOUNT1[-1]),0,WAITSELLCOUNT1[-1]);
rb2=IF(ISNULL(BIGBUYCOUNT2[-1]),0,BIGBUYCOUNT2[-1])+IF(ISNULL(WAITBUYCOUNT2[-1]),0,WAITBUYCOUNT2[-1]);
rs2=IF(ISNULL(BIGSELLCOUNT2[-1]),0,BIGSELLCOUNT2[-1])+IF(ISNULL(WAITSELLCOUNT2[-1]),0,WAITSELLCOUNT2[-1]);
rpos:=-2;
r//——————————————————–
rIF(LV_D_SUPER_HLD_RATIO[pos]==NULL)//控盘度、超户曲线
r{
r m=JGCGS/(TV_D_PUBLIC_SHARES*LV_D_SUPER_HLD_RATIO);
r IF(ISNULL(m) OR m==0) m=0.4663866413;
r IF(m>0.9) m=0.9;
r ddx:=((b1-s1)+(b2-s2)*0.7)/TV_D_PUBLIC_SHARES *100;//控盘度变化
r ddx1:=((b1-s1)+(b2-s2)*0.7*m)/TV_D_PUBLIC_SHARES *100;//超户变化
r IF(ISNULL(LV_D_SUPER_HLD_RATIO))//判断新股
r {
r  RET=(B1+b2)/TV_D_PUBLIC_SHARES *100;
r  RET1=B1/TV_D_PUBLIC_SHARES *100;
r }
r ELSE
r {
r  X1=LV_D_SUPER_HLD_RATIO*100;//昨天控盘度
r  ret:=X1+ddx;//今天控盘度
r  X11=LV_D_CH_HLD_RATIO*100;//昨天超户
r  Ret1:=X11+ddx1;//今天超户
r//——————————-控盘度，超户同步调整
r  IF(ddx > 0)//增加，控盘度调整，超户同步调整
r  {
r   IF(x1>95)
r   {
r    ret := x1+ddx*0.1;
r    Ret1 := x11+ddx1*0.1;
r   }
r   ELSE IF(x1>90)
r   {
r    ret := x1+ddx*0.5;
r    Ret1 := x11+ddx1*0.5;
r   }
r   ELSE IF(x1>85)
r   {
r    ret := x1+ddx*0.8;
r    Ret1 := x11+ddx1*0.8;
r   }
r  }
r  IF(ddx < 0 )//减少，控盘度调整，超户同步
r  {
r   IF(x1<5)
r   {
r    ret := x1+ddx*0.1;
r    Ret1 := x11+ddx1*0.1;
r   }
r   ELSE IF(x1<10)
r   {
r    ret := x1+ddx*0.5;
r    Ret1 := x11+ddx1*0.5;
r   }
r   ELSE IF(x1<15)
r   {
r    ret := x1+ddx*0.8;
r    Ret1 := x11+ddx1*0.8;
r   }
r  }
r }
r//———————————–控盘度超户绝对值调整
r IF(ISNULL(ret))
r  ret := LV_D_SUPER_HLD_RATIO*100;
r IF(ISNULL(ret1))
r  Ret1 := LV_D_CH_HLD_RATIO*100;
r IF(ret > 97.18)
r  ret := 97.18;
r IF(ret < 2.08)
r  ret := 2.08;
r IF(ret1 > 96)
r  Ret1 := 96;
r IF(ret1 < 0)
r  Ret1 :=0;
r}
rELSE
r{
r ret=LV_D_SUPER_HLD_RATIO*100;
r Ret1=LV_D_CH_HLD_RATIO*100;
r}
r//———————————————————大户持仓比
rret2=ret-ret1;
r//———————————————————–中户持仓比
rA3=100-ret;//a为实时的散户持仓比例
rIF(LV_D_ZH_HLD_RATIO[pos]==NULL)
r{
rDY=LV_D_ZH_HLD_RATIO;//日中户持股占比
rBB1= BIGBUYCOUNT3;//主动中单买入股数
rSS1=BIGSELLCOUNT3;//主动中单卖出股数
rBB2= WAITBUYCOUNT3;//被动中单买入股数
rSS2= WAITSELLCOUNT3;//被动中单卖出股数
rZZ1=( BB1+ BB2- SS1- SS2);//当天中户净买入股数
rZZ2=( BB1+ BB2- SS1- SS2)/ TV_D_PUBLIC_SHARES *100;//当天中户净买入占比
r IF(ISNULL(LV_D_ZH_HLD_RATIO))
r {
r  RET3=(BB1+BB2)/TV_D_PUBLIC_SHARES *100;
r }
r ELSE
r {
r  XX1=DY *100;
r  Ret3:=XX1+(ZZ1/TV_D_PUBLIC_SHARES*100);
r        IF(ZZ2>=0)
r        {
r   IF ( XX1>0.9*a3)//a是实时的原散户持仓比
r   RET3=XX1+ZZ2*0.1;
r   ELSE IF (XX1>0.85*a3)
r   RET3=XX1+ZZ2*0.5;
r
r    }
r  IF(ZZ2< 0)
r            {
r   IF (XX1<0.05*a3)
r    RET3=XX1+ZZ2*0.1;
r   ELSE IF (XX1<0.1*a3)
r    RET3=XX1+ZZ2*0.5;
r   }
r }
r
r IF (ret3 > 0.95*a3) ret3=0.95 *a3;
r IF (ret3 < 0.02*a3) ret3=0.02 *a3;
r }
rELSE
r{
r Ret3= LV_D_ZH_HLD_RATIO *100;
r}

//————————————————————–输出
rIF(N1>0 AND LV_D_SUPER_HLD_RATIO!=NULL)
r   {
r 控盘度:ret;
r  IF(LV_D_SUPER_HLD_RATIO[1]!=NULL)
r {
r  IF(COUNT(ret>0,0)<20)
r  {
r   STICKLINE(ret>ret[1],ret,ret*2-ret[1],5),colorred;
r     STICKLINE(ret<ret[1],ret,ret*2-ret[1],5),colorgreen;
r     DRAWICON((TV_D_PUBLIC_SHARES>1.05*TV_D_PUBLIC_SHARES[1] OR TV_D_PUBLIC_SHARES<0.95*TV_D_PUBLIC_SHARES[1]),ret*2-ret[1],"kaka");
r  }
r  ELSE
r  {
r   STICKLINE(ret>ret[1],MA(ret,20),MA(ret,20)+(ret-ret[1]),5),colorred;
r STICKLINE(ret<ret[1],MA(ret,20),MA(ret,20)+(ret-ret[1]),5),colorgreen;
r 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)+(ret-ret[1]),"kaka");
r    }
r }
r }
r//IF(n2>0 AND LV_D_SUPER_HLD_RATIO!=NULL)
r//超级: ret1;
r//IF(n3>0 AND LV_D_SUPER_HLD_RATIO!=NULL)
r//机构: ret2;
r//IF(n4>0 AND LV_D_SUPER_HLD_RATIO!=NULL)
r//中户:ret3;
r//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")
r