换手率=vol/SHGZG*100;
A1=REPDATE(&GDZS,1,0);/*最近一次日期*/
A2=REPDATE(&GDZS,2,0);/*最近一次日期*/
日数=BArslAST(A1<>REF(A1,1))+1;/*上一次报告期不一致时，至今日数*/
n=1;
累=0;
IF 日数=1 THEN
{WHILE n<100 DO
{IF A2<>REF(A1,n) THEN
{BREAK;}
累=累+REF(换手率,n);
n=n+1;}}
累换:=BacKSET(累,n),colorgreen;
/*流通比例=（1-十大流通股东比例）*/
流=100-JGCGS/SHGZG*100;
/*理论股东变化*/
gd=累/流;
/*真实股东变化*/
B1=GDZS;
B2=LASTREP(&GDZS,2);/*上次股东户数*/
B3=(B1/B2-1)*100;/*真实股东变化率*/
吸筹比例:BACKSET(B3/gd,n);
HORLINE(1,0,0,3),colorblack;

声明：本站所有文章，如无特殊说明或标注，均为本站原创发布。任何个人或组织，在未征得本站同意时，禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益，可联系我们进行处理。