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

【Marney Volume Indicator】

龙听

Rank: 9Rank: 9Rank: 9

UID
2 
积分
2746423 
威望
1323211 布 
龙e币
1423212 刀 
注册时间
2009-12-3 
最后登录
2024-6-4 

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

【Marney Volume Indicator】

  1. {***********************************************}
  2. {Marney Indicator(TM) - Marney Volume Indicator(TM)
  3. Copyright Caspar Marney, Marney Capital 2010(C)}
  4. {***********************************************}

  6. input: avgLen(10), mins.in.session(1440), autobars(True), upcolor(cyan), dncolor(red);
  7. var: start(0), end1(0), end2(0), x(0), p(-1), count(0), avg(0), barsinday(0), DayNumber(0);
  8. array: xv[199,1440](0);  

  10. if bartype < 2 then begin

  12. start= (sessionstarttime(1,1));
  13. end1= (sessionendtime(1,1));
  14. end2= (sessionendtime(1,2));

  16. value1 = timetominutes(start);
  17. value2 = timetominutes(end2);
  18. if start > end2 then
  19. value3 = 1440+(value2-value1);

  21. if start < end2 then
  22.         value3 = -(value1-value2);
  23. if autobars = false then value3 = mins.in.session;
  24.          
  25. barsinday = ceiling(value3/barinterval);


  28. if d<>d[1] then begin  
  29.     if count=barsinday then begin  
  30.         p=iff(p<avgLen-1,p+1,0);  
  31.         for x=1 to barsinday begin  
  32.             xv[p,x]=ticks[barsinday+1-x];  
  33.         end;  
  34.     end;  
  35.     count=1;  
  36. end else count=count+1;  

  38.        
  39. if xv[avgLen-1,count]>0 then begin  
  40.     avg=0;  
  41.     for x=0 to avgLen-1 begin  
  42.         avg=avg+xv[x,count];  
  43.     end;  
  44.     avg=avg/avgLen;  
  45.    plot2(ticks,"ticks",default,1);  
  46.    plot1(avg,"avg",yellow,default,1);  
  47. end;


  50. if close > open then setplotcolor(2,upcolor);
  51. if close < open then setplotcolor(2,dncolor);

  53. end;

  55. if bartype > 1 then begin
  56.     avg = averagefc(v,avglen);
  57.     plot2(v,"ticks",default,1);
  58.     plot1(avg,"avg",yellow,default,1);

  60.     if close > open then setplotcolor(2,upcolor);
  61.     if close < open then setplotcolor(2,dncolor);
  62. 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

返回列表