找回密码
 立即注册

QQ登录

只需一步,快速开始

广告载入中...
查看: 7921|回复: 27

股东户数+户均持股+选股

[复制链接]
发表于 2016-7-13 22:01 | 显示全部楼层 |阅读模式

马上注册,享用更多功能,让你轻松玩转本论坛。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
本帖最后由 zjtz288 于 2016-7-13 22:03 编辑


炒股赚钱重要 但是健康最重要


{2-户均持股:}{查找F10中股东人数的位置:}gdstar:=F10FIND('┃股东户数',1);
{取对应的数据资料:}       gdw1:=F10FIND('┃04-09-30',gdstar);gdw2:=F10FIND('┃04-06-30',gdw1);
                         gdw3:=F10FIND('┃04-03-31',gdw3);gdw4:=F10FIND('┃03-12-31',gdw1);
{转换字符串为数值:}       gdtx1:=F10TEXT(gdw1+28,8);gdtx2:=F10TEXT(gdw2+28,8);
                         gdtx3:=F10TEXT(gdw3+28,8);gdtx4:=F10TEXT(gdw4+28,8);
{转换字符串为数值:}       gd1:=STRTONUM(gdtx1); gd2:=STRTONUM(gdtx2);
                         gd3:=STRTONUM(gdtx3); gd4:=STRTONUM(gdtx4);
{显示一:解盘显示户均持股}EXPLAIN(gdw1>1,'04-09-30 股/户:'+gdtx1);
                        EXPLAIN(gdw2>1,'04-06-30 股/户:'+gdtx2);
                        EXPLAIN(gdw3>1,'04-03-31 股/户:'+gdtx3);
                        EXPLAIN(gdw4>1,'03-12-31 股/户:'+gdtx4);
{显示二:对应显示户均持股在K线上:}
                        DRAWNUMBER(DATE=1041008,CLOSE,gd1,0),ALIGN4,COLORRED;
                        DRAWNUMBER(DATE=1040630,CLOSE,gd2,0),ALIGN4,COLORRED;
                        DRAWNUMBER(DATE=1040331,CLOSE,gd3,0),ALIGN4,COLORRED;
                        DRAWNUMBER(DATE=1031231,CLOSE,gd4,0),ALIGN4,COLORRED;
户均持股49:gd1;{2004 3季报户均持股量}  
户均持46:gd2; {2004 2季报户均持股量}
户均持43:gd3; {2004 1季报户均持股量}
户均持312:gd4;{2003 年报户均持股量}
递增:gd1>gd2 and gd2>gd3 and gd3>gd4;
户均3至5千且递增:gd1>3000 and gd1<5000 and 递增;


{基于鹏搏资讯,因为F10资料经常变动,所以在变动后,需要对应调整,可做主图}

gdstar:=F10FIND('┃股东户数',1);
{查找F10中股东人数的位置}
gdw1:=f10find('┃04-09-30',gdstar);
gdw2:=f10find('┃04-06-30',gdw1);
gdw3:=f10find('┃04-03-31',gdw2);
gdw4:=f10find('┃03-12-31',gdw3);
{取对应的数据资料}
gdtx1:=F10TEXT(gdw1+10,8);gdtx2:=F10TEXT(gdw2+10,8);
gdtx3:=F10TEXT(gdw3+10,8);gdtx4:=F10TEXT(gdw4+10,8);
{转换字符串为数值}
gd1:=STRTONUM(gdtx1);gd2:=STRTONUM(gdtx2);
gd3:=STRTONUM(gdtx3);gd4:=STRTONUM(gdtx4);
{显示方法一:解盘显示股东人数变动}
EXPLAIN(gdw1>1,'04-09-30 总户数:'+gdtx1);
EXPLAIN(gdw2>1,'04-06-30 总户数:'+gdtx2);
EXPLAIN(gdw3>1,'04-03-31 总户数:'+gdtx3);
EXPLAIN(gdw4>1,'03-12-31 总户数:'+gdtx4);
{显示方法二:对应显示在 K 线上}
DRAWNUMBER(date=1040930,c,gd1,0),ALIGN5;
DRAWNUMBER(date=1040630,c,gd2,0),ALIGN5;
DRAWNUMBER(date=1040331,c,gd3,0),ALIGN5;
DRAWNUMBER(date=1031231,c,gd4,0),ALIGN5;
{显示方法三:对应显示为拄状线,附图时用}
STICKLINE(BETWEEN(date,1040929,1041231),gd1/10,gd1,8,0);
STICKLINE(BETWEEN(date,1040629,1040930),gd1/10,gd2,8,0);
STICKLINE(BETWEEN(date,1040330,1040630),gd1/10,gd3,8,0);
STICKLINE(BETWEEN(date,1031231,1040331),gd1/10,gd4,8,0);



本帖被以下淘专辑推荐:

