首页 > > 详细

通达信股东机构副图指标 股东人数走势图 源码分享

{股东机构 股东机构变化 20220401 QQ 1 10 5 }

{股东人数走势图,户数越少,户均持股越多,庄家筹码集中度越高(结合ROE向上走势,后期越容易牛 }

QQ:=5;

HHSS:=FINVALUE(242);

A1A:=HHSS<>REF(HHSS,1);

B1B:=BARSLAST(A1A);

BGQ:=FINVALUE(0);

Z111:=STRCAT('公告日期:20',CON2STR(BGQ,0));

DRAWTEXT_FIX(B1B,0.02,0.03,0,Z111),COLORWHITE;

交易股东人数:GPJYVALUE(1,1,1),COLORRED;

财报日:=1000000+BGQ,NODRAW;

年份取值:=INTPART(财报日/10000);

当前股东户:=FINONE(242,0,0),NODRAW;

数据10:=IF(FINONE(242,0,10)=DRAWNULL,0,FINONE(242,0,10)),NODRAW;

数据9:=IF(FINONE(242,0,9)=DRAWNULL,0,FINONE(242,0,9)),COLORMAGENTA,NODRAW;

数据8:=IF(FINONE(242,0,8)=DRAWNULL,0,FINONE(242,0,8)),COLORRED,NODRAW;

数据7:=IF(FINONE(242,0,7)=DRAWNULL,0,FINONE(242,0,7)),COLORYELLOW,NODRAW;

数据6:=IF(FINONE(242,0,6)=DRAWNULL,0,FINONE(242,0,6)),COLORGREEN,NODRAW;

数据5:=IF(FINONE(242,0,5)=DRAWNULL,0,FINONE(242,0,5)),NODRAW;

数据4:=IF(FINONE(242,0,4)=DRAWNULL,0,FINONE(242,0,4)),COLORMAGENTA,NODRAW;

数据3:=IF(FINONE(242,0,3)=DRAWNULL,0,FINONE(242,0,3)),COLORRED,NODRAW;

数据2:=IF(FINONE(242,0,2)=DRAWNULL,0,FINONE(242,0,2)),COLORYELLOW,NODRAW;

数据1:=IF(FINONE(242,0,1)=DRAWNULL,0,FINONE(242,0,1)),COLORGREEN,NODRAW;

数据0:=IF(FINONE(242,0,0)=DRAWNULL,0,FINONE(242,0,0)),COLORGREEN,NODRAW;

KK:=IF(数据0=0,0,900),NODRAW;

TT:=600,NODRAW;

股东户10:=数据10,NODRAW;

股东户9:=数据9,NODRAW;

股东户8:=数据8,NODRAW;

股东户7:=数据7,NODRAW;

股东户6:=数据6,NODRAW;

股东户5:=数据5,NODRAW;

股东户4:=数据4,NODRAW;

股东户3:=数据3,NODRAW;

股东户2:=数据2,NODRAW;

股东户1:=数据1,NODRAW;

股东户0:=数据0,NODRAW;

DAZHI1:=CONST(MAX(ABS(股东户10),MAX(ABS(股东户9),MAX(ABS(股东户8),MAX(ABS(股东户7),MAX(ABS(股东户6),ABS(股东户5))))))),NODRAW;

DAZHI2:=CONST(MAX(ABS(股东户5),MAX(ABS(股东户4),MAX(ABS(股东户3),MAX(ABS(股东户2),MAX(ABS(股东户1),ABS(股东户0))))))),NODRAW;

DAZHI:=CONST(MAX(ABS(DAZHI1),ABS(DAZHI2))),NODRAW;

DRAWRECTREL(0,900-TT*股东户10/DAZHI,10,KK,RGB(10,80,160));

DRAWRECTREL(11,900-TT*股东户9/DAZHI,21,KK,RGB(10,80,160));

DRAWRECTREL(22,900-TT*股东户8/DAZHI,32,KK,RGB(10,80,160));

DRAWRECTREL(33,900-TT*股东户7/DAZHI,43,KK,RGB(10,80,160));

DRAWRECTREL(44,900-TT*股东户6/DAZHI,54,KK,RGB(160,10,00));

DRAWRECTREL(55,900-TT*股东户5/DAZHI,65,KK,RGB(160,10,00));

DRAWRECTREL(66,900-TT*股东户4/DAZHI,76,KK,RGB(160,10,00));

DRAWRECTREL(77,900-TT*股东户3/DAZHI,87,KK,RGB(160,10,00));

DRAWRECTREL(88,900-TT*股东户2/DAZHI,98,KK,RGB(140,0,200));

DRAWRECTREL(99,900-TT*股东户1/DAZHI,109,KK,RGB(140,0,200));

DRAWRECTREL(110,900-TT*股东户0/DAZHI,120,KK,RGB(140,0,200));

{DRAWRECTREL(120,500-股东户10,130,500,RGB(100,100,0));}

DRAWTEXT_FIX(数据0>0 ,0.01,0.91,0,CON2STR(年份取值+1898,0)),COLORFF7000;

DRAWTEXT_FIX(数据0>0,0.05,0.91,0,CON2STR(年份取值+1899,0)),COLOR0020FF;

DRAWTEXT_FIX(数据0>0,0.09,0.91,0,CON2STR(年份取值+1900,0)),COLORFF00AA;

DRAWTEXT_FIX(数据0>0,0.128,0.7,0,STRCAT(CON2STR(当前股东户/1,0),' 户')),COLORYELLOW;



GDRSLXZJFX:=IF(数据0<数据1 AND 数据1<数据2 AND 数据2<数据3,'连续三季度减少',

IF(数据0>数据1 AND 数据1>数据2 AND 数据2>数据3,'连续三季度增加',''));

DRAWTEXT_FIX(ISLASTBAR AND ((数据0-数据1)/数据1)<=0 AND 数据0>0,0.01,0.1,0,

STRCAT('本期股东较上期 ',STRCAT(CON2STR((数据0-数据1)/数据1*100,2),STRCAT(' %,',GDRSLXZJFX)))),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR AND ((数据0-数据1)/数据1)>0 AND 数据0>0,0.01,0.1,0,

STRCAT('本期股东较上期 ',STRCAT(CON2STR((数据0-数据1)/数据1*100,2),STRCAT(' %,',GDRSLXZJFX)))),COLORYELLOW;



