同花顺主力持仓公式.doc

精品资料
同花顺主力持仓公式

主力持仓 TOPWIN
N 1，999，1
IF(PERIODNAME<>"日线")
{统计:"该指标只在日线周期下有效。";
RETURN;
}
r1:=ZDMR[-1];
r2:=BDMR[-1];
r3:=-ZDMC[-1];
r4:=-BDMC[-1];
x:=(ZDMR+BDMR)/SHGZG*30;
y:=-(ZDMC+BDMC)/SHGZG*30;
x1:=(ZDMR+BDMR)/SHGZG*100;
y1:=-(ZDMC+BDMC)/SHGZG*100;
a1=SUM(x1,0);
b1=SUM(y1,0);

主力持仓:=a1+b1;
r:=((ZDMR[-1]+BDMR[-1])-(ZDMC[-1]+BDMC[-1]))/SHGZG*100;
b:=SUM(r,0);
STICKLINE(x1>0,x+b,b,2),colorred;
STICKLINE(y1<0,b,b+y,2),colorgreen;
IF(ISNULL(r1))
{
统计:"本指标由同花顺金融研究中心提供，每晚11点后提供当天的数据。";
RETURN;
}
a=(ZDMR[-1]+BDMR[-1]);
b=(ZDMC[-1]+BDMC[-1]);
a3=SUM(a,n)/1000000;

b3=SUM(b,n)/1000000;
VOL1=SUM(VOL,n)/1000000;
IF(a3>b3)
{
y=a3-b3;
z=y/VOL1*100;
统计:TOSTRING(n,0)+"天机构买入"+TOSTRING(a3,1)+"万手,卖出"+TOSTRING(b3,1)+"万手.净买入"+TOSTRING(y,1)+"万手.占总成交"+TOSTRING(z,1)+"％.";
}
ELSE
{
y=b3-a3;
z=y/VOL1*100;
统计:TOSTRING(n,0)+"天机构买入"+TOSTRING(a3,1)+"万手,卖出"+TOSTRING(b3,1)+"万手.净卖出"+TOSTRING(y,1)+"万手.占总成交"+TOSTRING(z,1)+"％.";
}
=========================================================

同花顺l2公式函数2

主力买卖大单
N 1，100，1
IF(PERIODNAME<>"日线")
{
统计:"该指标只在日线周期下有效。";
RETURN;
}
r1:=ZDMR[-1];
r2:=BDMR[-1];
r3:=-ZDMC[-1];
r4:=-BDMC[-1];
STICKLINE(r2>0,r1,r1+r2,8),color160060;
STICKLINE(r1>0,0,r1,8),color0000ff;
STICKLINE(r3<0,0,r3,8),color00ff00;
STICKLINE(r4<0,r3,r3+r4,8),color166000;
x1:=(ZDMR+BDMR);
y1:=-(ZDMC+BDMC);
a1=MA(x1,n);
b1=MA(y1,n);
净买入:a1+b1;
净买入比值:(a1+b1)/VOL*100;
IF(ISNULL(r1))
{
统计:"本指标由同花顺金融研究中心提供，每晚11点后提供当天的数据。";
RETURN;
}
a=(ZDMR[-1]+BDMR[-1]);
b=(ZDMC[-1]+BDMC[-1]);
a3=SUM(a,n)/1000000;
b3=SUM(b,n)/1000000;
VOL1=SUM(VOL,n)/1000000;
IF(a3>b3)
{
y=a3-b3;
z=y/VOL1*100;
统计:TOSTRING(n,0)+"天机构买入"+TOSTRING(a3,1)+"万手,卖出"+TOSTRING(b3,1)+"万手.净买入"+TOSTRING(y,1)+"万手.占总成交"+TOSTRING(z,1)+"％.";
}

ELSE
{
y=b3-a3;
z=y/VOL1*100;
统计:TOSTRING(n,0)+"天机构买入"+TOSTRING(a3,1)+"万手,卖出"+TOSTRING(b3,1)+"万手.净卖出"+TOSTRING(y,1)+"万手.占总成交"+TOSTRING(z,1)+"％.";
}

=====================================
资金流向
IF(STRFIND(PERIODNAME,"分钟",1)>0)
{
统计:"该指标只在日线、周线、月线、季线和年线周期下有效。";
RETURN;
}
资金流出:-ZJLC[-1];
资金流入:ZJLR[-1];
资金流向:资金流出+资金流入;
IF(ISNULL(资金流出) AND ISNULL(资金流入))
==================================================
机构动向
IF(PERIODNAME<>"日线")
{
当日机构动向:"本指标只适用于日线周期";
RETURN;
}
z:0;
a:=ZDMR[-1]+BDMR[-1];
b:=ZDMC[-1]+BDMC[-1];
bl:=(a-b)/(a+b)*100;
IF(ABS(bl)<30)
当日机构动向:bl;
ELSE

今日机构动向:bl;

大单净量日线
IF(STRFIND(PERIODNAME,"分钟",1)>0)
{
统计:"该指标只在日线、周线、月线、季线和年线周期下有效。";
RETURN;
}
r:=((ZDMR[-1]+BDMR[-1])-(ZDMC[-1]+BDMC[-1]))/SHGZG*100;
大单净量:r;
STICKLINE(r>0,0,r,8),color0000ff;
STICKLINE(r<0,0,r,8),color00ff00;
r0:=((IF(ISNULL(ZDMR[-1]),0,ZDMR)+IF(ISNULL(BDMR[-1]),0,BDMR))
-(IF(ISNULL(ZDMC[-1]),0,ZDMC)+IF(ISNULL(BDMC[-1]),0,BDMC)))
/SHGZG*100;
MA5:MA(r0,5);
MA10:MA(r0,10);
MA20:MA(r0,20);
RETURN r0;

