日内交易系统

sorakiraa

1. //------------------------------------------------------------------------
   
2. // 简称: Open_Breaker_Filtered
   
3. // 名称: 价格过滤后的开盘突破系统
   
4. // 类别: 公式应用
   
5. // 类型: 用户应用
   
6. // 输出:
   
7. //------------------------------------------------------------------------
   
8. Params
   
9.         Numeric N(100);
   
10.         Numeric LOTS(1);
    
11. 
    
12. Vars
    
13.         Numeric KPJ;
    
14.         Numeric NN;
    
15.         Numeric ZG;
    
16.         Numeric ZD;
    
17. 
    
18. Begin
    
19.         KPJ=OpenD(0);
    
20.         NN=BarsSinceToday;
    
21.         ZG=HighestFC(High,NN);
    
22.         ZD=LowestFC(Low,NN);
    
23.        
    
24.         If(High>KPJ*(1+N/10000)&&ZD>KPJ*(1-N/1000)&&Time>0.0900&&Time<0.1455)
    
25.         Buy(LOTS,Open);
    
26.         If(Low<KPJ*(1-N/10000)&&ZG<KPJ*(1+N/1000)&&Time>0.0900&&Time<0.1455)
    
27.         SellShort(LOTS,Open);
    
28.         If(Time>=0.1455||(ZD<KPJ*(1-N/1000)&&BarsLast(High>KPJ*(1+N/10000))<BarsLast(Low<KPJ*(1-N/10000))))
    
29.         BuyToCover(LOTS,Open);
    
30.         If(Time>=0.1455||(ZG>KPJ*(1+N/1000)&&BarsLast(High>KPJ*(1+N/10000))>BarsLast(Low<KPJ*(1-N/10000))))
    
31.         Sell(LOTS,Open);
    
32.        
    
33. End
    
34. 
    
35. 
    
36. //------------------------------------------------------------------------
    
37. // 编译版本        GS2010.12.08
    
38. // 用户版本        2012/10/11 09:19
    
39. // 版权所有        sora4you
    
40. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
    
41. //                        每一版本的TrabeBlazer公式修改和重写的权利
    
42. //------------------------------------------------------------------------

复制代码

随便发一个，其中用到一个函数：

1. //------------------------------------------------------------------------
   
2. // 简称: BarsLast
   
3. // 名称: BarsLast
   
4. // 类别: 用户函数
   
5. // 类型: 用户函数
   
6. // 输出: 数值型
   
7. //------------------------------------------------------------------------
   
8. 
   
9. Params
   
10.         BoolSeries Con;
    
11. Vars
    
12.         Numeric i;
    
13.         Numeric Num(1);
    
14. Begin
    
15.         for  i = 1 To BarsSinceEntry
    
16.     {
    
17.             if(Con)
    
18.         {
    
19.             Return Num;
    
20.         }else
    
21.         {
    
22.             Num=Num+1;
    
23.         }
    
24.     }
    
25. End
    
26. 
    
27. //------------------------------------------------------------------------
    
28. // 编译版本        GS2010.12.08
    
29. // 用户版本        2012/10/11 09:47
    
30. // 版权所有        sora4you
    
31. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
    
32. //                        每一版本的TrabeBlazer公式修改和重写的权利
    
33. //------------------------------------------------------------------------

复制代码