剛剛下載了FINDVV公式想加入另一些計算

但此公式有加密，能否提供原碼，感激不盡

原碼:


UV:=V;

VV:C*0;

DD:C*0;

for i = 1 to datacount do begin

  for j= i-1 downto 1 do begin

    if UV[j]>UV[i] then begin

      DD[i]:=i-j;VV[i]:=UV[j];

      break;

    end;

  end;

end;

謝謝版主