请教：关于跨周期求MACD值的问题

nopain

您上面的程序和直接用1分钟的Close没什么区别，如果想要完全精确的周线的MACD数据，需要自行实现XAverage函数对周线数据的调用。
下贴可以提供一些参考，具体实现比这个还要复杂：
http://www.tradeblazer.net/forum/thread-1996-1-1.html

nopain

等晚上有空我来写

nopain

日线中调用周线MACD数据的代码。

1、新建用户函数WeekXAverage，返回值为数值型，代码如下：

1. //------------------------------------------------------------------------
   
2. // 简称: WeekXAverage
   
3. // 名称: 日线转化周线的指数平均
   
4. // 类别: 用户函数
   
5. // 类型: 用户函数
   
6. // 输出: 数值型
   
7. //------------------------------------------------------------------------
   
8. 
   
9. Params
   
10.         NumericSeries Price(10);
    
11.         Numeric Length(10);
    
12. Vars
    
13.         NumericSeries WeeksNo;
    
14.         NumericSeries WeekDays;
    
15.         BoolSeries FirstWeek(True);
    
16.         Numeric sFcactor;
    
17.         NumericSeries XAvgValue;
    
18. Begin
    
19.         If(CurrentBar == 0)
    
20.         {
    
21.                 FirstWeek = True;
    
22.         }Else
    
23.         {
    
24.                 FirstWeek = FirstWeek[1];
    
25.                 If(FirstWeek &&  Weekday==1)
    
26.                 {
    
27.                         FirstWeek = False;
    
28.                 }
    
29.         }
    
30.        
    
31.         WeeksNo = IntPart(DateDiff(19700105,Date)/7);
    
32.         If(WeeksNo!=WeeksNo[1])
    
33.         {
    
34.                 WeekDays = 1;
    
35.         }Else
    
36.         {
    
37.                 WeekDays = WeekDays[1] + 1;
    
38.         }
    
39. 
    
40.         sFcactor = 2 / ( Length + 1 );
    
41.         if (FirstWeek)
    
42.         {
    
43.                 XAvgValue = Price;
    
44.         }else
    
45.         {
    
46.                 XAvgValue = XAvgValue[WeekDays] + sFcactor * ( Price - XAvgValue[WeekDays] ) ;
    
47.         }       
    
48.     Return XAvgValue;
    
49. End
    
50. 
    
51. //------------------------------------------------------------------------
    
52. // 编译版本        GS2004.06.12
    
53. // 用户版本        2008/04/08 20:23
    
54. // 版权所有        nopain
    
55. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
    
56. //                        每一版本的TrabeBlazer公式修改和重写的权利
    
57. //------------------------------------------------------------------------

复制代码

nopain

2、新建技术指标WeekMACD，代码如下：

1. //------------------------------------------------------------------------
   
2. // 简称: WeekMACD
   
3. // 名称: 周线MACD
   
4. // 类别: 技术指标
   
5. // 类型: 其它类
   
6. // 输出:
   
7. //------------------------------------------------------------------------
   
8. 
   
9. Params
   
10.         Numeric FastLength(12);
    
11.         Numeric SlowLength(26);
    
12.         Numeric MACDLength(9);
    
13. Vars
    
14.         NumericSeries MACDValue;
    
15.         Numeric AvgMACD;
    
16.         Numeric MACDDiff;
    
17. Begin
    
18.         MACDValue = WeekXAverage( Close, FastLength ) - WeekXAverage( Close, SlowLength ) ;       
    
19.         AvgMACD = WeekXAverage(MACDValue,MACDLength);
    
20.         MACDDiff = MACDValue - AvgMACD;
    
21.         PlotNumeric("MACD",MACDValue);
    
22.         PlotNumeric("MACDAvg",AvgMACD);
    
23.         If (MACDDiff >= 0)       
    
24.                 PlotNumeric("MACDDiff",MACDDiff,Red);
    
25.         Else
    
26.                 PlotNumeric("MACDDiff",MACDDiff,Green);
    
27.         PlotNumeric("零线",0);          
    
28. End
    
29. 
    
30. //------------------------------------------------------------------------
    
31. // 编译版本        GS2004.06.12
    
