飞狐公式源码：
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，或者看上面的源码可以了。

部分由于股改，解冻股上市，改变了大股东持有流通股东情况，这种影响，大家一定要手工剔除