怎样查找这个点

105037

就是要查找这个K，距离当前K最近的，它与当前K价差相差2%，它的位置。有没有现成的函数

资深技术05

[PEL] 复制代码

  dist1:newhbars1(c*1.05,c,1);//找到第1次出现C大于当前c*1.05的位置
  dist2:newlbars1(c*0.95,c,1);
  dist:-1;
  
  if dist1>dist2  then dist:=dist1; 
  if dist2>dist1  then dist:=dist2;

没有结果 返回-1，否则返回K位置。这个价差可能是大于，也可能小于造成的。