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

[复制链接]
查看36 | 回复0 | 2022-7-11 09:48:06 | 显示全部楼层 |阅读模式
需要先下载专业财务数据后,使用附图指标显示 {四年每季报的股东人数变化百分比}
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;
 

20213299104111708.png

20213299104111708.png

2021329911384761.rar

3.63 KB, 下载次数: 0

售价: 1 金钱  [记录]  [购买]

2021329911384761.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则