{股东人数占比}

DTS:=CURRBARSCOUNT,NODRAW;

LT:=FINANCE(7);

RS:=FINVALUE(242);

变:=BARSLAST(RS<>REF(RS,1) OR BARSSINCE(RS)=0);

天X数:=CONST(SUMBARS(变=0,3)),NODRAW;

流通股:=FINVALUE(239),COLORWHITE;

总股本:=FINANCE(1);

流通A股:=FINONE(239,0,0);

户数:FINVALUE(242),COLORYELLOW,NODRAW;

T1:=BARSLAST(户数>REF(户数,1));

连降:=SUM(户数<REF(户数,1),T1+1),NODRAW;

T2:=BARSLAST(户数<>REF(户数,1));

户数变化:=REF(户数,T2)/REF(户数,T2+1)*100-100,NODRAW;{幅度};

连降幅度:=IF(连降>=1,户数/REF(户数,T1)*100-100,0),NODRAW;

户均持股:FINVALUE(239)/FINVALUE(242),COLOR009393;

持股变化:=REF(户均持股,T2)/REF(户均持股,T2+1)*100-100,COLORRED,NODRAW;{幅度};

集中度:=(FINVALUE(239)/FINVALUE(242))/FINVALUE(239)*10000,COLORRED,NODRAW;

NOTEXT:IF(连降>=4,户均持股,DRAWNULL),COLORRED;

GG1:=VARCAT(VARCAT(VARCAT(VARCAT(' ●股东降 ',VAR2STR(连降,0)),' 次● '),' '),' '),COLORWHITE;

DRAWTEXT(变=0 AND 连降>0 AND 天X数>=DTS,REF(户均持股,1)*1.02,GG1),COLORYELLOW;





第一股东持股数:=FINVALUE(243),COLORYELLOW;

十大股东持股计:=FINVALUE(244),COLORGREEN;{245}

第一占比:(第一股东持股数/总股本)*100,COLORMAGENTA,NODRAW;

十东占比:(十大股东持股计/总股本)*100,COLORCYAN,NODRAW;

国家队持股数量:=FINVALUE(248);

前期机构家:FINONE(246,0,1),COLORYELLOW,NODRAW;

本期机构家:FINVALUE(246),NODRAW;{FINONE(246,0,0)}

前期机构占比:=FINONE(247,0,1)/总股本*100;

本期机构占比:=FINONE(247,0,0)/总股本*100;

机构持股增减%:=本期机构占比-前期机构占比,NODRAW;



商誉:=IF(FINVALUE(35)<0,1,FINVALUE(35)/100000000);{亿}

净资产:=FINANCE(19)/100000000,NODRAW;{亿}

雷区:商誉/净资产*100,COLORWHITE,NODRAW;{大于30为高风险,低于30为低风险};



{股东机构 股东人数20191116 QQ 1 10 5}

机构占比:100*FINVALUE(247)/FINVALUE(239),COLORYELLOW,NODRAW;

WWW1:=IF(QQ=1,246,IF(QQ=2,248,IF(QQ=3,250,

IF(QQ=4,252,IF(QQ=5,254,IF(QQ=6,256,

IF(QQ=7,258,IF(QQ=8,279,IF(QQ=9,277,

IF(QQ=10,274,DRAWNULL))))))))));

WWW2:=IF(QQ=1,247,IF(QQ=2,249,IF(QQ=3,251,

IF(QQ=4,253,IF(QQ=5,255,IF(QQ=6,257,

IF(QQ=7,259,IF(QQ=8,280,IF(QQ=9,278,

IF(QQ=10,275,DRAWNULL))))))))));



