设为首页收藏本站

 找回密码
 注册
查看: 4667|回复: 11
打印 上一主题 下一主题

免费文化TB转模型互转,只要你有好的文化或者TB模型,我都可以免费帮你互转。 [复制链接]

Rank: 1

精华
0
UID
253578
积分
48
帖子
31
主题
5
阅读权限
10
注册时间
2017-7-7
最后登录
2018-5-17
跳转到指定楼层
1#
发表于 2017-7-22 09:30:18 |只看该作者 |倒序浏览
免费文化TB转模型互转,只要你有好的文化或者TB模型,我都可以免费帮你互转。

会编程就是没有好的思路,只要您有好的思路也可以免费编程,实现共赢,qq523305738

下面分享一个tb的模型,还请高手们多指教。
  1. //------------------------------------------------------------------------
  2. // 简称: BT
  3. // 名称: 本体
  4. // 类别: 公式应用
  5. // 类型: 用户应用
  6. // 输出: Void
  7. //------------------------------------------------------------------------
  8. Params
  9.         Numeric SS(1);//(1,100,1)
  10.         Numeric K1(0.3);//(0.1,1,0.1)
  11.         Numeric K2(0.6);//(0.1,1,0.1)
  12.         Numeric BOCP(0.25);//(0,1,0.01)
  13.         Numeric FBOCP(0.85);//(0,1,0.01)
  14.         Numeric AR(6);

  15. Vars
  16.         Numeric Longtrade(0);//多仓次数
  17.         Numeric Shorttrade(0);//空仓次数
  18.         Numeric LMarket(0);//趋买市
  19.         Numeric SMarket(0);//趋卖市
  20.         Numeric LStop(0);//多头止损价
  21.         Numeric SStop(0);//空头止损价
  22.         Numeric i;
  23.         Numeric AR10(0);//十日平均波幅
  24.         Numeric ACO10(0);//十日平均开收盘区间
  25.         Bool key(False);//进场条件
  26.         Numeric LBreak;//多头突破价
  27.         Numeric SBreak;//空头突破价
  28.         Numeric LToS;//多翻空
  29.         Numeric SToL;//空翻多
  30.         Numeric Lots;//开仓量
  31.         Numeric LBuy;//趋买市多头入场价
  32.         Numeric LSell;//趋买市空头入场价
  33.         Numeric SBuy;//趋卖市多头入场价
  34.         Numeric SSell;//趋卖市空头入场价
  35.        
  36.         NumericSeries O1;
  37.         NumericSeries C1;
  38.         NumericSeries C2;
  39.         NumericSeries L1;
  40.         NumericSeries H1;
  41.         NumericSeries H0;
  42.         NumericSeries L0;
  43.         NumericSeries O0;
  44.         Numeric LL3;
  45.         Numeric HH3;
  46. //AR计算
  47.         NumericSeries AR_1(0);
  48.         NumericSeries AR_2(0);
  49. Begin
  50. //本策略适用于股指5分钟线,如要使用其他周期及商品,请自行修改时间
  51.        
  52.         O1 = OpenD(1);
  53.         C1 = CloseD(1);
  54.         C2 = CloseD(2);
  55.         L1 = LowD(1);
  56.         H1 = HighD(1);
  57.         H0 = Highest(High[1],BarsSinceToday-1);
  58.         L0 = Lowest(Low[1],BarsSinceToday-1);
  59.         O0 = OpenD(0);
  60.         LL3 = Lowest(Low[1],3);
  61.         HH3 = Highest(High[1],3);
  62.         ACO10=0;
  63.         AR10=0;
  64.        
  65.         AR10=AR_D(10);
  66.         Commentary("AR10="+Text(AR10 ));
  67.        
  68.         ACO10 = ACO(10);
  69.         Commentary("ACO10="+Text(ACO10 ));
  70.        
  71.         key = Abs(C1 - O1) < 0.85*ACO10;//0.85
  72.        
  73.         LBreak = H1 + BOCP * AR10;
  74.         SBreak = L1 - BOCP * AR10;
  75.         LToS = L1 + FBOCP * AR10;
  76.         SToL = H1 - FBOCP * AR10;
  77.         //PlotNumeric("LBreak",LBreak);
  78.         //PlotNumeric("SBreak",SBreak);
  79.         //PlotNumeric("LToS",LToS);
  80.         //PlotNumeric("SToL",SToL);       
  81.        
  82.         Lots = SS;
  83.          //LBuy = O0 + K1 * AR10;
  84.          //LSell = O0 - K2 * AR10;
  85.          //PlotNumeric("LBuy",LBuy);
  86.          //PlotNumeric("LSell",LSell);
  87.          //开仓条件
  88.         If(C1<C2) //趋买市
  89.          {
  90.                  LMarket = 1;
  91.                 LBuy = O0 + K1 * AR10;
  92.                 LSell = O0 - K2 * AR10;
  93.                 PlotNumeric("LBuy",LBuy);
  94.                 PlotNumeric("LSell",LSell);
  95.         }
  96.         If(C1>C2)//趋卖市
  97.         {
  98.                 SMarket = 1;
  99.                 SBuy = O0 + K2 * AR10;
  100.                 SSell = O0 - K1 * AR10;
  101.                  PlotNumeric("SBuy",SBuy);
  102.                  PlotNumeric("SSell",SSell);               

  103.         }
  104.        
  105.         //----------------------交易系统-----------------------------
  106.        
  107.         //-----------突破-----------
  108.         If(Time>9.45/100 And Time<14.30/100 And key)
  109.         {
  110.                 //趋买市
  111.                 If(LMarket==1)
  112.                 {
  113.                         If(Longtrade==0 && C[1] > LBuy && MarketPosition==0 && BarsSinceEntry>0)//BarsSinceEntry>0
  114.                         {
  115.                                 Buy(Lots,O);
  116.                                 LStop = Min(EntryPrice-0.25*AR10,EntryPrice-3*BigPointValue);
  117.                                 Longtrade=1;
  118.                                 Return;
  119.                         }
  120.                         If(Shorttrade==0 && C[1] < LSell && MarketPosition==0 && BarsSinceEntry>0)//&& BarsSinceEntry>0
  121.                         {
  122.                                 SellShort(Lots,O);
  123.                                 SStop = Max(EntryPrice+0.25*AR10,EntryPrice+3*BigPointValue);
  124.                                 Shorttrade=1;
  125.                                 Return;
  126.                         }
  127.                 }
  128.                 //趋卖市
  129.                 If(SMarket==1)
  130.                 {
  131.                         If(Longtrade==0 && C[1] > SBuy && MarketPosition==0 && BarsSinceEntry>0)// && BarsSinceEntry>0
  132.                         {
  133.                                 Buy(Lots,O);
  134.                                 LStop = Min(EntryPrice-0.25*AR10,EntryPrice-3*BigPointValue);
  135.                                 Longtrade=1;
  136.                                 Return;
  137.                         }
  138.                         If(Shorttrade==0 && C[1] < SSell && MarketPosition==0 && BarsSinceEntry>0)// && BarsSinceEntry>0
  139.                         {
  140.                                 SellShort(Lots,O);
  141.                                 SStop = Max(EntryPrice+0.25*AR10,EntryPrice+3*BigPointValue);
  142.                                 Shorttrade=1;
  143.                                 Return;
  144.                         }
  145.                 }
  146.         }
  147.        
  148.         //-----------突破失败-----------
  149.        
  150.         //{多头突破失败情况1:价格曾经高于多头突破确认价,最新价又回落至空翻多确认价}
  151.         If(H0 > LBreak And C[1] < LToS And Time < 14.30/100 And Shorttrade==0 && MarketPosition<>1)
  152.         {
  153.                 SellShort(Lots,O);
  154.                 SStop=Min(EntryPrice+0.15*AR10,EntryPrice+3*BigPointValue);
  155.                 Shorttrade=1;
  156.                 Return;
  157.         }
  158.         //{多头突破失败情况2:突破入场后,行情反转。止损的同时我们反手开空,但前提是时间在中午11:30之前,
  159.         //且多头进场在至少4根K之前。瞬间止损我们不允许反转,因为这往往是市场的膝跳反射}
  160.         If(MarketPosition==1 And Time < 14.30/100 And Shorttrade==0)
  161.         {
  162.                 If(C[1] < LStop)
  163.                 {
  164.                         Sell(Lots,O);
  165.                         If(Time < 11.00/100 And BarsSinceEntry >4)
  166.                         {
  167.                                 SellShort(Lots,C);
  168.                                 SStop=Min(EntryPrice+0.15*AR10,EntryPrice+3*BigPointValue);
  169.                                 Shorttrade=1;
  170.                         }
  171.                 }
  172.         }
  173.        
  174.         //{空头突破失败情况1:价格曾经低于空头突破确认价,最新价又上涨至空翻多确认价}
  175.         If(L0<SBreak And C[1] > SToL And Time < 14.30/100 And Longtrade==0 && MarketPosition<>-1)
  176.         {
  177.                 Buy(Lots,O);
  178.                 Longtrade=1;
  179.         }
  180.         //{空头突破失败情况2:突破入场后,行情反转。止损的同时我们反手开多,但前提是时间在中午11:30之前,
  181.         //且空头进场在至少4根K之前。瞬间止损我们不允许反转,因为这往往是市场的膝跳反射}
  182.         If(MarketPosition==-1 And Time < 14.30/100 And Longtrade==0)
  183.         {
  184.                 If(C[1] > SStop)
  185.                 {
  186.                         BuyToCover(Lots,O);
  187.                         If(Time < 11.00/100 And BarsSinceEntry >4)
  188.                         {
  189.                                 Buy(Lots,O);
  190.                                 LStop=Max(EntryPrice-0.15*AR10,EntryPrice-3*BigPointValue);
  191.                                 Longtrade=1;
  192.                         }
  193.                 }
  194.         }
  195.        
  196.         //-----------止损-----------
  197.         //普通止损
  198.         If(MarketPosition==1 && C[1]<LStop And Time<15.00/100)
  199.         {
  200.                 Sell(Lots,O);
  201.         }
  202.         If(MarketPosition==-1 && C[1]>SStop And Time<15.00/100)
  203.         {
  204.                 BuyToCover(Lots,O);
  205.         }
  206.         //止损价调整
  207.         //{若持多单,而5分钟K高点超过了开仓价+50%10日平均波幅,止损调整为保本型 }
  208.                 IF(H0>EntryPrice+0.5*AR10)
  209.                 {
  210.                         LStop=EntryPrice+2*BigPointValue;
  211.                 }
  212.                 IF(L0<EntryPrice-0.5*AR10)
  213.                 {
  214.                         SStop=EntryPrice-2*BigPointValue;
  215.                 }
  216.         //{若时间处于14:30以后,多头跟踪止损为过去3个5分钟的最高低点与多空头止损价中的较大值}
  217.         IF(TIME>=14.30/100)
  218.         {
  219.                 LStop=MAX(LStop,LL3);
  220.                 SStop=MIN(SStop,HH3);
  221.         }
  222.        
  223.         //-----------日内平仓-----------
  224.         IF(TIME>=14.55/100)
  225.         {
  226.                 //收盘平多
  227.                 SELL(0,O);
  228.                 //收盘平空
  229.                 BuyToCover(0,O);
  230.                 LMarket=0;
  231.                 SMarket=0;
  232.                 Longtrade=0;
  233.                 Shorttrade=0;
  234.                 LStop=0;
  235.                 SStop=0;
  236.         }
  237.        
  238. End

  239. //------------------------------------------------------------------------
  240. // 编译版本:        2017-07-10 082154
  241. // 内核版本:        V2.6.2.14
  242. // 版权所有        zxjt30920087
  243. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
  244. //                        每一版本的TradeBlazer公式修改和重写的权利
  245. //------------------------------------------------------------------------
