软件名称:[B]顾比倒数[/B]
软件类型:国产软件
运行环境:Win2000/WinXP/Win2003/WinVista
软件语言:简体中文
授权方式:共享软件
软件大小:0 Bytes
官方主页:Home Page
更新时间:2013-04-12 09:19:22
软件简介:
仅作参考,计算量比较大,最好盘后分析使用
{顾比倒数}
{顾比倒数}
INPUT:N(5,1,100);
KLINE(O,H,L,C,0);
VARIABLE:hh:=h;//定义数组型变量hh为每日的最高价
for i=1 to datacount do//i从1到最后一天作循环计算
begin
for j=1 to i-1 do//j从1到i-1作循环计算
begin
if hh[i]<hh[i-j] then break;//如果第i天的最高价低于i-j天的最高价,则跳出此次循环,j值赋给本日的gd
end;
gd[i]:=j;//上一个最高价高于今日最高价的日子,到今天的天数
gbG[i]:=gd[i]+gd[i-gd[i]];//第三根重要蜡烛线到今天的天数
end;
/////////////////////////////////////////////////
VARIABLE:LL:=L;//定义数组型变量LL为每日的最低价
for i=1 to datacount do//i从1到最后一天作循环计算
begin
for j=1 to i-1 do//j从1到i-1作循环计算
begin
if LL[i]>LL[i-j] then break;//如果第i天的最低价高于i-j天的最低价,则跳出此次循环,j值赋给本日的gG
end;
gG[i]:=j;//上一个最低价低于今日最低价的日子,到今天的天数
gbD[i]:=gG[i]+gG[i-gG[i]];//第三根重要蜡烛线到今天的天数
end;
//////////////////////////////
下跌压力:valuewhen(llvbars(l,gbG+1)=0,ref(h,gbG));
上升支撑:valuewhen(HHvbars(H,gbD+1)=0,ref(L,gbD));
A:=CROSS(C,下跌压力),LINETHICK;
B:=CROSS(上升支撑,H),LINETHICK;
E:=CROSS(下跌压力,C),LINETHICK;
F:=CROSS(L,上升支撑),LINETHICK;
DRAWICON(A OR B,L*0.995,4);
DRAWICON(E OR F,H*1.01,5);
买:LONGCROSS(C,下跌压力,N),LINETHICK;
卖:LONGCROSS(上升支撑,C,N),LINETHICK;
DRAWICON(买,L*0.99,1);
DRAWICON(卖,H*1.02,2);
[url=http://www.70822.com/soft/sort013/sort02/down-61394.html]顾比倒数[/url]