总家数:FINVALUE(WWW1)*1,COLORWHITE,NODRAW;

共持股万:FINVALUE(WWW2)/10000,COLORFFFF00,NODRAW;

占总%:FINVALUE(WWW2)/总股本*100,COLORYELLOW,NODRAW;

本季增家数:FINONE(WWW1,0,0)-FINONE(WWW1,0,1),NODRAW,COLORWHITE;

本季持股增%:(FINONE(WWW2,0,0)-FINONE(WWW2,0,1))/FINONE(WWW2,0,1)*100,NODRAW,COLORYELLOW;

{文字}

WMW:=IF(QQ=1,'机构●',IF(QQ=2,'QFII●',IF(QQ=3,'券商●',

IF(QQ=4,'保险●',IF(QQ=5,'●基金',IF(QQ=6,'社保●',

IF(QQ=7,'私募●',IF(QQ=8,'特殊法人机构●',IF(QQ=9,'信托●',

IF(QQ=10,'一般法人机构●',DRAWNULL))))))))));

QQ1:=VARCAT(VARCAT(VARCAT(VARCAT(WMW,VAR2STR(总家数,0)),' 家●共持股 '),VAR2STR(共持股万,0)),'万股●占总% '),COLORWHITE;

QQ2:=VARCAT(VARCAT(VARCAT(VARCAT(VAR2STR(占总%,2),' %'),' '),' '),' '),COLORWHITE;

QQ3:=VARCAT(QQ1,QQ2);

DRAWTEXT(变=0 AND 总家数>0 AND 天X数>=DTS,户均持股*0.96,QQ3),COLORWHITE;

T20一季净增:=STRCAT(STRCAT(' 20一季业绩:',CON2STR((FINONE(96,20,331)-FINONE(96,19,331))/ABS(FINONE(96,19,331))*100,2)),'%');

DRAWTEXT_FIX(ISLASTBAR,0.5,0.15,0,T20一季净增),COLORRED;

T20中报业绩:=STRCAT(STRCAT(' 20中报业绩:',CON2STR((FINONE(96,20,630)-FINONE(96,19,630))/ABS(FINONE(96,19,630))*100,2)),'%');

DRAWTEXT_FIX(ISLASTBAR,0.5,0.30,0,T20中报业绩),COLORYELLOW;

T20三季增预:=STRCAT(STRCAT('20三季增预告:',CON2STR(FINVALUE(286),2)),'%');

DRAWTEXT_FIX(ISLASTBAR,0.5,0.45,0,T20三季增预),COLORWHITE;

T19营收:=STRCAT(STRCAT('T19营收:',CON2STR(FINONE(74,19,1231)/100000000,2)),'亿');

DRAWTEXT_FIX(ISLASTBAR,0.5,0.60,0,T19营收),COLORRED;



DRAWTEXT_FIX(0,0.0,0.25,0,STRCAT('第一股东持股数:',CON2STR(第一股东持股数,2))),COLORCYAN;

DRAWTEXT_FIX(1,0,0.25,0,STRCAT('第一股东占比% ',CON2STR(第一占比,2))),COLORRED;

DRAWTEXT_FIX(0,0.0,0.3,0,STRCAT('十大股东持股计:',CON2STR(十大股东持股计,2))),COLORCYAN;

DRAWTEXT_FIX(1,0,0.3,0,STRCAT('十大股东占比% ',CON2STR(十东占比,2))),COLORRED;



{机构}

S3S1:=FINVALUE(246);

R3R1:=FINONE(246,0,0);

R3R2:=FINONE(246,0,1);

JG:=(S3S1>0);

机1构:=IF(JG,'机构● ',DRAWNULL);

机:=STRCAT(机1构,STRCAT(CON2STR(S3S1,0),STRCAT(' 家▲增减 ',STRCAT(CON2STR(R3R1-R3R2,0),' 家'))));

DRAWTEXT_FIX(FINVALUE(246)>0 AND PERIOD=5,0.71,0.15,0,机),COLORMAGENTA;

调研次数:GPJYVALUE(10,1,1),COLORFFFFFF,NODRAW;

调研数量:GPJYVALUE(10,2,1),COLOR00FFFF,NODRAW;

{加权ROE 20221005 净资产收益率ROE, 显示每个季度ROE走势图}

加权ROE:FINVALUE(281),COLORFFFFFF,NODRAW;

联系我们 - QQ: 88652583
© 2014 www.93stock.com
代写选股公式网!
声明:警惕假冒分子冒充本站提供证券咨询服务,选股公式网为非证券咨询机构,本站不提供有关股评、投资分析报告、股市预测,证券咨询等服务。本站仅提供股票、期货、黄金、外汇的软件技术交流与分享。本站文章为互联网文章,其仅供参考,并不构成投资建议。