复制代码
已有 2 人评分威望 收起 理由
kookzw + 2 赞一个!
jinxin168 + 2 神马都是浮云

总评分: 威望 + 4   查看全部评分

Rank: 2

精华
0
UID
216063
积分
92
帖子
57
主题
12
阅读权限
30
注册时间
2015-8-4
最后登录
2020-12-20
2#
发表于 2017-7-22 23:15:00 |只看该作者
大哥,编译错误!66行

使用道具 举报

Rank: 1

精华
0
UID
253578
积分
48
帖子
31
主题
5
阅读权限
10
注册时间
2017-7-7
最后登录
2018-5-17
3#
发表于 2017-7-23 10:37:20 |只看该作者
不好意忘了这个函数是我自己编的了,现在补上来,添加到用户函数调用就可以了。
  1. //------------------------------------------------------------------------
  2. // 简称: AR_D
  3. // 名称:
  4. // 类别: 用户函数
  5. // 类型: 用户函数
  6. // 输出: Numeric
  7. //------------------------------------------------------------------------
  8. Params
  9.         Numeric Length(10);
  10. Vars
  11.         NumericSeries SumValue_1(0);
  12.         NumericSeries SumValue;
  13.         Numeric i;
  14. Begin

  15.         SumValue_1 = 0;
  16.         for i = 1 to Length - 1
  17.         {
  18.                 SumValue_1 = SumValue_1 + (Abs(HighD(i) - LowD(i)));
  19.         }
  20.         SumValue=SumValue_1/Length;
  21.         Return SumValue;
  22. End


  23. //------------------------------------------------------------------------
  24. // 编译版本:        2017-07-10 151725
  25. // 内核版本:        V2.6.2.14
  26. // 版权所有        zxjt30920087
  27. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
  28. //                        每一版本的TradeBlazer公式修改和重写的权利
  29. //------------------------------------------------------------------------
