大股东，基金增持减持监控指标公式（的）[大智慧公式]

相关标签:持股5以上股东增持规定 、 大股东为什么减持股票 、 持股5以上股东减持规定 、 5以下股东减持规定 、 大股东连续减持的股票 、 持股超过5%股东减持 、 大股东减持公告后股价 、 股东减持后股票会涨吗 、 大股东减持股票规定 、 大股东减持股票上涨 、 股票股东减持是好是坏 、 大股东质押股票后走势 、

飞狐公式源码：

原理解析：
VERTLINE(日期=1080303),画绿色,线宽为1 VERTLINE(日期=1071228),画绿色,线宽为1 VERTLINE(日期=1070928),画绿色,线宽为1 当满足条件日期=1080303时,在5位置书写文字,画黄色 当满足条件日期=1071228时,在5位置书写文字,画黄色 当满足条件日期=1070928时,在5位置书写文字,画黄色,ALIGN2 10,画黑色 0,画黑色 当满足条件SYSPARAM(2)=BARPOS时,在收盘价位置书写文字,SHIFT5,COLORCCFFFF,ALIGN4,线宽为3 开始序号赋值:F10FIND('大流通股东持股(万股) ',5000) 增减判断赋值:如果字符串比较=0,返回1,否则返回-1 输出大股东增减:STRTONUM(F10TEXT(开始序号+56,4))*增减判断,线宽为0 FILLRGN(日期<=1080301 AND 日期>=1080103 AND 大股东增减>=0,0,大股东增减),画红色 FILLRGN(日期<=1080301 AND 日期>=1080103 AND 大股东增减<0,0,大股东增减),画绿色 当满足条件SYSPARAM(2)=BARPOS时,在收盘价位置书写文字,SHIFT5,COLORCCFFFF,ALIGN4, 开始序号2赋值:F10FIND('基金持股(万股) ',5000) 增减判断2赋值:如果字符串比较=0,返回1,否则返回-1 输出基金增减:STRTONUM(F10TEXT(开始序号2+56,4))*增减判断2,线宽为0 当满足条件SYSPARAM(2)=BARPOS时,在收盘价位置书写文字,SHIFT5,COLORCCFFFF,ALIGN4, FILLRGN(日期<=1080101 AND 日期>=1071001 AND 基金增减<=0,0,基金增减),画绿色 FILLRGN(日期<=1080101 AND 日期>=1071001 AND 基金增减>0,0,基金增减),画红色 公式源码都在上面了，下面是现成的公式，采用密码加密，需要看源码的，请输入密码：889966，或者看上面的源码可以了。部分由于股改，解冻股上市，改变了大股东持有流通股东情况，这种影响，大家一定要手工剔除

 来源:程序化99（ WWW.CXH99.COM ）

源码：

VERTLINE(DATE=1080303),COLORGREEN,LINETHICK1;
VERTLINE(DATE=1071228),COLORGREEN,LINETHICK1;
VERTLINE(DATE=1070928),COLORGREEN,LINETHICK1;
DRAWTEXT(DATE=1080303,5,'2008年3月'),COLORYELLOW;
DRAWTEXT(DATE=1071228,5,'2007年12月'),COLORYELLOW;
DRAWTEXT(DATE=1070928,5,'2007年9月'),COLORYELLOW,ALIGN2;
10,COLORBLACK;0,COLORBLACK;
DRAWTEXT(sysparam(2)=BARPOS,c,F10TEXT(10,88)+'d\n\n注意剔除股改后国家股流上市通造成的流通股变化的影响'),shift5,COLORccffff,ALIGN4,LINETHICK3;
开始序号:=F10FIND('大流通股东持股(万股) ',5000);
增减判断:=IF(STRCMP(F10TEXT(开始序号+52,4),'增加')=0,1,-1);
大股东增减:STRTONUM(F10TEXT(开始序号+56,4))*增减判断,LINETHICK0;
FILLRGN(DATE<=1080301 AND DATE>=1080103 and 大股东增减>=0,0,大股东增减),COLORRED;
FILLRGN(DATE<=1080301 AND DATE>=1080103 AND 大股东增减<0,0,大股东增减),COLORGREEN;
DRAWTEXT(sysparam(2)=BARPOS,c,' \n \n'+F10TEXT(开始序号,64)),shift5,COLORccffff,ALIGN4,;
开始序号2:=F10FIND('基金持股(万股) ',5000);
增减判断2:=IF(STRCMP(F10TEXT(开始序号2+52,4),'增加')=0,1,-1);
基金增减:STRTONUM(F10TEXT(开始序号2+56,4))*增减判断2,LINETHICK0;
DRAWTEXT(sysparam(2)=BARPOS,c,' \n \n \n'+F10TEXT(开始序号2,64)),shift5,COLORccffff,ALIGN4,;
FILLRGN(DATE<=1080101 AND DATE>=1071001 and 基金增减<=0,0,基金增减),COLORGREEN;
FILLRGN(DATE<=1080101 AND DATE>=1071001 and 基金增减>0,0,基金增减),COLORred;

公式源码都在上面了，下面是现成的公式，采用密码加密，需要看源码的，请输入密码：889966，或者看上面的源码可以了。{程序化交易 www.cxh99.com }
部分由于股改，解冻股上市，改变了大股东持有流通股东情况，这种影响，大家一定要手工剔除

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】