欧奈尔选股法80只牛股纵览（年盈利超130%）累计收益901.38%今日评分公布0426

lymanqun

原帖由 awangpian 于 2006-11-28 01:52 发表
明天依然老大...帮个忙
我想用CI指标选股..怎样改这个公式才能让他实现:指标中的柱子突破白线?
换句话讲就是如何让柱子变成线...这样才能选择上穿白线..

做出来了，中午休市再跟呢说吧

wms1

谢谢了，你真是一个热心人．．．．．．．．．

你改的还是有问题，不过你说出了解决问题的办法，十分感谢，问题已经解决．

[ 本帖最后由 wms1 于 2006-11-28 09:31 编辑 ]

白驹过隙henrych

{Var1:=IF(DATE<2040615,1,0);}
Var2:=(HIGH+LOW+CLOSE)/3 ;
(Var2-MA(Var2,14))/(0.015*AVEDEV(Var2,14)) , , {[00010001]};
(Var2-MA(Var2,26))/(0.015*AVEDEV(Var2,26)) , , {[00010001]};
(Var2-MA(Var2,52))/(0.015*AVEDEV(Var2,52)) , , {[00010001]};
100;
-100;

白驹过隙henrych

要求已有两根线大于100,当第三根突破时发出预警,我用的是湘财圆网3.0软件.

另有一个问题,大智慧好象不能自设预警条件,是不是我还没找到方法?

白驹过隙henrych

醉红尘

明天依然 大哥，你发的{鹏博F10净利润增长}公式我导入分析家5.01中出现 line 2 c1001:语法错误“，"
烦请指点一下，谢谢！

lymanqun

一个转化成飞狐指标的CI指标。也可以用于选股，但在牛市中效果相当不理想（熊市中效果稍好，当初指南针出此指标时曾轰动过，但很多人用后却吃了不少亏，后来也就消声匿迹了）

CI指标：

xx  := "1a0001$close";
xx1 := "1a0001$open";
xx2 := "1a0001$high";
xx3 := "1a0001$low";
yy  := IF(BARSTATUS = 1,0,(1 + (c / ref(c,1) -1) - (xx / ref(xx,1) -1))),linethick0;
yy1 := IF(BARSTATUS = 1,0,(1 + (o / REF(C,1) -1) - (xx / REF(xx,1) - 1)) ),linethick0;
yy2 := IF(BARSTATUS = 1,0,(1 + (h / REF(C,1) -1) - (xx / REF(xx,1) - 1)) ),linethick0;
yy3 := IF(BARSTATUS = 1,0,(1 + (l / REF(C,1) -1) - (xx / REF(xx,1) - 1)) ),linethick0;
xx4 := if(BARSTATUS = 1,100,yy),linethick0;
<%
vspj=ffl.vardata("xx4")
last=ubound(vspj)
for i=1 to last
vspj(i)=vspj(i-1) * vspj(i)
next
ffl.vardata("xx4")=vspj
%>

收 : xx4,linethick0;
开 : IF(BARSTATUS = 1,100,REF(收,1) * yy1),linethick0;
高 : IF(BARSTATUS = 1,100,REF(收,1) * yy2),linethick0;
低 : IF(BARSTATUS = 1,100,REF(收,1) * yy3),linethick0;
涨 : (收 / ref(收,1) - 1) * 100,linethick0;

STICKLINE(涨>=0,收,开,6,0), COLORRED;
STICKLINE(涨>=0,高,低,1,0), COLORRED;
STICKLINE(涨<0,收,开, 6,0), COLOR00FF00;
STICKLINE(涨<0,高,低,1,0), COLOR00FF00;
ema(收,5),coloryellow;
ema(收,10),colorred;
ema(收,20),colorwhite;

选股时，在指标线一栏取“收”，在“大于”栏中，选“第十条指标线”（即公式中的ema5日线），或选“第十一条指标线”（即公式中的ema10日线），取日线就可选出股，也可作成预警，供参考

[ 本帖最后由 lymanqun 于 2006-11-28 12:29 编辑 ]

lymanqun

原帖由 醉红尘 于 2006-11-28 12:06 发表
明天依然 大哥，你发的{鹏博F10净利润增长}公式我导入分析家5.01中出现 line 2 c1001:语法错误“，"
烦请指点一下，谢谢！

只能用于飞狐～～～

awangpian

原帖由 lymanqun 于 2006-11-28 12:24 发表
一个转化成飞狐指标的CI指标。也可以用于选股，但在牛市中效果相当不理想（熊市中效果稍好，当初指南针出此指标时曾轰动过，但很多人用后却吃了不少亏，后来也就消声匿迹了）

CI指标：

xx  := "1a0001 ...

用后一直出现:

awangpian

原帖由 醉红尘 于 2006-11-28 12:06 发表
明天依然 大哥，你发的{鹏博F10净利润增长}公式我导入分析家5.01中出现 line 2 c1001:语法错误“，"
烦请指点一下，谢谢！

这个公式在哪里???帖子里?

lymanqun

原帖由 awangpian 于 2006-11-28 12:51 发表


用后一直出现:

可能是缺少msvcp60.dll文件。将其拷入飞狐System目录下试试，不行再说

lymanqun

原帖由 awangpian 于 2006-11-28 12:57 发表



这个公式在哪里???帖子里?

飞狐用：

