设为首页收藏本站

 找回密码
 注册
楼主: 趋势跟踪
打印 上一主题 下一主题

美林证券交易大师的交易策略,请高手编写成TB交易模型 [复制链接]

Rank: 5Rank: 5

精华
1
UID
42516
积分
1239
帖子
264
主题
31
阅读权限
60
注册时间
2011-5-25
最后登录
2014-9-23
1#
发表于 2012-5-25 17:58:46 |显示全部楼层
本帖最后由 rookies 于 2012-5-25 18:06 编辑

Params
        Numeric Lots(1);
       
Vars
        Numeric MaEma30;
        Numeric MaEma23;
        NumericSeries MyEntryPrice;
        NumericSeries MyExitPrice;
       
Begin

        MaEma30=XAverage(Close,30);
        MaEma23=XAverage(Close,23);
        PlotNumeric("MaEma30",MaEma30);
        PlotNumeric("MaEma23",MaEma23);
       
        If(CurrentBar>23)
        {

                If(Close>MaEma30 && Close>MaEma23 && Close[1]<Max(MaEma30,MaEma23) &&MarketPosition!=1 ) //收盘价大于30、23天EMA且没有多单
                {
                        MyEntryPrice=High;   //将当天最高价置入
                                       
                }
                Else
                {
                        MyExitPrice=MyExitPrice[1];
                }
               
                If(High>MyEntryPrice && MarketPosition!=1 && MyEntryPrice!=0)
                {
                       
                        Buy(Lots,Max(Open,MyEntryPrice));
                        MyEntryPrice=0;  
                        Return;
                }
               
                If(Close<MaEma30 && Close<MaEma23 && Close[1]>Min(MaEma30,MaEma23)&& MarketPosition!=-1)// && GetGlobalVar(1)!=-1)
                {
                        MyExitPrice=Low;
                }
                Else
                {
                        MyExitPrice=MyExitPrice[1];
                }
               
                If(Low<MyExitPrice && MarketPosition!=-1 && MyExitPrice!=0)
                {
                       
                        SellShort(Lots,Min(Open,MyExitPrice));
                        MyExitPrice=0;
               
                }
        }
        Commentary("MyEntryPrice"+Text(MyEntryPrice));
        Commentary("MyExitPrice"+Text(MyExitPrice));
        Commentary("GetGlobalVar(0)"+Text(GetGlobalVar(0)));
        Commentary("GetGlobalVar(1)"+Text(GetGlobalVar(1)));
End


不知道是不是楼主想要的效果?

使用道具 举报

Rank: 5Rank: 5

精华
1
UID
42516
积分
1239
帖子
264
主题
31
阅读权限
60
注册时间
2011-5-25
最后登录
2014-9-23
2#
发表于 2012-5-25 18:01:22 |显示全部楼层
本帖最后由 rookies 于 2012-5-25 18:02 编辑

这个模型的编程难点在于如何记录“起始柱”的最高价和最低价,并以其作为做多或做空的建仓点。因为“起始柱”在突破两条均线后,有可能是下一根K线就突破“起始柱”的高低点,也有可能间隔几根K线之后才突破其高低点。本人TB编程能力有限,希望各位老师帮忙老师将这个策略编写成为交易模型。





If(满足条件)

记录数据变量

Else
数据变量=数据变量[1]


记得将数据变量声明为数组  Numericseries

使用道具 举报

Rank: 5Rank: 5

精华
1
UID
42516
积分
1239
帖子
264
主题
31
阅读权限
60
注册时间
2011-5-25
最后登录
2014-9-23
3#
发表于 2012-5-25 18:08:22 |显示全部楼层
另外  EMA   是应该用XAverage    而MA才是Average

使用道具 举报

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

bottom

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

GMT+8, 2024-5-19 17:40

Powered by Discuz! X2 LicensedChrome插件扩展

© 2011-2012 交易开拓者 Inc.

回顶部