先算21根k线的最高价
再求21根k线的次高价
最后求次高价到现在的周期数?
hh:=h;
h21:=hhv(h,21);
ss:=0;
for i=1 to 21 do begin
if hh[barpos+1-i]>ss and hh[barpos+1-i]<h21 then begin
ss:=hh[barpos+1-i];
ii:i;
end
end
ii1:=ii;
nn:=hhvbars(h,21);
最高点和次高点的距离是:abs(nn-ii1)
hh:=h;
h21:=hhv(h,21);
ss:=0;
for i=1 to 21 do begin
if hh[barpos+1-i]>ss and hh[barpos+1-i]<h21 then begin
ss:=hh[barpos+1-i];
ii:i;
end
end
ii1:=ii;
nn:=hhvbars(h,21);
drawnumber(barpos>datacount-3,close,ii1,0);