明天依然老大...帮个忙
我想用CI指标选股..怎样改这个公式才能让他实现:指标中的柱子突破白线?
换句话讲就是如何让柱子变成线...这样才能选择上穿白线..
做出来了，中午休市再跟呢说吧 谢谢了，你真是一个热心人．．．．．．．．．
你改的还是有问题，不过你说出了解决问题的办法，十分感谢，问题已经解决．
[ 本帖最后由 wms1 于 2006-11-28 09:31 编辑 ]
不知道这个源码有没有用.
{Var1:=IF(DATE<2040615,1,0);}Var2:=(HIGH+LOW+CLOSE)/3 ;
(Var2-MA(Var2,14))/(0.015*AVEDEV(Var2,14)) , , {};
(Var2-MA(Var2,26))/(0.015*AVEDEV(Var2,26)) , , {};
(Var2-MA(Var2,52))/(0.015*AVEDEV(Var2,52)) , , {};
100;
-100;
请哪位根据上面的源码编一个选股或预警公式好吗?
要求已有两根线大于100,当第三根突破时发出预警,我用的是湘财圆网3.0软件.另有一个问题,大智慧好象不能自设预警条件,是不是我还没找到方法?
CI指标似乎有点滞后,不能显示当天.
明天依然 大哥，你发的{鹏博F10净利润增长}公式我导入分析家5.01中出现 line 2 c1001:语法错误“，"烦请指点一下，谢谢！ 一个转化成飞狐指标的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 编辑 ] 原帖由 醉红尘 于 2006-11-28 12:06 发表
明天依然 大哥，你发的{鹏博F10净利润增长}公式我导入分析家5.01中出现 line 2 c1001:语法错误“，"
烦请指点一下，谢谢！
只能用于飞狐～～～ 原帖由 lymanqun 于 2006-11-28 12:24 发表
一个转化成飞狐指标的CI指标。也可以用于选股，但在牛市中效果相当不理想（熊市中效果稍好，当初指南针出此指标时曾轰动过，但很多人用后却吃了不少亏，后来也就消声匿迹了）
CI指标：
xx:= "1a0001 ...
用后一直出现: 原帖由 醉红尘 于 2006-11-28 12:06 发表
明天依然 大哥，你发的{鹏博F10净利润增长}公式我导入分析家5.01中出现 line 2 c1001:语法错误“，"
烦请指点一下，谢谢！
这个公式在哪里???帖子里? 原帖由 awangpian 于 2006-11-28 12:51 发表
用后一直出现:
可能是缺少msvcp60.dll文件。将其拷入飞狐System目录下试试，不行再说 原帖由 awangpian 于 2006-11-28 12:57 发表
这个公式在哪里???帖子里?
飞狐用：
{鹏博F10净利润增长}
VARIABLE:SJ='str',SY='str',TT=6;
jdg:=F10FIND('财务指标-增长能力',10000),LINETHICK;
IF jdg=-1 then EXIT;
SJT:=F10TEXT(F10FIND('指标名称',jdg)+4,70);
SJ:=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,1,0);
DRAWTEXT(SYSPARAM(2)=BARPOS,10,'最新日期：'+SJ);
SYT:=F10TEXT(F10FIND('净利润增长率',jdg)+6,70);
SYT:=LTRIM(STRRIGHT(SYT,69-STRFIND(SYT,'│ ',10)));
SY:=STRLEFT(SYT,6);
SY:=LTRIM(STRMID(SYT,13,8));
SY:=LTRIM(STRMID(SYT,13*2,8));
SY:=IF(WT,LTRIM(STRMID(SYT,13*3,8)),'');
一期:STRTONUM(SY),PRECISION4,COLORFFFFFF,LINETHICK;
二期:STRTONUM(SY),PRECISION4,COLORFFFF,LINETHICK;
三期:STRTONUM(SY),PRECISION4,COLORFF00FF,LINETHICK;
四期:STRTONUM(SY),PRECISION4,COLORFF00,LINETHICK;
增长:一期>二期,COLORFFFF00,LINETHICK;
EXPLAIN(1,'***近期***\n'+SJ+'：'+NUMTOSTR(STRTONUM(SY),4)),colorcyan;
EXPLAIN(1,SJ+'：'+NUMTOSTR(STRTONUM(SY),4)),colorcyan;
EXPLAIN(1,SJ+'：'+NUMTOSTR(STRTONUM(SY),4)),colorcyan;
EXPLAIN(WT,SJ+'：'+NUMTOSTR(STRTONUM(SY),4)),colorcyan;
IF WT=1 THEN BEGIN
SJT1:=LTRIM(F10TEXT(F10FIND('指标名称',jdg+700)+16,56));
SJ:=STRLEFT(SJT1,8);
SJ:=RTRIM(LTRIM(STRMID(SJT1,14,10)));
SJ:=RTRIM(LTRIM(STRMID(SJT1,14*2,10)));
SJ:=RTRIM(LTRIM(STRMID(SJT1,14*3,10)));
SYT1:=F10TEXT(F10FIND('净利润增长率',jdg+700)+24,50);
SY:=STRLEFT(SYT1,6);
SY:=LTRIM(STRMID(SYT1,14,8));
SY:=LTRIM(STRMID(SYT1,14*2,8));
SY:=LTRIM(STRMID(SYT1,14*3,8));
去年:STRTONUM(SY),PRECISION4,LINETHICK;
前年:STRTONUM(SY),PRECISION4,LINETHICK;
前二:STRTONUM(SY),PRECISION4,LINETHICK;
前三:STRTONUM(SY),PRECISION4,LINETHICK;
EXPLAIN(WT,'***往年***\n'+SJ+'：'+NUMTOSTR(STRTONUM(SY),4)),colorgreen;
EXPLAIN(WT,SJ+'：'+NUMTOSTR(STRTONUM(SY),4)),colorgreen;
EXPLAIN(WT,SJ+'：'+NUMTOSTR(STRTONUM(SY),4)),colorgreen;
EXPLAIN(WT,SJ+'：'+NUMTOSTR(STRTONUM(SY),4)),colorgreen;
END; 客气的话还是要说..谢谢明天依然!! 郁闷了...还是不行...
而且净利润的那个公式竟然一打开飞狐就死...
我再看看... 原帖由 awangpian 于 2006-11-28 14:08 发表
郁闷了...还是不行...
而且净利润的那个公式竟然一打开飞狐就死...
我再看看...
看来你的飞狐是缺少某个DLL，我记得有个网站曾提供过打包的一整套飞狐的DLL下载，有空帮你找找 常用DLL动态运行库合集：
这里有http://bbs.macdcn.com/viewthread.php?tid=610356&highlight=DLL 明天依然您好,能不能辛苦您一下,每天盘后把您的"BS"数据传一份上来?
我电脑基础太差,弄了几天也没有弄好:*10*:
谢谢啦^_^ 原帖由 dasayu 于 2006-11-28 16:57 发表
明天依然您好,能不能辛苦您一下,每天盘后把您的"BS"数据传一份上来?
我电脑基础太差,弄了几天也没有弄好:*10*:
谢谢啦^_^
今天的BS（11－28）： 欧奈尔选股法前80名（20061128）评分出来了，采用新形式，可读内容更多（第1页第1楼，这里是文本文件） 谢谢提供！！！！！！！！！！！