同花顺听雪主力动向副图源码 EA

留意“控盘度”趋势走向，红绿柱表示主力增仓减仓情况。

r

r:=((ZDMR[-1]+BDMR[-1])-(ZDMC[-1]+BDMC[-1]))/SHGZG*100;
r t:=BARSCOUNT(SHGZG);
r b:=SUM(r,t);
r主力持仓:b;
r n:=5;
r x2:=HHV(r,n);
r S:=STD(SHGZG,2)/1000000;
r S1:=-STD(SHGZG,2)/1000000;
r STICKLINE(r>0,r+b,b,2),colorred;
r STICKLINE(r<0,b,b+r,2),colorgreen;
r STICKLINE(s>0,x2+b,b+r*3,3),coloryellow;
r STICKLINE(s1<0,b+r*3,b-x2,3),coloryellow;
r IF(ISNULL(r))
r a=(ZDMR[-1]+BDMR[-1]);
r b=(ZDMC[-1]+BDMC[-1]);
r a3=SUM(a,n)/1000000;
r b3=SUM(b,n)/1000000;
r VOL1=SUM(VOL,n)/1000000;
r S3=STD(SHGZG,2)/10000;
r IF(a3>b3)
r {
r y=a3-b3;
r z=y/VOL1*100;
r主力增加:TOSTRING(r,2)+"％."+TOSTRING(n,0)+"天主力净买入"+TOSTRING(y,1)+"万手.占总成交"+TOSTRING(z,1)+"％."+"流通盘增加"+TOSTRING(s3,2)+"万.";
r }
rELSE
r {
r y=b3-a3;
r z=y/VOL1*100;
r主力增加:TOSTRING(r,2)+"％."+TOSTRING(n,0)+"天主力净买入"+TOSTRING(y,1)+"万手.占总成交"+TOSTRING(z,1)+"％."+"流通盘增加"+TOSTRING(s3,2)+"万.";
r }
rVar1:=(CLOSE+HIGH+LOW)/3;
r Var2:=EMA(EMA(EMA(Var1,1),13),21);
r控盘度:(Var2-REF(Var2,1))/REF(Var2,1)*1000;
r强弱分界:= 0;

r

r