顾比倒数线

顾比倒数线 修改了别人的，在分析家下通过
INPUT: nH(5,3,100), nL(5,3,100);
fH:=H;
fL:=L;
CBH:=HHV(H,3);
tH:=HHV(H,nH);
for i=nH+1 to BARPOS do begin
if fH < tH then
CBH:=tH;
else if fL < fL and fL < fL and fL < fL then
CBH:=fL;
else if nH > 3 and fL < fL and fL < fL
and fL < fL and (fL < fL or fL < fL) then CBH:=fL;
else if nH > 4 and fL < fL and fL < fL
and fL < fL and fL < fL
and (fL < fL or fL < fL or fL < fL) then CBH:=fL;
else if nH > 5 and fL < fL and fL < fL
and fL < fL and fL < fL
and fL < fL
and (fL < fL or fL < fL or fL < fL or fL < fL) then CBH:=fL;
end;
hGuppy:CBH, colorgray; {高价倒数线}

CBL:=LLV(L,3);
tL:=LLV(L,nL);
for i=nL+1 to BARPOS do begin
if fL > tL then CBL:=tL;
else if fH > fH and fH > fH
and fH > fH then CBL:=fH;
else if nL > 3 and fH > fH and fH > fH
and fH > fH and (fH > fH or fH > fH) then CBL:=fH;
else if nL > 4 and fH > fH and fH > fH
and fH > fH and fH > fH
and (fH > fH or fH > fH or fH > fH) then CBL:=fH;
else if nL > 5 and fH > fH and fH > fH
and fH > fH and fH > fH
and fH > fH
and (fH > fH or fH > fH or fH > fH or fH > fH) then CBL:=fH;
end;
lGuppy:CBL, colorgray; {低价倒数线}

 

thk