软件名称:[B]横盘选股(更正这是大智慧公式,并修正源码)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:免费版
软件大小:4.00 KB
官方主页:Home Page
更新时间:2011-03-28 13:01:26
软件简介:
input:D(1060101,0,1999999,1),D1(1060131,0,1999999,1),N(2,0,20,0.01),N1(2,0,20,0.01),T(0);
DRAWGBKlast(1,strip(rgb(90,90,90),rgb(0,0,0),0));
varD:=date>=D;
varD1:=date<=D1;
dd:=varD and varD1;
{分析家公式网 http://www.70822.com 整理}
DDD:=if(dd,count(if(dd,C,0),0),0);
ee:=if(dd,hhv(close,DDD),0);
cc:=if(dd,llv(close,DDD),0);
ZZ:=(O+C*2+H+L)/5;
ff:=if(dd and ref(ee,1)=0,ZZ,0);
screendays:=barssince(dispstatus=1)+1;
datacount:=if(DDD>screendays,DDD-1,screendays-1);
aa:=0;
for i=0 to datacount do begin
aa:=aa+ref(ff,i);
end
gg:=aa;
hhh:=if(ee=gg,ee/100,(ee-gg));
iii:=if(cc=gg,cc/100,(gg-cc));
hh:=hhh*100/gg;
ii:=iii*100/gg;
temp:=if(hh<=N and ii<=N1 and DD,10,0);
if T>0 then begin
temp2:=count(screendays and temp>0,0);
end;
横盘区间:temp,precis0,colorccffff,linethick2;
区间天数:temp2,precis0,colorffcceb,linethick0;
修正通过了,但是测试没有选到股票,请高手支招
[url=http://www.70822.com/soft/sort013/sort03/down-32122.html]横盘选股(更正这是大智慧公式,并修正源码)[/url]