跨周期数据转换函数以及跨周期技术指标调用的实现

iorichen

FIERY 发表于 2012-11-6 10:38
追涨杀跌老师，我试着做的MtAMA，在调用时发现日线的AMA和其它周期里显示的AMA值不同，您帮我看一下哪里出 ...

你没搞清楚如何调用大周期的数据。这是你想要的MtAMA。

1. //------------------------------------------------------------------------
   
2. // 简称: MtAdaptiveMovAvg
   
3. // 名称: 求大周期的卡夫曼自适应移动平均
   
4. // 类别: 用户函数  
   
5. // 类型: 内建函数
   
6. // 输出: 数值型
   
7. //------------------------------------------------------------------------
   
8. 
   
9. Params
   
10.         Numeric TimeFrame(1440);        // 目标时间周期参数，参数说明参见MtBar
    
11.         Numeric BarsBack(1);         // 目标时间周期BAR偏移参数，说明见MtBar函数
    
12.         Numeric EffRatioLength(10);
    
13.         Numeric FastAvgLength(2);
    
14.         Numeric SlowAvgLength(30);
    
15.         NumericRef oAMAValue;       
    
16. Vars
    
17.     NumericSeries mtBarCnt;
    
18.         NumericSeries mtClose;
    
19.         NumericSeries mtCurBar;
    
20.         Numeric refCurBar;
    
21.         Numeric refOpen;
    
22.         Numeric refHigh;
    
23.         Numeric refLow;
    
24.         Numeric refClose;
    
25.         Numeric refVol;
    
26.         Numeric refOpenInt;                 
    
27.         Numeric NetChg(0);
    
28.         Numeric TotChg(0);
    
29.         Numeric EffRatio(0);
    
30.         Numeric ScaledSFSqr(0);
    
31.         Numeric SFDiff;
    
32.         Numeric j;
    
33.         Numeric i;
    
34.         NumericSeries AMAValue;
    
35.        
    
36. Begin
    
37. 
    
38.     mtBarCnt = MtBar(TimeFrame,BarsBack,refCurBar,refOpen,refHigh,refLow,refClose,refVol,refOpenInt);
    
39.         mtCurBar = refCurBar;
    
40.         mtClose = refClose;
    
41.        
    
42.         j = MtRef(mtBarCnt,EffRatioLength);
    
43.         i = MtRef(mtBarCnt,1);
    
44.         NetChg = Abs( mtClose - mtClose[j] );
    
45.         TotChg = MtSummation(Abs( mtClose -mtClose[i] ),mtBarCnt,EffRatioLength);
    
46.                
    
47.         if (MtCurBar == 0 || AMAValue[mtBarCnt] == InvalidNumeric)
    
48.         {
    
49.                 AMAValue = mtClose;
    
50.         }Else
    
51.         {
    
52.                 EffRatio = IIF(TotChg > 0, NetChg / TotChg, 0);
    
53.                 SFDiff = 2 / ( FastAvgLength + 1 ) - 2 / ( SlowAvgLength + 1 );               
    
54.                 ScaledSFSqr = Sqr( 2 / ( SlowAvgLength + 1 ) + EffRatio * SFDiff );               
    
55.                 AMAValue = AMAValue[1] + ScaledSFSqr * ( mtClose - AMAValue[1] );
    
56.         }
    
57.         oAMAValue = AMAValue;
    
58.         Return mtBarCnt;
    
59. End
    
60. 
    
61. //------------------------------------------------------------------------
    
62. // 编译版本        GS2010.12.08
    
63. // 版权所有        TradeBlazer Software 2003－2010
    
64. // 更改声明        TradeBlazer Software保留对TradeBlazer平
    
65. //                        台每一版本的TradeBlazer公式修改和重写的权利
    
66. //------------------------------------------------------------------------

复制代码

风驰

tw321

追涨杀跌 发表于 2011-6-8 17:51
现在可以举个例子来说明，怎么用上面的几个函数来做交易策略了。假如我们的策略如下：
1、我们以日线的均线 ...

慢慢学习中 谢谢

domodo

追涨杀跌 老师好久没有来这里了，呼唤~~

lanmeng_818

追涨杀跌 发表于 2011-6-8 17:51
现在可以举个例子来说明，怎么用上面的几个函数来做交易策略了。假如我们的策略如下：
1、我们以日线的均线 ...

太好了，不过我想问一下，这个直接用的话，是可以应用于任何小周期对大周期的调用么？还是只能是1分钟调用其他周期？我建好用户函数后，直接引用用户函数，能实现3分钟调用5分钟数据么？因为3分钟K线和5分钟的k线不能很好对应，这样调用准确么？

zcquan123

一平

老师，你好，我根据你写的小周期数据换成大周期数据测试了下，编译不通过啊。
  Return barCnt;

显示 Return 语句的返回类型与公式定义的返回类型值类型不符。
请教下，是什么问题啊。
函数的返回值类型为数值型，在模板选择时，选“数值型”

yangtse010

好帖。 顶

warkstar

留个脚印

慕容表哥

贴图附上