日内KDJ跨周期交易系统，请高手支招

北门吹风

本人是刚来的新手，有个日内交易设想，涉及到跨周期，不知如何实现，哪位高手支招？具体写下代码参考。

万分感谢。

大致想法：


如果5 分钟 KDJ 金叉上穿，当日内（注意这个条件）同时，15 分钟KDJ 金叉上穿，做多。
如果5 分钟 KDJ 死叉下穿，当日内（注意这个条件）同时，15 分钟KDJ 死叉下穿，做空。

lh948

请参考http://tradeblazer.net/forum/thread-2785-1-1.html
建议使用7、通过文件读写函数实现跨周期数据调用！

北门吹风

呵呵，貌似之前一些贴子有人说的：“要让更多的人使用TB，就要减少学习难度，编写说明文档的时候不要把用户当成开发人员一样的水平看待。TB公司老是爱犯这样的错误。”
小弟刚来，看参考例子，还是写不出来。有高手愿意的话，请帮忙助力。不胜感激。也希望以上话没有冒犯。

lh948

回复 3# 北门吹风


以上实现不难的，参照例子可以写出。我帮你写了您就没有动手的机会了。
等会我贴上代码，您参考一下。

北门吹风

lh948，非常感谢。期待您的代码。
之前一直用文华的，后在跨周期等方面，灵活性方面，大家说开拓者好，所以开始转用开拓者。还在学习中，确实要灵活，能更宽泛的实现一些想法。
不过，觉得文华有点做的好。已经设计的、现成的交易系统比较多。初学者可以直接模仿、改写。从初学者的角度出发，除了学习现有的语言规范，而从直接、现成的交易系统改造、学习，是快捷的学习路径。希望开拓者可以考虑这方面多做一些工作。从使用者的角度出发，希望开拓者越来越好。

lh948

回复 5# 北门吹风


15min图公式

1. Params
   
2.         Numeric Length(14);                       
   
3.         Numeric SlowLength(3);       
   
4.         Numeric SmoothLength(3);
   
5. Vars
   
6.         NumericSeries HighestValue;                               
   
7.         NumericSeries LowestValue;               
   
8.         NumericSeries KValue;
   
9.         Numeric SumHLValue;
   
10.         Numeric SumCLValue;
    
11.         Numeric DValue;
    
12.         Numeric JValue;
    
13. Begin
    
14.         HighestValue = HighestFC(High, Length);
    
15.         LowestValue = LowestFC(Low, Length);
    
16.         SumHLValue = SummationFC(HighestValue-LowestValue,SlowLength);
    
17.         SumCLValue = SummationFC(Close - LowestValue,SlowLength);
    
18.         If(SumHLValue <> 0)
    
19.         {
    
20.                 KValue = SumCLValue/SumHLValue*100;
    
21.         }Else
    
22.         {
    
23.                 KValue = 0;
    
24.         }
    
25.         DValue = AverageFC(KValue,SmoothLength);
    
26.         JValue = 3*KValue - 2*DValue;
    
27.         PlotNumeric("K",KValue);
    
28.         PlotNumeric("D",DValue);
    
29.         PlotNumeric("J",JValue);
    
30.        
    
31.         SetTBProfileString(Symbol,DateTimeToString(Date+Time)+"M15_KDJ_K",Text(KValue));
    
32.         SetTBProfileString(Symbol,DateTimeToString(Date+Time)+"M15_KDJ_D",Text(DValue));
    
33.         SetTBProfileString(Symbol,DateTimeToString(Date+Time)+"M15_KDJ_J",Text(JValue));
    
34. End

复制代码

lh948

回复 5# 北门吹风


5min图公式

1. Params
   
2.         Numeric Length(14);                       
   
3.         Numeric SlowLength(3);       
   
4.         Numeric SmoothLength(3);
   
5. Vars
   
6.         NumericSeries HighestValue;                               
   
7.         NumericSeries LowestValue;               
   
8.         NumericSeries KValue;
   
9.         Numeric SumHLValue;
   
10.         Numeric SumCLValue;
    
11.         Numeric DValue;
    
12.         Numeric JValue;
    
13.         Numeric k15Value;
    
14.         Numeric D15Value;
    
15.         Numeric J15Value;
    
16. Begin
    
17.         HighestValue = HighestFC(High, Length);
    
18.         LowestValue = LowestFC(Low, Length);
    
19.         SumHLValue = SummationFC(HighestValue-LowestValue,SlowLength);
    
20.         SumCLValue = SummationFC(Close - LowestValue,SlowLength);
    
21.         If(SumHLValue <> 0)
    
22.         {
    
23.                 KValue = SumCLValue/SumHLValue*100;
    
24.         }Else
    
25.         {
    
26.                 KValue = 0;
    
27.         }
    
28.         DValue = AverageFC(KValue,SmoothLength);
    
29.         JValue = 3*KValue - 2*DValue;
    
30.        
    
31.         K15Value=Value(GetTBProfileString(Symbol,DateTimeToString(Date+Time)+"M15_KDJ_K"));
    
32.         D15Value=Value(GetTBProfileString(Symbol,DateTimeToString(Date+Time)+"M15_KDJ_D"));
    
33.         J15Value=Value(GetTBProfileString(Symbol,DateTimeToString(Date+Time)+"M15_KDJ_J"));
    
34.         PlotNumeric("K15",K15Value);
    
35.         PlotNumeric("D15",D15Value);
    
36.         PlotNumeric("J15",J15Value);
    
37. End

复制代码

lh948

回复 7# lh948


更多跨周期请才参考：http://tradeblazer.net/forum/thread-15184-1-1.html

北门吹风

非常感谢lh948 ，我先仔细学习下，有问题再具体咨询。

蔡宛宏

自己动手  丰衣足食