设为首页收藏本站

 找回密码
 注册
查看: 1962|回复: 5

请教!这样编写有什么问题吗?非常感谢! [复制链接]

Rank: 1

精华
0
UID
171598
积分
10
帖子
7
主题
3
阅读权限
10
注册时间
1970-1-1
最后登录
2019-7-8
发表于 2017-6-26 16:21:16 |显示全部楼层
Params       
               
        Numeric Length1(20);
       
        Numeric L1(10);
       
        Numeric L2(2.5);
       
        Numeric Lots(1);

Vars

        NumericSeries AvgValue1;       
       
        NumericSeries HHLL;
   
    NumericSeries Highest_entry;
    NumericSeries Lowest_entry;
                 
        BoolSeries Con1;
    BoolSeries Con2;
        BoolSeries Con3;
    BoolSeries Con4;
        BoolSeries Con5;
    BoolSeries Con6;
       
Begin

        If(!CallAuctionFilter()) Return;
       
        AvgValue1 =  (C[1]+H[1]+L[1]+O[1])/4;
       
        HHLL= Highest(High[1],L1) - Lowest(Low[1],L1);
   
    If(BarsSinceEntry<=1){
        Highest_entry = Max(High,High[1]);
            Lowest_entry = Min(Low,Low[1]);
        }
        Else{
            If(High>Highest_entry) Highest_entry = High;
                Else Highest_entry = Highest_entry[1];
               
                If(Low<Lowest_entry) Lowest_entry=Low;
                Else Lowest_entry =Lowest_entry[1];
        }            
          
    Con1 = AvgValue1>=Highest(AvgValue1,Length1) && C[1]>C[2] && C[2]>C[3];
    Con2 = AvgValue1<= Lowest(AvgValue1,Length1) && C[1]<C[2] && C[2]<C[3];
       
        Con3 = AvgValue1>=Highest(AvgValue1,Length1) && C[1]>C[2];
    Con4 = AvgValue1<= Lowest(AvgValue1,Length1) && C[1]<C[2];   
       
        Con5 = C[1]<=LastEntryPrice - HHLL[1] ||  C[1] <= Highest_entry - L2*HHLL[1];
    Con6 = C[1]>=LastEntryPrice + HHLL[1] ||  C[1] >=  Lowest_entry + L2*HHLL[1];
       
        //---------------------------------------------------------------
       
        If(MarketPosition==0 And CurrentBar>60)
       
          {
                If(Con1 And Vol>0 And !Con2)
                  {
                        Buy(lots, Open);
                        Return;
                  }
                If(Con2 And Vol>0 And !Con1)
                  {
                        SellShort(lots,Open);
                        Return;
                  }
           }       
       
        //---------------------------------------------------------------
       
        If(MarketPosition == -1)
        {               
               
                If(BarsSinceEntry>0 And Vol>0 And (Con1 Or Con3 Or Con6))
                {
                        BuyToCover(lots,Open);
                        Commentary("平空");
                        Return;
                }               
       
        }
       

        If(MarketPosition == 1)
        {
                               
                If(BarsSinceEntry>0 And Vol>0 And (Con2 Or Con4 Or Con5))
                {
                        Sell(lots,Open);
                        Commentary("平多");
                        Return;
                }       
                       
        }
       

End

Rank: 1

精华
0
UID
171598
积分
10
帖子
7
主题
3
阅读权限
10
注册时间
1970-1-1
最后登录
2019-7-8
发表于 2017-6-27 21:47:31 |显示全部楼层
烦请大侠给诊断一下吧,有时感觉CON5 CON6没起作用

使用道具 举报

Rank: 1

精华
0
UID
171598
积分
10
帖子
7
主题
3
阅读权限
10
注册时间
1970-1-1
最后登录
2019-7-8
发表于 2017-6-28 19:57:07 |显示全部楼层
真冷清,好心人都在忙呢~  烦请版主帮忙看一下。谢谢!

使用道具 举报

Rank: 1

精华
0
UID
171598
积分
10
帖子
7
主题
3
阅读权限
10
注册时间
1970-1-1
最后登录
2019-7-8
发表于 2017-6-28 19:57:31 |显示全部楼层
真冷清,好心人都在忙呢~  烦请版主帮忙看一下。谢谢!

使用道具 举报

Rank: 1

精华
0
UID
171598
积分
10
帖子
7
主题
3
阅读权限
10
注册时间
1970-1-1
最后登录
2019-7-8
发表于 2017-6-28 19:58:03 |显示全部楼层
真冷清,好心人都在忙呢~  烦请版主帮忙看一下。谢谢!

使用道具 举报

Rank: 1

精华
0
UID
260072
积分
34
帖子
17
主题
1
阅读权限
10
注册时间
2017-12-5
最后登录
2020-6-9
发表于 2018-4-10 09:33:55 |显示全部楼层
anshan8888 发表于 2017-6-28 19:58
真冷清,好心人都在忙呢~  烦请版主帮忙看一下。谢谢!

LASTENTRYPRICE 没有持仓的情况下是无效的

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

bottom

静态版|手机版|联系我们|交易开拓者 ( 粤ICP备07044698   

GMT+8, 2024-3-28 16:28

Powered by Discuz! X2 LicensedChrome插件扩展

© 2011-2012 交易开拓者 Inc.

回顶部