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

lulin168

好贴，好人啊

oceanwindtb

这个贴要研究下  谢谢LZ老师....

haomai01

请老师搞个卡夫曼自适应移动平均吧！
谢谢

读书山林

把楼主的前面的几个帖子搞透，不难写出来 试着写写看

haomai01

读书山林 要吗你帮忙写写看，俺现在水平还是有限的。谢谢了！

tif

感谢楼主百问不厌的精神，衷心感谢。

追涨杀跌

回复 93# 致富

文华我用得很少，所以理解这段代码的逻辑可能会有偏差，我试着用TB改写成了一个交易系统，您看看是否和原指标的意思一样。

1. Params
   
2.         Numeric N(5);
   
3. Vars
   
4.         Numeric Todayopen;
   
5.         Numeric H1;
   
6.         Numeric L1;
   
7.         NumericSeries HH1;
   
8.         NumericSeries LL1;
   
9.         NumericSeries BuyOrSell(0);
   
10. Begin
    
11.         TodayOpen = Round(OpenD(1),0);
    
12.         if (Barstatus == 2)
    
13.         {
    
14.                 PlotString("todayopen",text(todayopen),High+1,Yellow);
    
15.                 Unplot("todayopen",1);
    
16.         }
    
17.         H1 = HighestFC(Close,N);
    
18.         L1 = LowestFC(Close,N);
    
19.         //PlotNumeric("H1",H1,0,white);
    
20.         //PlotNumeric("L1",L1,0,darkgray);
    
21.         HH1 = IIF(close == L1, H1, HH1[1]);
    
22.         LL1 = IIF(Close == H1, L1, LL1[1]);
    
23.         PlotNumeric("HH1",HH1,0,Yellow);
    
24.         PlotNumeric("LL1",LL1,0,blue);
    
25.         BuyOrSell = IIF(Close > HH1, 1, iif(close < LL1, -1, 0));
    
26.         if (marketposition <> 1 and BuyorSell[1] == 1)
    
27.         {
    
28.                 Buy(1,Open);
    
29.         }
    
30.         if (marketPosition <> -1 and BuyorSell[1] == -1)
    
31.         {
    
32.                 SellShort(1,Open);
    
33.         }
    
34. End

复制代码

读书山林

追涨杀跌 老师的跨期sar还没搞出来吗

illusion

请追涨杀跌老师写个slowkd的跨周期,谢谢!!

illusion

回复 96# illusion

slowkd的跨周期
老师,我照着mtkdj依葫芦画瓢,看看对吗?

1. Params
   
2.         Numeric TimeFrame(1440);        // 目标时间周期参数，参数说明参见MtBar
   
3.         Numeric BarsBack(1);         // 目标时间周期BAR偏移参数，说明见MtBar函数
   
4.         Numeric Length(9);                        
   
5.         Numeric M1(3);        
   
6.                 Numeric M2(3);        
   
7.                 Numeric M3(3);        
   
8.         
   
9.         NumericRef oKValue;
   
10.         NumericRef oDValue;
    
11. Vars
    
12.         NumericSeries mtBarCnt;
    
13.         NumericSeries mtOpen;
    
14.         NumericSeries mtHigh;
    
15.         NumericSeries mtLow;
    
16.         NumericSeries mtClose;
    
17.         NumericSeries mtVol;
    
18.         NumericSeries mtOpenInt;
    
19.         Numeric refCurBar;
    
20.         Numeric refOpen;
    
21.         Numeric refHigh;
    
22.         Numeric refLow;
    
23.         Numeric refClose;
    
24.         Numeric refVol;
    
25.         Numeric refOpenInt;
    
26. 
    
27.         NumericSeries HighestValue;                                
    
28.         NumericSeries LowestValue;                                       
    
29.         NumericSeries KValue;
    
30.         Numeric DValue;
    
31.         Numeric i;
    
32.         Numeric j(0);
    
33.         NumericSeries FASTK;
    
34.                 NumericSeries RSV;
    
35. 
    
36. Begin
    
37.         mtBarCnt = MtBar(TimeFrame,BarsBack,refCurBar,refOpen,refHigh,refLow,refClose,refVol,refOpenInt);
    
38.         mtHigh = refHigh;
    
39.         mtLow = refLow;
    
40.         mtClose = refClose;
    
41.         
    
42.         HighestValue = mtHigh;
    
43.         LowestValue = mtLow;
    
44.         For i = 1 to Length-1
    
45.         {
    
46.                 j = j + mtBarCnt[j];
    
47.                 If (mtHigh[j] == InvalidNumeric) HighestValue = InvalidNumeric;
    
48.                 Else If ( mtHigh[j] > HighestValue) HighestValue = mtHigh[j];
    
49.                 If (mtLow[j] == InvalidNumeric) LowestValue = InvalidNumeric;
    
50.                 Else If ( mtLow[j] < LowestValue) LowestValue = mtLow[j];
    
51.         }
    
52.                
    
53.                 RSV=(Close-LowestValue)/(HighestValue-LowestValue)*100;
    
54.                 FASTK=SMA(RSV,M1,1);
    
55.                 KValue=SMA(RSV,M2,1);
    
56.                 DValue=SMA(KValue,M3,1);
    
57.                
    
58.                 oKValue = KValue;
    
59.         oDValue = DValue;
    
60.         return mtBarCnt;
    
61. End

复制代码

劳烦老师给改改,谢谢.