主题：请教老师，如何编写求距离收盘价最近的那根均线？

k:=10000000;
t:=-1000000000;
for i=2 to 30 do BEGIN
   if c<ma(c,i) and  c-ma(c,i)>t  then begin
       t:=c-ma(c,i);
       nn:=i;
   end
   if c>ma(c,i) and c-ma(c,i)<k  then begin
       k:=c-ma(c,i);
       ss:=i;
   end
end
sss:ss;
nnn:nn;

sss为ma在c之下的，nnn为ma在c之上的