复制代码

使用道具 举报

Rank: 2

精华
0
UID
251604
积分
64
帖子
53
主题
3
阅读权限
30
注册时间
2017-5-23
最后登录
2021-3-31
4#
发表于 2017-7-23 10:58:14 |只看该作者
感谢分享。楼主继续努力。

使用道具 举报

Rank: 1

精华
0
UID
253578
积分
48
帖子
31
主题
5
阅读权限
10
注册时间
2017-7-7
最后登录
2018-5-17
5#
发表于 2017-7-23 11:05:51 |只看该作者
xledoo 发表于 2017-7-22 23:15
大哥,编译错误!66行

不好意思,有个自编函数忘记发了,现在补上了。

使用道具 举报

Rank: 3Rank: 3

精华
0
UID
30248
积分
220
帖子
144
主题
23
阅读权限
40
注册时间
2011-3-24
最后登录
2022-2-22
6#
发表于 2017-7-23 11:26:44 |只看该作者
zxjt30920087 发表于 2017-7-23 11:05
不好意思,有个自编函数忘记发了,现在补上了。

69行的ACO函数,也没有

使用道具 举报

Rank: 1

精华
0
UID
253578
积分
48
帖子
31
主题
5
阅读权限
10
注册时间
2017-7-7
最后登录
2018-5-17
7#
发表于 2017-7-23 14:40:02 |只看该作者
89578251 发表于 2017-7-23 11:26
69行的ACO函数,也没有

