软件名称:[B]绝妙飞狐主图 趋势轨道[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:解密版
软件大小:2.00 KB
官方主页:Home Page
更新时间:2009-05-04 19:39:19
软件简介:
{绝妙飞狐主图 趋势轨道}
觉得好的帮我顶顶,(附件为主图,未破解;源码为破解版本,恳求指标高手改为同花顺版本)
趋势轨道 副图-选股
input:n(30,2,300),n1(90,2,300);
fh:=forcast(h,n);
fl:=forcast(l,n);
kh:=slope(h,n);
kl:=slope(l,n);
th:=0;
tl:=0;
for i=0 to n-1 do begin
th:=th+abs(ref(h,i)-(fh-kh*i));
tl:=tl+abs(ref(l,i)-(fl-kl*i));
end;
stdph:=th/n;
stdpl:=tl/n;
up:fh+2*stdph+kh,shift1,colorff9900,linedot;
dn:fl-2*stdpl+kl,shift1,colorff9900,linedot;
mid:0.5*(up+dn),shift1,,colorff9900,linethick1;
fh1:=forcast(h,n1);
fl1:=forcast(l,n1);
kh1:=slope(h,n1);
kl1:=slope(l,n1);
th1:=0;
tl1:=0;
for i=0 to n1-1 do begin
th1:=th1+abs(ref(h,i)-(fh1-kh1*i));
tl1:=tl1+abs(ref(l,i)-(fl1-kl1*i));
end;
stdph1:=th1/n1;
stdpl1:=tl1/n1;
up1:fh1+2*stdph1+kh1,shift1,coloryellow,linedot;
dn1:fl1-2*stdpl1+kl1,shift1,coloryellow,linedot;
mid1:0.5*(up1+dn1),shift1,,coloryellow;
weight:if(stktype=0 or v=0,(h+l+c)/3,0.01*amount/v),circledot,colorffffff;
参考:ma(c,2),shift1,linethick2,colormagenta;
[url=http://www.70822.com/soft/sort013/sort02/down-8939.html]绝妙飞狐主图 趋势轨道[/url]