楼主: 挖矿专家
1285 2

[源码分享] 【每日一策】Matlab量化交易策略之 顺势逆势交易系统 [推广有奖]

  • 0关注
  • 74粉丝

讲师

22%

还不是VIP/贵宾

-

威望
0
论坛币
2016 个
通用积分
5.2622
学术水平
21 点
热心指数
21 点
信用等级
21 点
经验
6055 点
帖子
403
精华
0
在线时间
151 小时
注册时间
2017-2-8
最后登录
2017-6-27

相似文件 换一批

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
策略原理:
         多头入场:当前最低价比前25个交易周期的最低价还低,且ADX值跌破其均线
         空头入场:当前最高价比前25个交易周期的最高价还高,且ADX值突破其均线

         出场:动态跟踪止损出场


回测曲线(由Auto-trader提供回测报告)

顺势逆势交易系统.png

策略源码:

  1. function Strategy1(default_unit,default_exitway,freq)%

  2. targetList = traderGetTargetList();
  3. %获取目标资产信息
  4. HandleList = traderGetHandleList();
  5. %获取账户句柄
  6. global entry;
  7. global highbreak;
  8. for k=1:length(targetList);
  9.    
  10.     %--------------------仓位、K线、当前bar的提取-----------------------------%
  11.     %获取当前仓位
  12.     [marketposition,~,~]=traderGetAccountPosition(HandleList(1),targetList(k).Market,targetList(k).Code);
  13.     %策略中每次取数据的长度
  14.     dlags=20;
  15.     lags=80;
  16.     barnum=traderGetCurrentBar(targetList(k).Market,targetList(k).Code);
  17.     %数据长度限制
  18.     if(barnum<lags)
  19.         continue;
  20.     end
  21.     %获取K线数据
  22.     [time,open,high,low,close,volume,turnover,openinterest] = traderGetKData(targetList(k).Market,targetList(k).Code,'min',freq, 0-lags, 0,false,'FWard');
  23.     [Dtime,Dopen,Dhigh,Dlow,Dclose,Dvolume,Dturnover,Dopeninterest] = traderGetKData(targetList(k).Market,targetList(k).Code,'day',1,0-dlags, 0,false,'FWard');
  24.     if length(close)<lags || length(Dclose)<dlags
  25.         continue;
  26.     end
  27.     % 虚拟交易所初始手数
  28.    
  29.     %-------------------------交易逻辑-------------------------------%
  30.     %----------入场信号--------------------%
  31.     holdlength=14;
  32.     [PDIma,NDIma,ADX]=DMI(close,high,low,14,18);
  33.     ADXma=ma(ADX,18);
  34.     con1=ADX(end)<ADXma(end);
  35.     s(1).sellshortcon=high(end)>max(high(end-25:end-1)) && con1;
  36.     s(1).buycon=low(end)<min(low(end-25:end-1)) && con1;
  37.     %------------被动出场操作------------------%
  38.     %找到未平仓的订单
  39.     remain=remainorder(entry,k);
  40.     %对未平仓的订单进行平仓判断及操作
  41.     for i=1:length(remain.entrybar);
  42.         % 进仓以来的bar个数
  43.         barsinceentry=barnum-remain.entrybar(i);
  44.         backlen=20;    % 回溯的长度(进仓bar之前)
  45.         longstopcon=0;
  46.         shortstopcon=0;
  47.         % 回溯的信息提取
  48.         [backtime,backopen,backhigh,backlow,backclose,~,~,~] = traderGetKData(targetList(k).Market,targetList(k).Code,'min',freq, 0-barsinceentry-backlen, 0,false,'FWard');
  49.         % 根据出场方式计算出场条件
  50.         if remain.entryexitway(i)==1;
  51.             AFinitial=0;
  52.             AFparam=0.02;
  53.             AFmax=0.2;
  54.             Firstbarmultp=1;  %影响第一根bar的止损价,调高表示可忍受的回撤越多
  55.             [longstopcon,shortstopcon,exitline]=exit1(backopen,backhigh,backlow,backclose,remain.entrydirection(i),backlen,AFinitial,AFparam,AFmax,Firstbarmultp);
  56.         elseif remain.entryexitway(i)==2;
  57.             initialATRparam=2;
  58.             AF=0.02;
  59.             minATRparam=1;
  60.             [longstopcon,shortstopcon,exitline]=exit2(backopen,backhigh,backlow,backclose,remain.entrydirection(i),backlen,initialATRparam,AF,minATRparam);
  61.         elseif remain.entryexitway(i)==3;
  62.             [longstopcon,shortstopcon,exitline]=exit3(backopen,backhigh,backlow,backclose,remain.entrydirection(i),backlen);
  63.         elseif remain.entryexitway(i)==4
  64.             startpoint=10;
  65.             percent=0.3;
  66.             TRmutlp=1;
  67.             [longstopcon,shortstopcon,exitline]=exit4(backopen,backhigh,backlow,backclose,remain.entrydirection(i),backlen,startpoint,percent,TRmutlp);
  68.         elseif remain.entryexitway(i)==5;
  69.             stdlen=19;
  70.             initialstdparam=2;
  71.             minstdparam=1;
  72.             AF=0.2;
  73.             [longstopcon,shortstopcon,exitline]=exit5(backopen,backhigh,backlow,backclose,remain.entrydirection(i),backlen,stdlen,initialstdparam,minstdparam,AF);
  74.         elseif remain.entryexitway(i)==6;
  75.             con2=ADX(end)>ADXma(end);
  76.             if remain.entrydirection(i)==1;
  77.                 if barsinceentry==holdlength
  78.                     longstopcon=1;
  79.                 end;
  80.                 if low(end)<min(low(end-25:end-1)) && con2
  81.                     longstopcon=1;
  82.                     s(1).sellshortcon=1;
  83.                 end;
  84.             elseif remain.entrydirection(i)==-1;
  85.                 if barsinceentry==holdlength
  86.                     shortstopcon=1;
  87.                 end;
  88.                 if high(end)>max(high(end-25:end-1)) && con2
  89.                     shortstopcon=1;
  90.                     s(1).buycon=1;
  91.                 end;
  92.             end;
  93.         end;
  94.         % 出场执行
  95.         if longstopcon
  96.             orderID1=traderDirectSell(HandleList(1),targetList(k).Market,targetList(k).Code,remain.entryunit(i),0,'market','totalbuy');
  97.             entry.record{k}(remain.num(i))=0;
  98.         end;
  99.         if shortstopcon
  100.             orderID1=traderDirectBuy(HandleList(1),targetList(k).Market,targetList(k).Code,remain.entryunit(i),0,'market','totalbuy');
  101.             entry.record{k}(remain.num(i))=0;
  102.         end;
  103.     end;
  104.    
  105.     %---------------------------加仓--------------------------------%
  106.     %----------------策略1----------------------%
  107.     %再次找到未平仓的订单
  108.     remain=remainorder(entry,k);
  109.     % 找到策略i的marketposition
  110.     s=mptaking(s,remain);
  111.     %---------------------------入场操作--------------------------------%
  112.     %----------------策略1----------------------%
  113.     if s(1).buycon && s(1).marketposition==0
  114.         buyunit=default_unit;
  115.         orderID1=traderDirectBuy(HandleList(1),targetList(k).Market,targetList(k).Code,buyunit,0,'market','totalbuy');
  116.         [~]=entryalter(k,barnum,1,1,buyunit,default_exitway,1);
  117.         % 合约号,barnum,方向,开关,手数,出场,策略
  118.     end;
  119.     if s(1).sellshortcon && s(1).marketposition==0
  120.         sellshortunit=default_unit;
  121.         orderID1=traderDirectSell(HandleList(1),targetList(k).Market,targetList(k).Code,sellshortunit,0,'market','totalbuy');
  122.         [~]=entryalter(k,barnum,-1,1,sellshortunit,default_exitway,1);
  123.         % 合约号,barnum,方向,开关,手数,出场,策略
  124.     end;
  125. end
  126. end
复制代码

更多免费策略源码下载请登录DigQuant社区-策略资源下载~




二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:交易系统

沙发
ghjktdf 发表于 2017-4-10 11:49:29 |只看作者 |坛友微信交流群
看不出好坏

使用道具

藤椅
65425856 发表于 2017-4-11 18:39:53 |只看作者 |坛友微信交流群
感谢分享

使用道具

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

本版微信群
加好友,备注jr
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-4-28 20:31