同花顺l2公式函数

主力持仓 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)+\天机构买入\万手,卖出\万手.净买入\万手.占总成交\％.\} ELSE {

y=b3-a3;

z=y/VOL1*100;

统计:TOSTRING(n,0)+\天机构买入\万手,卖出\万手.净卖出\万手.占总成交\％.\

}

=========================================================

同花顺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)+\天机构买入\万手,卖出\万手.净买入\万手.占总成交\％.\} ELSE

{

y=b3-a3;

z=y/VOL1*100;

统计:TOSTRING(n,0)+\天机构买入\万手,卖出\万手.净卖出\万手.占总成交\％.\}

===================================== 资金流向

IF(STRFIND(PERIODNAME,\分钟\{

统计:\该指标只在日线、周线、月线、季线和年线周期下有效。\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,\分钟\{

统计:\该指标只在日线、周线、月线、季线和年线周期下有效。\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);

机构控盘度

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(x

大盘控盘度

IF(CODETYPE>0)

{

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; x:=ret;

RETURN ret;