设为首页收藏本站

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

请教版主,程序交易能实现自动换月功能么? [复制链接]

Rank: 5Rank: 5

精华
0
UID
15246
积分
704
帖子
167
主题
74
阅读权限
60
注册时间
2010-8-17
最后登录
2021-9-5
跳转到指定楼层
1#
发表于 2011-1-5 17:33:31 |只看该作者 |倒序浏览
请教版主,程序交易能实现自动换月功能么?是需要自己编写,还是另有功能?

Rank: 10Rank: 10Rank: 10

精华
2
UID
4130
积分
20901
帖子
6519
主题
17
阅读权限
200
注册时间
2009-4-15
最后登录
2019-4-12
2#
发表于 2011-1-5 19:27:33 |只看该作者
不能自动换月

使用道具 举报

Rank: 3Rank: 3

精华
0
UID
20001
积分
201
帖子
47
主题
10
阅读权限
40
注册时间
2010-11-19
最后登录
2015-4-28
3#
发表于 2011-1-6 16:17:56 |只看该作者
其实只要使得“xx连续”可以交易就行了。

既然可以画出行情图表来,说明内部是有转换的。那只要在下单前把这个转换加进去就可以了,技术上实现应该不难,TB应该尽快解决这个问题,方便广大用户。

使用道具 举报

Rank: 8Rank: 8

精华
1
UID
64747
积分
782
帖子
192
主题
33
阅读权限
200
注册时间
2011-9-10
最后登录
2016-3-22
4#
发表于 2012-2-2 10:35:50 |只看该作者
直接上源码,欢迎相互交流!
  1. Params
  2.         Numeric Length1(5);
  3.         Numeric Length2(10);
  4.         Numeric Lots(1);
  5.        
  6. Vars
  7.         NumericSeries EMa1;
  8.         NumericSeries EMa2;
  9. Begin
  10.         EMa1=XAverage(Close[1], Length1);
  11.         EMa2=XAverage(Close[1], Length2);
  12.         PlotNumeric("EMa1",EMa1);
  13.         PlotNumeric("EMa2",EMa2);
  14.         If(CrossOver(EMa1,EMa2))
  15.         {
  16.                 If(Data0.Vol==Data1.Vol)
  17.                 {
  18.                         Data1.Buy(Lots,Data1.Open);
  19.                 }
  20.                 If(Data0.Vol==Data2.Vol)
  21.                 {
  22.                         Data2.Buy(Lots,Data2.Open);
  23.                 }
  24.                 If(Data0.Vol==Data3.Vol)
  25.                 {
  26.                         Data3.Buy(Lots,Data3.Open);
  27.                 }
  28.         }
  29.         If(CrossUnder(EMa1,EMa2))
  30.         {
  31.                 If(Data1.MarketPosition==1)
  32.                 {
  33.                         Data1.Sell(Lots,Data1.Open);
  34.                 }
  35.                 If(Data2.MarketPosition==1)
  36.                 {
  37.                         Data2.Sell(Lots,Data2.Open);
  38.                 }
  39.                 If(Data3.MarketPosition==1)
  40.                 {
  41.                         Data3.Sell(Lots,Data3.Open);
  42.                 }
  43.         }
  44. End
复制代码
附件: 你需要登录才可以下载或查看附件。没有帐号?注册
量化交易群:186100158
QQ:55297268

使用道具 举报

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

bottom

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

GMT+8, 2024-5-7 14:50

Powered by Discuz! X2 LicensedChrome插件扩展

© 2011-2012 交易开拓者 Inc.

回顶部