{鹏博F10净利润增长}
VARIABLE:SJ[8]='str',SY[8]='str',TT=6;
jdg:=F10FIND('财务指标-增长能力',10000),LINETHICK;
IF jdg=-1 then EXIT;
SJT:=F10TEXT(F10FIND('指标名称',jdg)+4,70);
SJ[1]:=LTRIM(STRMID(SJT,14,10));
FOR i=1 TO 4 DO BEGIN
    TMP:=STRFIND(SJT,'  │',1);
    SJ:=LTRIM(STRMID(SJT,TMP+4,10));
    SJT:=LTRIM(STRMID(SJT,TMP+2,0));
END;
WT:=IF(STRLEN(RTRIM(SJ[4]))>4,1,0);
DRAWTEXT(SYSPARAM(2)=BARPOS,10,'最新日期：'+SJ[1]);

SYT:=F10TEXT(F10FIND('净利润增长率',jdg)+6,70);
SYT:=LTRIM(STRRIGHT(SYT,69-STRFIND(SYT,'│ ',10)));
SY[1]:=STRLEFT(SYT,6);
SY[2]:=LTRIM(STRMID(SYT,13,8));
SY[3]:=LTRIM(STRMID(SYT,13*2,8));
SY[4]:=IF(WT,LTRIM(STRMID(SYT,13*3,8)),'');

一期:STRTONUM(SY[1]),PRECISION4,COLORFFFFFF,LINETHICK;
二期:STRTONUM(SY[2]),PRECISION4,COLORFFFF,LINETHICK;
三期:STRTONUM(SY[3]),PRECISION4,COLORFF00FF,LINETHICK;
四期:STRTONUM(SY[4]),PRECISION4,COLORFF00,LINETHICK;
增长:一期>二期,COLORFFFF00,LINETHICK;
EXPLAIN(1,'***近期***\n'+SJ[1]+'：'+NUMTOSTR(STRTONUM(SY[1]),4)),colorcyan;
EXPLAIN(1,SJ[2]+'：'+NUMTOSTR(STRTONUM(SY[2]),4)),colorcyan;
EXPLAIN(1,SJ[3]+'：'+NUMTOSTR(STRTONUM(SY[3]),4)),colorcyan;
EXPLAIN(WT,SJ[4]+'：'+NUMTOSTR(STRTONUM(SY[4]),4)),colorcyan;

IF WT=1 THEN BEGIN
   SJT1:=LTRIM(F10TEXT(F10FIND('指标名称',jdg+700)+16,56));
   SJ[5]:=STRLEFT(SJT1,8);
   SJ[6]:=RTRIM(LTRIM(STRMID(SJT1,14,10)));
   SJ[7]:=RTRIM(LTRIM(STRMID(SJT1,14*2,10)));
   SJ[8]:=RTRIM(LTRIM(STRMID(SJT1,14*3,10)));

   SYT1:=F10TEXT(F10FIND('净利润增长率',jdg+700)+24,50);
   SY[5]:=STRLEFT(SYT1,6);
   SY[6]:=LTRIM(STRMID(SYT1,14,8));
   SY[7]:=LTRIM(STRMID(SYT1,14*2,8));
   SY[8]:=LTRIM(STRMID(SYT1,14*3,8));

   去年:STRTONUM(SY[5]),PRECISION4,LINETHICK;
   前年:STRTONUM(SY[6]),PRECISION4,LINETHICK;
   前二:STRTONUM(SY[7]),PRECISION4,LINETHICK;
   前三:STRTONUM(SY[8]),PRECISION4,LINETHICK;
   EXPLAIN(WT,'***往年***\n'+SJ[5]+'：'+NUMTOSTR(STRTONUM(SY[5]),4)),colorgreen;
   EXPLAIN(WT,SJ[6]+'：'+NUMTOSTR(STRTONUM(SY[6]),4)),colorgreen;
   EXPLAIN(WT,SJ[7]+'：'+NUMTOSTR(STRTONUM(SY[7]),4)),colorgreen;
   EXPLAIN(WT,SJ[8]+'：'+NUMTOSTR(STRTONUM(SY[8]),4)),colorgreen;
END;

awangpian

客气的话还是要说..谢谢明天依然!!

awangpian

郁闷了...还是不行...
而且净利润的那个公式竟然一打开飞狐就死...
我再看看...

lymanqun

原帖由 awangpian 于 2006-11-28 14:08 发表
郁闷了...还是不行...
而且净利润的那个公式竟然一打开飞狐就死...
我再看看...

看来你的飞狐是缺少某个DLL，我记得有个网站曾提供过打包的一整套飞狐的DLL下载，有空帮你找找

lymanqun

常用DLL动态运行库合集：

这里有http://bbs.macdcn.com/viewthread.php?tid=610356&highlight=DLL

dasayu

明天依然您好,能不能辛苦您一下,每天盘后把您的"BS"数据传一份上来?
我电脑基础太差,弄了几天也没有弄好:*10*:
谢谢啦^_^

lymanqun

原帖由 dasayu 于 2006-11-28 16:57 发表
明天依然您好,能不能辛苦您一下,每天盘后把您的"BS"数据传一份上来?
我电脑基础太差,弄了几天也没有弄好:*10*:
谢谢啦^_^

今天的BS（11－28）：

lymanqun

欧奈尔选股法前80名（20061128）评分出来了，采用新形式，可读内容更多（第1页第1楼，这里是文本文件）

lixh68

谢谢提供！！！！！！！！！！！