通达信采集实控人、财务数据、十大流通股东小工具 附主副图指标

{归属净利润}
VA1:=FINVALUE(0);
VA2:=INTPART(VA1/10000);
VA3:=VA1-VA2*10000;
VA4:=IF(VA3=1231,VA2,VA2-1);
净利润1:FINONE(95,VA4,1231)/100000000 NODRAW;
净利润2:FINONE(95,VA4-1,1231)/100000000 NODRAW;
净利润3:FINONE(95,VA4-2,1231)/100000000 NODRAW;
股东数:GPJYVALUE(1,1,1)/10000 NODRAW;
流通市值:C*FINVALUE(266)/100000000,NODRAW,COLORLIBLUE{亿};
当天流通值:=CAPITAL*C ;
交易额:=AMOUNT ;
交易占比:交易额/当天流通值 NODRAW;

每股收益:FINANCE(38) NODRAW;
利润比:FINANCE(43) NODRAW;

市盈TTM:DYNAINFO(40) NODRAW;

市盈动: DYNAINFO(39) NODRAW;

ZDJS:=IF(CODELIKE('880005'), 1, 0);
M10:=IF(ZDJS=0,MA(C,10),DRAWNULL);
M21:=IF(ZDJS=0,MA(C,21),DRAWNULL);
M25:IF(ZDJS=0,MA(C,25),DRAWNULL),COLORYELLOW;
M60:IF(ZDJS=0,MA(C,60),DRAWNULL),COLORRED;
M300:=IF(ZDJS=0,MA(C,300),DRAWNULL);

{填充线宽度}
W1:=3;
W0:=0;
{判断涨跌幅限制，涨跌停价格}
CYB:=IF(INBLOCK('创业板'), 1, 0);
ZDF:=IF(INBLOCK('科创板'),0.2,IF(INBLOCK('ST板块'), 0.05, 0.1));
ZT:=ZTPRICE(REF(CLOSE,1), ZDF);
DT:=DTPRICE(REF(CLOSE,1), ZDF);
ZT1:=ZTPRICE(REF(CLOSE,1), 0.1);
ZT2:=ZTPRICE(REF(CLOSE,1), 0.2);
DT1:=DTPRICE(REF(CLOSE,1), 0.1);
DT2:=DTPRICE(REF(CLOSE,1), 0.2);

{非创业板涨跌停}
NOCYB:=CYB=0 AND ZDJS=0;
STICKLINE((NOCYB AND C>=ZT AND C=H), O, C, W1, 0),COLORYELLOW;
STICKLINE((NOCYB AND C<=DT AND C=L), O, C, W1, 0),COLORGREEN;
STICKLINE((NOCYB AND L<=DT AND CL), L, C, 0, 0),COLORGREEN;{曾跌停阳线}

{炸板}
STICKLINE((NOCYB AND CDT AND CSTICKLINE((NOCYB AND CO), O, C, W1, 0), COLORFF4DFF;

{创业板改革日分割线}
GGR:=1200824;{改革日}
STICKLINE(DATE=GGR AND (CYB=1 OR CODELIKE('8808')), CONST(LLV(L,120)), CONST(HHV(H,120)), W0, 0),COLOR5C979C;

{创业板涨停跌停}
STICKLINE((CYB=1 AND DATE>=GGR AND C>=ZT2 AND C=H), O, C, W1, 0), COLORYELLOW;
STICKLINE((CYB=1 AND DATE=ZT AND C=H), O, C, W1, 0), COLORYELLOW;
STICKLINE((CYB=1 AND DATE
{炸板}
STICKLINE((CYB=1 AND DATEDT AND CSTICKLINE((CYB=1 AND DATEO), O, C, W1, 0), COLORFF4DFF;
STICKLINE((CYB=1 AND DATE>=GGR AND CDT AND C
{所有板块：涨跌幅大于10个点}
STICKLINE((C>ZT1 AND CO AND ZDJS=0), O, C, W1, 0), COLOR00AAFF;
STICKLINE((CZT2 AND C>O AND ZDJS=0), O, C, W1, 0), COLOR0066CC;
STICKLINE((C<=DT1 AND C


{自定义数据}
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(1,0,0,0,'股东数据：')COLOR00CCFF;
DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,EXTERNSTR(0,503)),COLORYELLOW;{股东数据}

DRAWTEXT_FIX(1,0,0.05,0,'概念：')COLOR00CCFF;
DRAWTEXT_FIX(ISLASTBAR,0.05,0.05,0,STRCAT(Z3,GNBLOCK)),COLOR00CCFF;

DRAWTEXT_FIX(1,0,0.10,0,'实际控制人：')COLOR00CCFF;
DRAWTEXT_FIX(ISLASTBAR,0.05,0.10,0,EXTERNSTR(0,500)),COLORRED;{实控人}

DRAWTEXT_FIX(1,0,0.15,0,'公司亮点：')COLOR00CCFF;
DRAWTEXT_FIX(ISLASTBAR,0.05,0.15,0,EXTERNSTR(0,501)),COLORGREEN;{企业亮点}

DRAWTEXT_FIX(1,0,0.20,0,'主营业务：')COLOR00CCFF;
DRAWTEXT_FIX(ISLASTBAR,0.05,0.20,0,EXTERNSTR(0,502)),COLORGREEN;{个股股性};