主题：当前BAR创下N日高点，求：前1日到前N-1日之间的最高点与当前BAR的跨度

HN:=TOPRANGE(H);

nn:=0;

ss:=0;

for i=1 to hn do begin

    if h[barpos-i]>ss then begin

           ss:=h[barpos-i];

    end

end

for i=1 to hn do begin

     if h[barpos-i]=ss then begin

          nn:=i;

          break;

     end

end

nn为所求值