股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 「指标」四年每季报的股东人数变化百分比副图指标 源码 通达信 贴图


    [-----复制链接-----]

22万

主题

22万

帖子

14

精华

积分
11018
楼主
2023-12-31 23:13:57
【资料名称】:四年每季报的股东人数变化百分比副图指标 源码 通达信 贴图介绍
【资料描述】:

四年每季报的股东人数变化百分比副图指标 源码 通达信 贴图

需要先下载专业财务数据后,使用附图指标显示

{四年每季报的股东人数变化百分比}
AS:=FINONE(242,2020,0930);
AE:=FINONE(242,2020,0630);
AY:=FINONE(242,2020,0331);
BSJ:=FINONE(242,2019,1231);
BS:=FINONE(242,2019,0930);
BE:=FINONE(242,2019,0630);
BY:=FINONE(242,2019,0331);
CSJ:=FINONE(242,2018,1231);
CS:=FINONE(242,2018,0930);
CE:=FINONE(242,2018,0630);
CY:=FINONE(242,2018,0331);
DSJ:=FINONE(242,2017,1231);
DS:=FINONE(242,2017,0930);
DE:=FINONE(242,2017,0630);
DY:=FINONE(242,2017,0331);
ESJ:=FINONE(242,2016,1231);
ASJA:=(AS-AE)/AE*100;
AEJA:=(AE-AY)/AY*100;
AYJA:=(AY-BSJ)/BSJ*100;
BSJJ:=(BSJ-BS)/BS*100;
BSJA:=(BS-BE)/BE*100;
BEJA:=(BE-BY)/BY*100;
BYJA:=(BY-CSJ)/CSJ*100;
CSJJ:=(CSJ-CS)/CS*100;
CSJA:=(CS-CE)/CE*100;
CEJA:=(CE-CY)/CY*100;
CYJA:=(CY-DSJ)/DSJ*100;
DSJJ:=(DSJ-DS)/DS*100;
DSJA:=(DS-DE)/DE*100;
DEJA:=(DE-DY)/DY*100;
DYJA:=(DY-ESJ)/ESJ*100;
DRAWTEXT_FIX(ASJA>=0,0.60,0.00,0,STRCAT('2020三季: ',STRCAT(VAR2STR(ASJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(ASJA<0,0.60,0.00,0,STRCAT('2020三季: ',STRCAT(VAR2STR(ASJA,2),'%'))),COLORGREEN;
DRAWTEXT_FIX(AEJA>=0,0.70,0.00,0,STRCAT('2020二季: ',STRCAT(VAR2STR(AEJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(AEJA<0,0.70,0.00,0,STRCAT('2020二季: ',STRCAT(VAR2STR(AEJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(AYJA>=0,0.80,0.00,0,STRCAT('2020一季: ',STRCAT(VAR2STR(AYJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(AYJA<0,0.80,0.00,0,STRCAT('2020一季: ',STRCAT(VAR2STR(AYJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(BSJJ>=0,0.50,0.05,0,STRCAT('2019四季: ',STRCAT(VAR2STR(BSJJ,2),'%'))),COLORRED;
DRAWTEXT_FIX(BSJJ<0,0.50,0.05,0,STRCAT('2019四季: ',STRCAT(VAR2STR(BSJJ,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(BSJA>=0,0.60,0.05,0,STRCAT('2019三季: ',STRCAT(VAR2STR(BSJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(BSJA<0,0.60,0.05,0,STRCAT('2019三季: ',STRCAT(VAR2STR(BSJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(BEJA>=0,0.70,0.05,0,STRCAT('2019二季: ',STRCAT(VAR2STR(BEJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(BEJA<0,0.70,0.05,0,STRCAT('2019二季: ',STRCAT(VAR2STR(BEJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(BYJA>=0,0.80,0.05,0,STRCAT('2019一季: ',STRCAT(VAR2STR(BYJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(BYJA<0,0.80,0.05,0,STRCAT('2019一季: ',STRCAT(VAR2STR(BYJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(CSJJ>=0,0.50,0.10,0,STRCAT('2018四季: ',STRCAT(VAR2STR(CSJJ,2),'%'))),COLORRED;
DRAWTEXT_FIX(CSJJ<0,0.50,0.10,0,STRCAT('2018四季: ',STRCAT(VAR2STR(CSJJ,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(CSJA>=0,0.60,0.10,0,STRCAT('2018三季: ',STRCAT(VAR2STR(CSJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(CSJA<0,0.60,0.10,0,STRCAT('2018三季: ',STRCAT(VAR2STR(CSJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(CEJA>=0,0.70,0.10,0,STRCAT('2018二季: ',STRCAT(VAR2STR(CEJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(CEJA<0,0.70,0.10,0,STRCAT('2018二季: ',STRCAT(VAR2STR(CEJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(CYJA>=0,0.80,0.10,0,STRCAT('2018一季: ',STRCAT(VAR2STR(CYJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(CYJA<0,0.80,0.10,0,STRCAT('2018一季: ',STRCAT(VAR2STR(CYJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(DSJJ>=0,0.50,0.15,0,STRCAT('2017四季: ',STRCAT(VAR2STR(DSJJ,2),'%'))),COLORRED;
DRAWTEXT_FIX(DSJJ<0,0.50,0.15,0,STRCAT('2017四季: ',STRCAT(VAR2STR(DSJJ,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(DSJA>=0,0.60,0.15,0,STRCAT('2017三季: ',STRCAT(VAR2STR(DSJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(DSJA<0,0.60,0.15,0,STRCAT('2017三季: ',STRCAT(VAR2STR(DSJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(DEJA>=0,0.70,0.15,0,STRCAT('2017二季: ',STRCAT(VAR2STR(DEJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(DEJA<0,0.70,0.15,0,STRCAT('2017二季: ',STRCAT(VAR2STR(DEJA,2),'%'))),,COLORGREEN;
DRAWTEXT_FIX(DYJA>=0,0.80,0.15,0,STRCAT('2017一季: ',STRCAT(VAR2STR(DYJA,2),'%'))),COLORRED;
DRAWTEXT_FIX(DYJA<0,0.80,0.15,0,STRCAT('2017一季: ',STRCAT(VAR2STR(DYJA,2),'%'))),,COLORGREEN;


 






gd61481


【下载地址隐藏】:                    点:回复可见地址
游客,如果您要查看本帖隐藏内容请回复






上一篇:「指标」试探果断介入副图指标 源码 通达信 附图
下一篇:「指标」板后回踩副图/选股预警 源码 通达信 贴图
回复

举报

QQ|

GMT+8, 2024-9-20 21:17

快速回复 返回顶部 返回列表