通达信智能化显示股东人数的变化主图指标 源码附图

来函数检测结果如下：
该公式没有未来函数

GDRS:=GPJYVALUE(1,1,1);
TS:=BARSLAST(GDRS!=REF(GDRS,1));
人数变化:=100*REF(GDRS,TS)/REF(GDRS,TS+1)-100;
TS1:=BARSLAST(GDRS<REF(GDRS,1));
连升:=SUM(GDRS>REF(GDRS,1),TS1+1);
连升幅度:=IF(连升>=1,100*GDRS/REF(GDRS,IF(TS1=DRAWNULL,BARSCOUNT(C),TS1))-100,0);
TS2:=BARSLAST(GDRS>REF(GDRS,1));
连降:=SUM(GDRS<REF(GDRS,1),TS2+1);
连降幅度:=IF(连降>=1,100*GDRS/REF(GDRS,IF(TS2=DRAWNULL,BARSCOUNT(C),TS2))-100,0);
DRAWTEXT_FIX(ISLASTBAR,0.005,0.26,0,IF(连升>1,STRCAT('股东人数',STRCAT(CON2STR(连升,0),STRCAT('连升:',STRCAT('+',STRCAT(CON2STR(连升幅度,5),'%'))))),
IF(连升=1,STRCAT('股东人数变化:',STRCAT('+',STRCAT(CON2STR(人数变化,5),'%'))),DRAWNULL))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.26,0,IF(连降>1,STRCAT('股东人数',STRCAT(CON2STR(连降,0),STRCAT('连降:',STRCAT(CON2STR(连降幅度,5),'%')))),
IF(连降=1,STRCAT('股东人数变化:',STRCAT('-',STRCAT(CON2STR(人数变化,5),'%'))),DRAWNULL))),COLORGREEN;

原理解析：
GDRS赋值:GPJYVALUE(1,1,1)
TS赋值:上次GDRS!=1日前的GDRS距今天数
人数变化赋值:100*TS日前的GDRS/TS+1日前的GDRS-100
TS1:=上次GDRS<1日前的GDRS距今天数
连升赋值:TS1+1的GDRS>1日前的GDRS日累和
连升幅度:=IF(连升>=1,100*GDRS/REF(GDRS,IF(TS1=DRAWNULL,C的有效数据周期数,TS1))-100,0)
TS2:=上次GDRS>1日前的GDRS距今天数
连降赋值:TS2+1的GDRS<1日前的GDRS日累和
连降幅度:=IF(连降>=1,100*GDRS/REF(GDRS,IF(TS2=DRAWNULL,C的有效数据周期数,TS2))-100,0)
DRAWTEXT_FIX(ISLASTBAR,0.005,0.26,0,IF(连升>1,STRCAT('股东人数',STRCAT(CON2STR(连升,0),STRCAT('输出连升:',STRCAT('+',STRCAT(CON2STR(连升幅度,5),'%'))))),IF(连升=1,STRCAT('股东输出人数变化:',STRCAT('+',STRCAT(CON2STR(人数变化,5),'%'))),DRAWNULL))),画红色
DRAWTEXT_FIX(ISLASTBAR,0.005,0.26,0,IF(连降>1,STRCAT('股东人数',STRCAT(CON2STR(连降,0),STRCAT('输出连降:',STRCAT(CON2STR(连降幅度,5),'%')))),IF(连降=1,STRCAT('股东输出人数变化:',STRCAT('-',STRCAT(CON2STR(人数变化,5),'%'))),DRAWNULL))),画绿色