第一部分：实现2日平均价

复制内容到剪贴板

代码:

fc:=close;
for i=2 to datacount do
ma2[i]:(fc[i-1]+fc[i])/2;

这个容易实现
第二部分：实现第2天到第5天的平均价；

复制内容到剪贴板

代码:

fc:=close;
for i=i+1 to i=i+4 do
ma5[i]:(fc[i+1]+fc[i+4])/4;

则不显示，错在哪里？

i 的循环范围不对

那怎么改？

复制内容到剪贴板

代码:

fc:=close;
for i=5 to datacount do begin
  //方法一，输出 ma2 为 5日平均值
  ma2[i]:(fc[i-4]+fc[i-3]+fc[i-2]+fc[i-1]+fc[i])/5;

  //方法二，输出 ma3 为 5日平均值
  s:=0;
  for j=0 to 4 do s:=s+fc[i-j];//循环叠加 5 个 fc 值
  ma3[i]:s/5;
  end;

你理解错了的
我要求的是从第二根K线到第5根K线的平均值的，而不是从一开始，否则这个问题就简单了

明白了 谢谢

一样的道理呀

复制内容到剪贴板

代码:

fc:=c;
//方法一
(fc[2]+fc[3]+fc[4]+fc[5])/4;

//方法二
s:=0;
for j=1 to 4 do s:=s+fc[j+1];
ma3:s/4;

五天问题好解决

复制内容到剪贴板

代码:

fc:=close;
for i=5 to datacount do begin
  //方法一，输出 ma2 为 5日平均值
  ma2[i]:(fc[i-4]+fc[i-3]+fc[i-2]+fc[i-1]+fc[i])/5;
  end;

如果我的i要取50天的，那么后面的ma2不很麻烦？

复制内容到剪贴板

代码:

fc:=close;
for i=50 to datacount do begin
  ma2[i]:(fc[i-49]+fc[i-48]+fc[i-47]......+fc[i-1]+fc[i])/49;
  end;

这时又应该如何写？

所以要 方法二，用第二个循环来累加计算

复制内容到剪贴板

代码:

fc:=c;
s:=50;
for j=49 to 1 do s:=s+fc[j-1];
ma3:s/49;

复制内容到剪贴板

代码:

fc:=close;
for i=50 to datacount do begin
    for j=1 to 49 do
  ma2[i]:(fc[i-j])/49;
end;

好象不行

复制内容到剪贴板

代码:

fc:=c;
s:=0;
for j=2 to 50 do s:=s+fc[j-1];
ma3:s/49;//计算第2根K线到50根K线平均值

也不对呢，整个出来是一条直线的。

本贴由 老实和尚 于 2004-12-27 17:20 最后编辑

哈哈，又见坏和尚啦！开个玩笑。也来学习。
千万别扣俺分呀，怕怕的！:p

:(

引用:

老实和尚 于 2004-12-27 05:20 PM 写道:
:(

和尚我知道你很老实的，别难过呀！(h)
HX817老师水平很高的，一定会教会你的。
我和你一起来学习。先谢谢HX817老师

俺在学习编写公式中

引用:

老实和尚 于 2004-12-27 17:13 写道:
也不对呢，整个出来是一条直线的。

本贴由 老实和尚 于 2004-12-27 17:20 最后编辑

当然是 1 个值啦，你不是求 2－50 共 49个的平均值么？

复制内容到剪贴板

代码:

fc:=close;
for i=50 to datacount do begin
  s:=0;
  for j=0 to 48 do s:=s+fc[i-j];//循环叠加 49 个 fc 值
  ma3[i]:s/49;
  end;

不是这样的啊
应该是

复制内容到剪贴板

代码:

ma2[i]:(fc[i-49]+fc[i-48]+fc[i-47]+......................fc[i-1]+fc[i])/49;

这是平均线

本贴由 老实和尚 于 2004-12-27 22:28 最后编辑

第 18 楼 的不就是这样了

不是吧，出来的应该是平滑的曲线，结果是直线呢？

呵呵，你试试 第 18 楼 的代码了么？

试了啊，是直线的

晕啊，现在又对了是曲线了