发表于 2019-10-24 06:51 | 显示全部楼层
{2-户均持股:}{查找F10中股东人数的位置:}gdstar:=F10FIND('┃股东户数',1);
{取对应的数据资料:}       gdw1:=F10FIND('┃04-09-30',gdstar);gdw2:=F10FIND('┃04-06-30',gdw1);
                         gdw3:=F10FIND('┃04-03-31',gdw3);gdw4:=F10FIND('┃03-12-31',gdw1);
{转换字符串为数值:}       gdtx1:=F10TEXT(gdw1+28,8);gdtx2:=F10TEXT(gdw2+28,8);
                         gdtx3:=F10TEXT(gdw3+28,8);gdtx4:=F10TEXT(gdw4+28,8);
{转换字符串为数值:}       gd1:=STRTONUM(gdtx1); gd2:=STRTONUM(gdtx2);
                         gd3:=STRTONUM(gdtx3); gd4:=STRTONUM(gdtx4);
{显示一:解盘显示户均持股}EXPLAIN(gdw1>1,'04-09-30 股/户:'+gdtx1);
                        EXPLAIN(gdw2>1,'04-06-30 股/户:'+gdtx2);
                        EXPLAIN(gdw3>1,'04-03-31 股/户:'+gdtx3);
                        EXPLAIN(gdw4>1,'03-12-31 股/户:'+gdtx4);
{显示二:对应显示户均持股在K线上:}
                        DRAWNUMBER(DATE=1041008,CLOSE,gd1,0),ALIGN4,COLORRED;
                        DRAWNUMBER(DATE=1040630,CLOSE,gd2,0),ALIGN4,COLORRED;
                        DRAWNUMBER(DATE=1040331,CLOSE,gd3,0),ALIGN4,COLORRED;
                        DRAWNUMBER(DATE=1031231,CLOSE,gd4,0),ALIGN4,COLORRED;
户均持股49:gd1;{2004 3季报户均持股量}  
户均持46:gd2; {2004 2季报户均持股量}
户均持43:gd3; {2004 1季报户均持股量}
户均持312:gd4;{2003 年报户均持股量}
递增:gd1>gd2 and gd2>gd3 and gd3>gd4;
户均3至5千且递增:gd1>3000 and gd1<5000 and 递增;


{基于鹏搏资讯,因为F10资料经常变动,所以在变动后,需要对应调整,可做主图}

gdstar:=F10FIND('┃股东户数',1);
{查找F10中股东人数的位置}
gdw1:=f10find('┃04-09-30',gdstar);
gdw2:=f10find('┃04-06-30',gdw1);
gdw3:=f10find('┃04-03-31',gdw2);
gdw4:=f10find('┃03-12-31',gdw3);
{取对应的数据资料}
gdtx1:=F10TEXT(gdw1+10,8);gdtx2:=F10TEXT(gdw2+10,8);
gdtx3:=F10TEXT(gdw3+10,8);gdtx4:=F10TEXT(gdw4+10,8);
{转换字符串为数值}
gd1:=STRTONUM(gdtx1);gd2:=STRTONUM(gdtx2);
gd3:=STRTONUM(gdtx3);gd4:=STRTONUM(gdtx4);
{显示方法一:解盘显示股东人数变动}
EXPLAIN(gdw1>1,'04-09-30 总户数:'+gdtx1);
EXPLAIN(gdw2>1,'04-06-30 总户数:'+gdtx2);
EXPLAIN(gdw3>1,'04-03-31 总户数:'+gdtx3);
EXPLAIN(gdw4>1,'03-12-31 总户数:'+gdtx4);
{显示方法二:对应显示在 K 线上}
DRAWNUMBER(date=1040930,c,gd1,0),ALIGN5;
DRAWNUMBER(date=1040630,c,gd2,0),ALIGN5;
DRAWNUMBER(date=1040331,c,gd3,0),ALIGN5;
DRAWNUMBER(date=1031231,c,gd4,0),ALIGN5;
{显示方法三:对应显示为拄状线,附图时用}
STICKLINE(BETWEEN(date,1040929,1041231),gd1/10,gd1,8,0);
STICKLINE(BETWEEN(date,1040629,1040930),gd1/10,gd2,8,0);
STICKLINE(BETWEEN(date,1040330,1040630),gd1/10,gd3,8,0);
STICKLINE(BETWEEN(date,1031231,1040331),gd1/10,gd4,8,0);
回复

使用道具 举报

发表于 2016-10-14 08:35 | 显示全部楼层
2-户均持股:}{查找F10中股东人数的位置:}gdstar:=F10FIND('┃股东户数',1);
{取对应的数据资料:}       gdw1:=F10FIND('┃04-09-30',gdstar);gdw2:=F10FIND('┃04-06-30',gdw1);
                         gdw3:=F10FIND('┃04-03-31',gdw3);gdw4:=F10FIND('┃03-12-31',gdw1);
{转换字符串为数值:}       gdtx1:=F10TEXT(gdw1+28,8);gdtx2:=F10TEXT(gdw2+28,8);
                         gdtx3:=F10TEXT(gdw3+28,8);gdtx4:=F10TEXT(gdw4+28,8);
{转换字符串为数值:}       gd1:=STRTONUM(gdtx1); gd2:=STRTONUM(gdtx2);
                         gd3:=STRTONUM(gdtx3); gd4:=STRTONUM(gdtx4);
{显示一:解盘显示户均持股}EXPLAIN(gdw1>1,'04-09-30 股/户:'+gdtx1);
                        EXPLAIN(gdw2>1,'04-06-30 股/户:'+gdtx2);
                        EXPLAIN(gdw3>1,'04-03-31 股/户:'+gdtx3);
                        EXPLAIN(gdw4>1,'03-12-31 股/户:'+gdtx4);
{显示二:对应显示户均持股在K线上:}
                        DRAWNUMBER(DATE=1041008,CLOSE,gd1,0),ALIGN4,COLORRED;
                        DRAWNUMBER(DATE=1040630,CLOSE,gd2,0),ALIGN4,COLORRED;
                        DRAWNUMBER(DATE=1040331,CLOSE,gd3,0),ALIGN4,COLORRED;
                        DRAWNUMBER(DATE=1031231,CLOSE,gd4,0),ALIGN4,COLORRED;
