: | : | :期货程序化 | :期货程序化研究 | :期货量化学习 | :期货量化 |
返回列表 发帖

【OptimalF】

龙听

Rank: 9Rank: 9Rank: 9

UID
2 
积分
2744462 
威望
1322230 布 
龙e币
1422232 刀 
注册时间
2009-12-3 
最后登录
2024-5-31 

Medal No.1
1# 跳转到 » 倒序看帖
打印
tT
发表于 2022-11-2 14:30 | 只看该作者

【OptimalF】

  1. input: theData(Numeric), watchDays(Numeric), isOnStrategy(TrueFalse);
  2. array: DATAs[](0), DATAsCopy[](0), HPRs[](1), Geo_Mean[101](1);
  3. var: maxLoss(0), maxMeans(0), j(0), k(0), temp(1);
  4. var: MP(0), passDays(0), isHasTraded(false);


  7. once begin
  8.   array_setmaxindex( DATAs, watchDays+1 );
  9.   array_setmaxindex( DATAsCopy, watchDays+1 );
  10.   array_setmaxindex( HPRs, watchDays+1 );
  11. end;



  15. MP= i_MarketPosition;
  16. if MP<>MP[1] then isHasTraded= true;

  18. if isOnStrategy= true then
  19.   begin
  20.     if isHasTraded and sessionlastbar then
  21.       begin
  22.         _arrayShift( DATAs );
  23.         DATAs[1]= theData;
  24.         passDays= passDays + 1;
  25.       end;
  26.   end
  27. else
  28.   begin
  29.     _arrayShift( DATAs );
  30.     DATAs[1]= theData;
  31.     passDays= passDays + 1;
  32.   end;


  35. if watchDays > 0 and passDays > watchDays then begin
  36.   
  37.   array_copy( DATAs, 1, DATAsCopy, 1, watchDays );
  38.   maxLoss= minlist( Lowest_a( DATAsCopy, watchDays ), -1 );

  40.   for k= 0 to 99 begin

  42.     temp= 1;
  43.     for j=1 to watchDays begin
  44.       HPRs[j]= 1 + k/100 * ( -DATAsCopy[j] / maxLoss );
  45.       temp= temp * HPRs[j];
  46.     end;
  47.   
  48.     Geo_Mean[k]= power( temp, 1/watchDays );

  50.   end;


  53.   maxMeans= 0;
  54.   _OptimalF=0;

  56.   for k=0 to 99 begin
  57.     if Geo_Mean[k] > maxMeans then begin
  58.       maxMeans= Geo_Mean[k];
  59.       _OptimalF= k;
  60.     end;
  61.   end;
  62.   
  63. end;
复制代码

收藏 分享
论坛官方微信、群（期货热点、量化探讨、开户与绑定实盘）
 
期货论坛 - 版权/免责声明   1.本站发布源码(包括函数、指标、策略等)均属开放源码，用意在于让使用者学习程序化语法撰写，使用者可以任意修改语法內容并调整参数。仅限用于个人学习使用，请勿转载、滥用，严禁私自连接实盘账户交易。
  2.本站发布资讯(包括文章、视频、历史记录、教材、评论、资讯、交易方案等)均系转载自网络主流媒体，内容仅为作者当日个人观点，本网转载此文出于传递更多信息之目的，并不意味着赞同其观点或证实其描述。本网不对该类信息或数据做任何保证。不对您构成任何投资建议，不能依靠信息而取代自身独立判断，不对因使用本篇文章所诉信息或观点等导致的损失承担任何责任。
  3.本站发布资源(包括书籍、杂志、文档、软件等)均从互联网搜索而来，仅供个人免费交流学习，不可用作商业用途，本站不对显示的内容承担任何责任。请在下载后24小时内删除。如果喜欢，请购买正版，谢谢合作！
  4.龙听期货论坛原创文章属本网版权作品，转载须注明来源“龙听期货论坛”，违者本网将保留追究其相关法律责任的权力。本论坛除发布原创文章外，亦致力于优秀财经文章的交流分享，部分文章推送时若未能及时与原作者取得联系并涉及版权问题时，请及时联系删除。联系方式：http://www.qhlt.cn/thread-262-1-1.html
如何访问权限为100/255贴子：/thread-37840-1-1.html；注册后仍无法回复：/thread-23-1-1.html；微信/QQ群：/thread-262-1-1.html；网盘链接失效解决办法：/thread-93307-1-1.html

返回列表