上证BBD
大单净差BBD:100*(BIGBUYCOUNT1+WAITBUYCOUNT1-BIGSELLCOUNT1-WAITSELLCOUNT1);
大单净额:BIGBUYMONEY1+WAITBUYMONEY1-BIGSELLMONEY1-WAITSELLMONEY1;
三日BBD:SUM(大单净差BBD,3);
五日BBD:SUM(大单净差BBD,5);
十日BBD:SUM(大单净差BBD,10);

BBD持续出现红柱，资金流入幅度不断加大. BBD指标首次翻绿，且资金流出幅度不断加大

机构控盘度
IF(ISNULL(LV_D_SUPER_HLD_RATIO[-1])==0)
{
x:=LV_D_SUPER_HLD_RATIO*100;
STICKLINE(x>x[1],x,x*2-x[1],5),colorred;
STICKLINE(x RETURN x;
}
ddx:=((ZDMR[-1]+BDMR[-1])-(ZDMC[-1]+BDMC[-1]))/ TV_D_PUBLIC_SHARES *100;
//判断新股
IF(ISNULL(LV_D_SUPER_HLD_RATIO))
{
bl:=((ZDMR[-1]+BDMR[-1]))/TV_D_PUBLIC_SHARES*100;
IF(ISNULL(bl[1])==0)
bl:=bl[1];
}
ELSE
bl:=LV_D_SUPER_HLD_RATIO*100;
//
//bl 是起始比例
x:=bl;
x1:=x[1];
ret:=x1+ddx;
IF(ddx > 0)
{
IF(x1>95)
ret := x1+ddx*0.1;
ELSE IF(x1>90)
ret := x1+ddx*0.5;
ELSE IF(x1>85)
ret := x1+ddx*0.8;
}
IF(ddx < 0)
{
IF(x1<5)
ret := x1+ddx*0.1;
ELSE IF(x1<10)
ret := x1+ddx*0.5;
ELSE IF(x1<15)
ret := x1+ddx*0.8;
}
IF(ISNULL(ret))
ret := bl;
IF(ret > 97.18)
ret := 97.18;
IF(ret < 2.08)
ret := 2.08;
x:=ret;
STICKLINE(x>x[1],x,x*2-x[1],5),colorred;
STICKLINE(x0)
{
RETURN "该指标只用于指数。";
}

IF(ISNULL(LV_D_SUPER_HLD_RATIO[-1])==0)
{
x:=LV_D_SUPER_HLD_RATIO*100;
RETURN x;
}
ddx:=(BIGBUYCOUNT1[-1]+WAITBUYCOUNT1[-1]-BIGSELLCOUNT1[-1]-WAITSELLCOUNT1[-1])/TV_D_PUBLIC_SHARES*100;
//判断新股
IF(ISNULL(LV_D_SUPER_HLD_RATIO))
{
bl:=((ZDMR[-1]+BDMR[-1]))/TV_D_PUBLIC_SHARES*100;
IF(ISNULL(bl[1])==0)
bl:=bl[1];
}
ELSE
bl:=LV_D_SUPER_HLD_RATIO*100;
//
//bl 是起始比例
x:=bl;
x1:=x[1];
ret:=x1+ddx;
IF(ddx > 0)
{
IF(x1>95)
ret := x1+ddx*0.1;
ELSE IF(x1>90)
ret := x1+ddx*0.5;
ELSE IF(x1>85)
ret := x1+ddx*0.8;
}
IF(ddx < 0)
{
IF(x1<5)
ret := x1+ddx*0.1;
ELSE IF(x1<10)
ret := x1+ddx*0.5;
ELSE IF(x1<15)
ret := x1+ddx*0.8;
}
IF(ISNULL(ret))
ret := bl;
IF(ret > 97.18)
ret := 97.18;
IF(ret < 2.08)
ret := 2.08;
xret;
RETURN ret;

机构控盘度（副图）

VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE;
A10:=CROSS(控盘,0);
无庄控盘:IF(控盘<0,控盘,0),COLORWHITE,NODRAW;
开始控盘:IF(A10,5,0),LINETHICK1,COLORYELLOW;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)0,控盘,0,1,0),COLORFF00FF;
高度控盘:IF(VAR2>50 AND COST(85)0,控盘,0),COLORFF00FF,NODRAW;
STICKLINE(控盘0,控盘,0,1,0),COLOR00FF00;
主力出货:IF(控盘0,控盘,0),COLOR00FF00,NODRAW;
机构控盘度，这个指标适合在日线情况下使用，在5分钟或者短周期下，不太准确。特别提示一下，这个指标适合日线下使用，当天买卖为完成时，往往还会变，这种情况下要自己分析。
　　白色表示无主力控盘，但是在上升轨道中的波谷，往往白色是建仓时机，也是主力在波段上高抛低吸的机会。
　 绿色表示主力出货，主力在向上拉升股票的波段中，也要不断的高抛低吸，才能盈利，保证后续资金。
　紫色表示高度控盘，一般出现紫色，后市走势都不错。红色表示有主力控盘，意味着你还可以继续持股。
可编辑修改