真是不好意,总是忘事。
  1. //------------------------------------------------------------------------
  2. // 简称: ACO
  3. // 名称: 求十天开盘和收盘平均振幅
  4. // 类别: 用户函数
  5. // 类型: 用户函数
  6. // 输出: Numeric
  7. //------------------------------------------------------------------------
  8. Params
  9.         Numeric Length(10);
  10. Vars
  11.         NumericSeries SumValue_1(0);
  12.         NumericSeries SumValue;
  13.         Numeric i;
  14. Begin

  15.         SumValue_1 = 0;
  16.         for i = 1 to Length - 1
  17.         {
  18.                 SumValue_1 = SumValue_1 + (Abs(CloseD(i) - OpenD(i)));
  19.         }
  20.         SumValue=SumValue_1/Length;
  21.         Return SumValue;
  22. End




  23. //------------------------------------------------------------------------
  24. // 编译版本:        2017-07-10 123645
  25. // 内核版本:        V2.6.2.14
  26. // 版权所有        zxjt30920087
  27. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
  28. //                        每一版本的TradeBlazer公式修改和重写的权利
  29. //------------------------------------------------------------------------
复制代码

使用道具 举报

Rank: 1

精华
0
UID
252928
积分
6
帖子
3
主题
1
阅读权限
10
注册时间
2017-6-23
最后登录
2017-7-26
8#
发表于 2017-7-25 11:15:25 |只看该作者
本帖最后由 jmsjinyu 于 2017-7-25 21:22 编辑

留了公式也不给转,伤心了

使用道具 举报

Rank: 10Rank: 10Rank: 10

精华
0
UID
237756
积分
20682
帖子
120
主题
31
阅读权限
200
注册时间
2016-7-26
最后登录
2020-3-7
9#
发表于 2017-7-25 13:02:45 |只看该作者
留个记号。等有好的思路找你。呵呵!

使用道具 举报

Rank: 1

精华
0
UID
253578
积分
48
帖子
31
主题
5
阅读权限
10
注册时间
2017-7-7
最后登录
2018-5-17
10#
发表于 2017-7-25 15:43:16 |只看该作者
kookzw 发表于 2017-7-25 13:02
留个记号。等有好的思路找你。呵呵!

好的,随时欢迎,

使用道具 举报

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

bottom

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

GMT+8, 2024-5-2 23:56

Powered by Discuz! X2 LicensedChrome插件扩展

© 2011-2012 交易开拓者 Inc.

回顶部