天机论坛

 找回密码
 欢迎注册

QQ登录

只需一步,快速开始

天机股票网 争做最牛的股票资讯集散地 注册 - 常见问题 - 联系方式

你有好料 就来分享 你可以将手中的好料分享赚取金币。 如何获得金币 - 金币回购计划

天天来访问 天天有收获 高端信息区区几个金币就可查看 立即注册 - QQ快速登陆

查看: 2069|回复: 0

[大智慧] 大智慧选股 十大股东自然人8个以上,占比30% 源码

[复制链接]
发表于 2015-5-5 08:47:08 | 显示全部楼层 |阅读模式

流通盘万股:=CAPITAL/10000;


第1持股:=PFFIN(4002,0)/10000;
第2持股:=PFFIN(4012,0)/10000;
第3持股:=PFFIN(4022,0)/10000;
第4持股:=PFFIN(4032,0)/10000;
第5持股:=PFFIN(4042,0)/10000;
第6持股:=PFFIN(4052,0)/10000;
第7持股:=PFFIN(4062,0)/10000;
第8持股:=PFFIN(4072,0)/10000;
第9持股:=PFFIN(4082,0)/10000;
第10持股:=PFFIN(4092,0)/10000;
flag1:=ABS(ABS(STRCMP( STRLEFT(PFstr(4001,0),8),STRRIGHT(PFstr(4001,0),8)))-1);
flag2:=ABS(ABS(STRCMP( STRLEFT(PFstr(4011,0),8),STRRIGHT(PFstr(4011,0),8)))-1);
flag3:=ABS(ABS(STRCMP( STRLEFT(PFstr(4021,0),8),STRRIGHT(PFstr(4021,0),8)))-1);
flag4:=ABS(ABS(STRCMP( STRLEFT(PFstr(4031,0),8),STRRIGHT(PFstr(4031,0),8)))-1);
flag5:=ABS(ABS(STRCMP( STRLEFT(PFstr(4041,0),8),STRRIGHT(PFstr(4041,0),8)))-1);
flag6:=ABS(ABS(STRCMP( STRLEFT(PFstr(4051,0),8),STRRIGHT(PFstr(4051,0),8)))-1);
flag7:=ABS(ABS(STRCMP( STRLEFT(PFstr(4061,0),8),STRRIGHT(PFstr(4061,0),8)))-1);
flag8:=ABS(ABS(STRCMP( STRLEFT(PFstr(4071,0),8),STRRIGHT(PFstr(4071,0),8)))-1);
flag9:=ABS(ABS(STRCMP( STRLEFT(PFstr(4081,0),8),STRRIGHT(PFstr(4081,0),8)))-1);
flag10:=ABS(ABS(STRCMP( STRLEFT(PFstr(4091,0),8),STRRIGHT(PFstr(4091,0),8)))-1);
VAR1:=(第1持股*flag1+第2持股*flag2+第3持股*flag3+第4持股*flag4+第5持股*flag5+第6持股*flag6+第7持股*flag7+第8持股*flag8+第9持股*flag9+第10持股*flag10)/流通盘万股;
CON1:=VAR1>30;
CON2:=(flag1+flag2+flag3+flag4+flag5+flag6+flag7+flag8+flag9+flag10)>=8;
con:con1 or con2;

2015550302185179.rar

4.93 KB, 下载次数: 0

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 欢迎注册

本版积分规则