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

 

{归属净利润}
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 C<ZT AND C>L), L, C, 0, 0),COLORGREEN;{曾跌停阳线}

{炸板}
STICKLINE((NOCYB AND C<ZT AND H=ZT AND C>DT AND C<O),O, C, W1, 0), COLORFF4D88;
STICKLINE((NOCYB AND C<ZT AND H=ZT AND C>O), 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<GGR AND C>=ZT AND C=H), O, C, W1, 0), COLORYELLOW;
STICKLINE((CYB=1 AND DATE<GGR AND C<=DT AND C=L), O, C, W1, 0), COLORGREEN;

{炸板}
STICKLINE((CYB=1 AND DATE<GGR AND C<ZT AND H=ZT AND C>DT AND C<O),O, C, W1, 0), COLORFF4DFF;
STICKLINE((CYB=1 AND DATE<GGR AND C<ZT AND H=ZT AND C>O), O, C, W1, 0), COLORFF4DFF;
STICKLINE((CYB=1 AND DATE>=GGR AND C<ZT AND H=ZT2 AND C>DT AND C<O),O, C, W1, 0), COLORFF4DFF;

{所有板块:涨跌幅大于10个点}
STICKLINE((C>ZT1 AND C<ZT2 AND C>O AND ZDJS=0), O, C, W1, 0), COLOR00AAFF;
STICKLINE((C<H AND C>ZT2 AND C>O AND ZDJS=0), O, C, W1, 0), COLOR0066CC;
STICKLINE((C<=DT1 AND C<O AND ZDJS=0), O, C, W1, 0), COLORGREEN;



{自定义数据}
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;{个股股性};



来函数检测结果如下
该公式包含未来函数:CAPITAL
该公式包含未来函数:DYNAINFO
该公式包含未来函数:FINANCE

解密、定制、编写公式指标请联系QQ或微信同号:88652583
置顶指标

相关指标公式

VA1赋值:引用0号ID的序列数据
VA2赋值:VA1/10000的整数部分
VA3赋值:VA1-VA2*10000
VA4赋值:如果VA3=1231,返回VA2,否则返回VA2-1
输出净利润1:专业财务数据(指定日期)/100000000 NODRAW
输出净利润2:专业财务数据(指定日期)/100000000 NODRAW
输出净利润3:专业财务数据(指定日期)/100000000 NODRAW
输出股东数:引用1号ID的序列数据/10000 NODRAW
输出流通市值:收盘价*引用266号ID的序列数据/100000000,NODRAW,画淡蓝色
当天流通值赋值:当前流通股本(手)*收盘价
交易额赋值:成交额(元)
输出交易占比:交易额/当天流通值 NODRAW
输出每股收益:每股收益(最近一期) NODRAW
输出利润比:利润同比% NODRAW
输出市盈TTM:市盈(TTM) NODRAW
输出市盈动: 市盈(动) NODRAW
ZDJS赋值:如果模糊匹配品种代码,返回1,否则返回0
M10赋值:如果ZDJS=0,返回收盘价的10日简单移动平均,否则返回无效数
M21赋值:如果ZDJS=0,返回收盘价的21日简单移动平均,否则返回无效数
输出M25:如果ZDJS=0,返回收盘价的25日简单移动平均,否则返回无效数,画黄色
输出M60:如果ZDJS=0,返回收盘价的60日简单移动平均,否则返回无效数,画红色
M300赋值:如果ZDJS=0,返回收盘价的300日简单移动平均,否则返回无效数
W1赋值:3
W0赋值:0
CYB赋值:如果属于某板块,返回1,否则返回0
ZDF赋值:如果属于某板块,返回0.2,否则返回如果属于某板块,返回0.05,否则返回0.1
ZT赋值:计算涨停价
DT赋值:计算跌停价
ZT1赋值:计算涨停价
ZT2赋值:计算涨停价
DT1赋值:计算跌停价
DT2赋值:计算跌停价
NOCYB赋值:CYB=0 AND ZDJS=0
当满足条件(NOCYBANDC>=ZTANDC=最高价)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱.,画黄色
当满足条件(NOCYBANDC<=DTANDC=最低价)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱.,画绿色
当满足条件(NOCYBANDL<=DTANDC最低价)时,在最低价和收盘价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画绿色
当满足条件(NOCYBANDCDTANDC<开盘价)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱., COLORFF4D88
当满足条件(NOCYBANDC开盘价)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱., COLORFF4DFF
GGR赋值:1200824
当满足条件日期=GGRAND(CYB=1ORCODELIKE('8808'))时,在120日内最低价的最低值的最后一日取值设为常数和120日内最高价的最高值的最后一日取值设为常数位置之间画柱状线,宽度为W0,0不为0则画空心柱.,COLOR5C979C
当满足条件(CYB=1ANDDATE>=GGRANDC>=ZT2ANDC=最高价)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱., 画黄色
当满足条件(CYB=1ANDDATE=ZTANDC=最高价)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱., 画黄色
当满足条件(CYB=1ANDDATE当满足条件(CYB=1ANDDATEDTANDC<开盘价)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱., COLORFF4DFF
当满足条件(CYB=1ANDDATE开盘价)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱., COLORFF4DFF
当满足条件(CYB=1ANDDATE>=GGRANDCDTANDC<开盘价)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱., COLORFF4DFF
当满足条件(收盘价>ZT1ANDCOANDZDJS=0)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱., COLOR00AAFF
当满足条件(收盘价ZT2ANDC>OANDZDJS=0)时,在开盘价和收盘价位置之间画柱状线,宽度为W1,0不为0则画空心柱., COLOR0066CC
当满足条件(收盘价<=DT1ANDCZ1赋值:字符串相加
Z2赋值:字符串相加
Z3赋值:字符串相加
当满足条件1时,在横轴0纵轴0位置书写文字COLOR00CCFF
当满足条件是否最后一个周期时,在横轴0.05纵轴0位置书写文字,画黄色
当满足条件1时,在横轴0纵轴0.05位置书写文字COLOR00CCFF
当满足条件是否最后一个周期时,在横轴0.05纵轴0.05位置书写文字,COLOR00CCFF
当满足条件1时,在横轴0纵轴0.10位置书写文字COLOR00CCFF
当满足条件是否最后一个周期时,在横轴0.05纵轴0.10位置书写文字,画红色
当满足条件1时,在横轴0纵轴0.15位置书写文字COLOR00CCFF
当满足条件是否最后一个周期时,在横轴0.05纵轴0.15位置书写文字,画绿色
当满足条件1时,在横轴0纵轴0.20位置书写文字COLOR00CCFF
当满足条件是否最后一个周期时,在横轴0.05纵轴0.20位置书写文字,画绿色

指标安装下载帮助  |   联系我们  |  乐淘公式网  |  公式网   |  指标公式  |   加入收藏   |  设为主页

@2005-2025 浙ICP备2024071487号-1 乐淘公式网公式网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
免责声明:乐淘公式网所有指标公式及文章由网络收集,不保障实时性和真实性, 仅供学习研究并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。
QQ:88652583 微信 88652583
sitemap站点地图