32. // 用户版本        2008/04/08 20:20
    
33. // 版权所有        nopain
    
34. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
    
35. //                        每一版本的TrabeBlazer公式修改和重写的权利
    
36. //------------------------------------------------------------------------

复制代码

nopain

3、您可以建一个周线图，插入标准的MACD指标，然后新建一个日线图，插入WeekMACD指标。
为了让两个图的数据完全相等，周线的数据应该要大于120，日线的数据应该要大于(120*5=600)。否则会出现精度误差，这是因为指数平均的最大回溯周期大概是在120左右

nopain

1、Price就是您想要计算的数据源，例子里面是Close，也可以是其他任何的序列变量值。
2、Length是求指数平均的周期

nopain

原帖由 szzsh 于 2008-5-16 00:50 发表
Price(10)和Length(10)
请问为什么里面参数定义为10？？一星期5根K线，是不是应该定义为5啊？？

10只是默认参数，具体值取决于调用时传入的参数

nopain

原帖由 szzsh 于 2008-5-16 01:16 发表
如果5分钟周期提取30分钟周期MACD值呢？？该怎么改？？谢谢

您可以参考下面的帖子：
http://www.tradeblazer.net/forum/viewthread.php?tid=2037

nopain

当然做得到，比较麻烦，您可以根据例子自行实现。

nopain

5分钟调用30分钟MACD值的算法

1、新建一个用户函数，命名为HalfHourXAverage,返回值为数值型。代码如下：

1. Params
   
2.         NumericSeries Price(10);
   
3.         Numeric Length(10);
   
4. Vars
   
5.         NumericSeries HalfHourNo;
   
6.         NumericSeries MinsIndex;
   
7.         BoolSeries First30Min(True);
   
8.         Numeric sFcactor;
   
9.         NumericSeries XAvgValue;
   
10. Begin
    
11.         If(CurrentBar == 0)
    
12.         {
    
13.                 First30Min = True;
    
14.         }Else
    
15.         {
    
16.                 First30Min = First30Min[1];
    
17.                 If(First30Min && (Minute/30)==0)
    
18.                 {
    
19.                         First30Min = False;
    
20.                 }
    
21.         }
    
22. 
    
23.         HalfHourNo = Date*100 + Hour*2+IntPart(Minute/30);
    
24.         If(HalfHourNo!=HalfHourNo[1])
    
25.         {
    
26.                 MinsIndex = 1;
    
27.         }Else
    
28.         {
    
29.                 MinsIndex = MinsIndex[1] + 1;
    
30.         }
    
31. 
    
32.         sFcactor = 2 / ( Length + 1 );
    
33.         if (First30Min)
    
34.         {
    
35.                 XAvgValue = Price;
    
36.         }else
    
37.         {
    
38.                 XAvgValue = XAvgValue[MinsIndex] + sFcactor * ( Price - XAvgValue[MinsIndex] ) ;
    
39.         }
    
40.   
    
41.         Return XAvgValue;
    
42. End

复制代码

2、新建一个技术指标，假设为test。代码如下：

1. Params
   
2.         Numeric FastLength(12);
   
3.         Numeric SlowLength(26);
   
4.         Numeric MACDLength(9);
   
5. Vars
   
6.         NumericSeries MACDValue;
   
7.         NumericSeries AvgMACD;
   
8.         NumericSeries MACDDiff;
   
9.        
   
10. Begin
    
11.         MACDValue = HalfHourXAverage( Close, FastLength ) - HalfHourXAverage( Close, SlowLength );
    
12.         AvgMACD = HalfHourXAverage(MACDValue,MACDLength);
    
13.         MACDDiff = MACDValue - AvgMACD;
    
14.        
    
15.         PlotNumeric("MACDValue",MACDValue);
    
16.         PlotNumeric("AvgMACD",AvgMACD);
    
17.         If (MACDDiff >= 0)       
    
18.                 PlotNumeric("MACDDiff",MACDDiff,Red);
    
19.         Else
    
20.                 PlotNumeric("MACDDiff",MACDDiff,Green);
    
21.         PlotNumeric("零线",0);          
    
22. 
    
23. End

复制代码