户均持股49:gd1;{2004 3季报户均持股量}  
户均持46:gd2; {2004 2季报户均持股量}
户均持43:gd3; {2004 1季报户均持股量}
户均持312:gd4;{2003 年报户均持股量}
递增:gd1>gd2 and gd2>gd3 and gd3>gd4;
户均3至5千且递增:gd1>3000 and gd1<5000 and 递增;
回复

使用道具 举报

发表于 2017-7-23 12:39 | 显示全部楼层
DIFF:=EMA(CLOSE,6)-EMA(CLOSE,13);
DEA:=EMA(DIFF,5);
MACD:=2*(DIFF-DEA);
FH1:=REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3)
AND REF(MACD,3)<REF(MACD,4)&&CAPITAL/100<20000;
FH2:=MACD>=0 AND COUNT(MACD>REF(MACD,1),1)=1;
FH3:=FH1 AND FH2 AND EMA(C,13)>REF(EMA(C,13),1);
FH4:=FH1 AND FH2 AND ABS((DIFF-DEA)/C)<0.018;
FH5:=FH1 AND FH2 AND MACD<0.10;
凹口淘金:=FH3 OR FH4 OR FH5;

伸倍量柱:= REF(V>=REF(V,1)*1.5 AND C>O,1) AND V<=REF(V,1)*0.9;
T:=BARSSINCEN(伸倍量柱,8);
不跌破:=LLV(C,T+2)>=REF(L,T+1);
缩倍双阴:=COUNT(C<O,2)=2 AND REF(C>O,2) AND MA(V,2)<=REF(V,2)*0.7;
倍量伸缩:= REF(伸倍量柱,1) AND 缩倍双阴;
凹底:= (MA(C,3)-LLV(L,20))/LLV(L,20)<0.1;
涨停:= C>=(1.10*REF(C,1)-0.004);
XG1:= COUNT(伸倍量柱,6)>=2 AND 倍量伸缩 AND 凹底 AND 不跌破 AND T>=3 AND COUNT(涨停,30);
凹底1:= COUNT(XG1,10) ;
盘:=CAPITAL/100;
换:=V/盘;
换手率:=BETWEEN(换,1.74,40);
量比 :=DYNAINFO(17)>1.3;
流通盘:=CAPITAL/1000000<=2.85;
股价:=C>=4.60 AND C<14.99;
去创业板:=IF(CODELIKE('300'),0,1);
去停牌:=DYNAINFO(17)>0;
D22:=IF(NAMELIKE('S'),0,1);
D33:=IF(NAMELIKE('*'),0,1);
去ST:=D22 AND D33 AND 流通盘 AND 股价
AND 去创业板 AND 去停牌 ;
凹口淘金 OR 凹底1 AND 去ST AND 换手率 AND 量比;
回复

使用道具 举报

发表于 2016-7-13 22:19 | 显示全部楼层
股东户数+户均持股+选股
回复

使用道具 举报

发表于 2016-7-14 05:29 | 显示全部楼层
这个不错,谢谢分享。
回复

使用道具 举报

发表于 2016-7-16 05:10 | 显示全部楼层
学习学习学习
回复

使用道具 举报

发表于 2016-7-16 15:33 | 显示全部楼层
谢谢楼主分享
回复

使用道具 举报

发表于 2016-7-16 16:01 | 显示全部楼层
谢谢分享学习
回复

使用道具 举报

发表于 2016-7-18 09:20 | 显示全部楼层
谢谢楼主分享
回复

使用道具 举报

发表于 2016-7-18 10:09 | 显示全部楼层
谢谢楼主分享
回复

使用道具 举报

发表于 2016-9-22 13:42 | 显示全部楼层
谢谢分享,努力学习。
回复

使用道具 举报

发表于 2016-9-22 14:39 | 显示全部楼层
谢谢分享学习
回复

使用道具 举报

发表于 2016-10-14 06:54 | 显示全部楼层
学习学习学习
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|股海明灯官网 ( 京ICP备18020431号 )

GMT+8, 2024-5-15 06:04 , Processed in 0.106195 second(s), Total 19, Slave 16 queries , Gzip On, MemCached On.

Powered by Discuz! X3.5

Copyright © 2001-2024 Tencent Cloud.

快速回复 返回顶部 返回列表