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

1楼

Q_Q 发表于：2015/8/10 9:21:43

n取值为2~30

在c之上，距离c最近的ma（c，n）n是5

在c之下，距离c最近的ma（c，n）n是18

请教5和18怎么程序编写求出，谢谢！

2楼

jinzhe 发表于：2015/8/10 9:42:15

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之上的

3楼

Q_Q 发表于：2015/8/10 9:44:25

cool，谢谢大牛jinzhe老师

4楼

Q_Q 发表于：2015/8/12 0:07:24

k:=10000000; t:=-1000000000; for i=13 to 30 do BEGIN emac:=ema(c,i); if ct then begin t:=c-emac; nn:=i; end if c>ema(c,i) and c-ema(c,i)[此贴子已经被作者于2015/8/12 0:08:56编辑过]

k:=10000000;
t:=-1000000000;

for i=13 to 30 do BEGIN
emac:=ema(c,i);
if c<ema(c,i) and c-ema(c,i)>t then begin
t:=c-emac;
nn:=i;
end
if c>ema(c,i) and c-ema(c,i)<k then begin
k:=c-emac;
ss:=i;
end
end
下:ss,nodraw;
上:nn,nodraw;

drawnumber(ss,ema(c,ss),ss,0)colorred;
drawnumber(nn,ema(c,nn),nn,0);

此主题相关图片如下：newscreen11761750.jpg

[此贴子已经被作者于2015/8/12 0:11:08编辑过]