当前位置:→ 股海网飞狐公式 → 正文
  • 二十四节K线 二十四节气量

  • 相关简介:C/C++ Code 复制内容到剪贴板 //二十四节K线 TBS:=POW(10,ABS(LOG(MINDIFF))); jqd:=LSOLARTERMday(date); fd:=date; tj:=(jqd-ref(jqd,1)DATEDIFF(ref(fd,1),fd))*((month)*2-(jqdday)-(day=16)); Jw:BARSLAST(tj),LINETHICK; Jdg:=Jw=0orISLASTBAR; Jwx:=0*C; fo

  • 文章来源:择股网作者:股海网发布时间:2009-11-23浏览次数:下载次数:0

二十四节K线  二十四节气量

 

C/C++ Code复制内容到剪贴板
  1. //二十四节K线   
  2. TBS:=POW(10,ABS(LOG(MINDIFF)));   
  3. jqd:=LSOLARTERMday(date);   
  4. fd:=date;   
  5. tj:=(jqd-ref(jqd,1)<>DATEDIFF(ref(fd,1),fd))*((month)*2-(jqd>day)-(day<=16));   
  6. Jw:BARSLAST(tj),LINETHICK;   
  7. Jdg:=Jw=0 or ISLASTBAR;   
  8. Jwx:=0*C;   
  9. for JQ=datacount-1 downto lbound(Jdg) do  
  10. if Jdg[JQ] then   
  11. Jwx[JQ]:=0;   
  12. else  
  13. Jwx[JQ]:=Jwx[JQ+1]+1;   
  14. Jr:=BACKSET(ISLASTBAR,Jw+1)-ISLASTBAR;   
  15. Jwx:=refx(Jwx,1)+Jr,LINETHICK;   
  16. Joo:=ref(o,Jw);   
  17. Jhh:=hhv(h,Jw+1);   
  18. JLL:=LLv(L,Jw+1);   
  19. Jzq1:=BARSLAST(ref(Jwx,1)=0 or BARPOS=1)+1;//N天数   
  20. Jyt1:=if(Jzq1=1 and refx(Jzq1,2)=1,13,if(refx(Jzq1,1)=1 or Jzq1=1,7,14));   
  21. 节开:ROUND(JOO*TBS)/TBS,LINETHICK,COLOReeee00;   
  22. 节高:ROUND(refx(Jhh,Jwx)*TBS)/TBS,LINETHICK,COLOReeaaFF;   
  23. 节低:ROUND(refx(JLL,Jwx)*TBS)/TBS,LINETHICK,COLOR00ee00;   
  24. 节收:ROUND(refx(c,Jwx)*TBS)/TBS,LINETHICK,COLOR00eeee;   
  25. Jf:=节收>节开 or (节收=节开 and 节收>ref(节收,JW));   
  26. Jj:=cross(Jw,Jwx);   
  27. STICKLINE(Jw>0 and JF and Jj ,节低,节高,10,0),Color5055B1;   
  28. STICKLINE(节开<节收 ,节开,节收,JYT1,0),Color5055B1;   
  29. STICKLINE(Jw>0 and not(JF) and Jj ,节低,节高,10,0),Color5A7234;   
  30. STICKLINE(节开>节收 ,节开,节收,JYT1,0),Color5A7234;   
  31. STICKLINE(C>=O,C,O,8,0),COLOR0000AA;   
  32. STICKLINE(C>=O,C,O,6,0),COLOR0000bb ;   
  33. STICKLINE(C>=O,C,O,4,0),COLOR0000cc ;   
  34. STICKLINE(C>=O,C,O,2,0),COLOR0000ee;   
  35. STICKLINE(C>=O,H,L,0,0),COLOR0000ff;   
  36. STICKLINE(C<=O,C,O,8,0),Color7B7b00;   
  37. STICKLINE(C<=O,C,O,6,0),Color909000;   
  38. STICKLINE(C<=O,C,O,4,0),ColorA8a800;   
  39. STICKLINE(C<=O,C,O,2,0),COLORcece00;   
  40. STICKLINE(C<=O,H,L,0,0),COLORffff00;   
  41. drawtext(tj=1 ,l,'小寒'),COLORYELLOW,align0,PXDN5;   
  42. drawtext(tj=2 ,L,'大寒'),COLORYELLOW,align0,PXDN5;   
  43. drawtext(tj=3 ,L,'立春'),COLORGREEN,align0,PXDN5;   
  44. drawtext(tj=4 ,L,'雨水'),COLORGREEN,align0,PXDN5;   
  45. drawtext(tj=5 ,L,'惊蛰'),COLORGREEN,align0,PXDN5;   
  46. drawtext(tj=6 ,L,'春分'),COLORGREEN,align0,PXDN5;   
  47. drawtext(tj=7 ,L,'清明'),COLORYELLOW,align0,PXDN5;   
  48. drawtext(tj=8 ,L,'谷雨'),COLORYELLOW,align0,PXDN5;   
  49. drawtext(tj=9 ,L,'立夏'),COLORRED,align0,PXDN5;   
  50. drawtext(tj=10,L,'小满'),COLORRED,align0,PXDN5;   
  51. drawtext(tj=11,L,'芒种'),COLORRED,align0,PXDN5;   
  52. drawtext(tj=12,L,'夏至'),COLORRED,align0,PXDN5;   
  53. drawtext(tj=13,L,'小暑'),COLORYELLOW,align0,PXDN5;   
  54. drawtext(tj=14,L,'大暑'),COLORYELLOW,align0,PXDN5;   
  55. drawtext(tj=15,L,'立秋'),COLORBBBBBB,align0,PXDN5;   
  56. drawtext(tj=16,L,'处暑'),COLORBBBBBB,align0,PXDN5;   
  57. drawtext(tj=17,L,'白露'),COLORBBBBBB,align0,PXDN5;   
  58. drawtext(tj=18,L,'秋分'),COLORBBBBBB,align0,PXDN5;   
  59. drawtext(tj=19,L,'寒露'),COLORYELLOW,align0,PXDN5;   
  60. drawtext(tj=20,L,'霜降'),COLORYELLOW,align0,PXDN5;   
  61. drawtext(tj=21,L,'立冬'),COLORFF9900,align0,PXDN5;   
  62. drawtext(tj=22,L,'小雪'),COLORFF9900,align0,PXDN5;   
  63. drawtext(tj=23,L,'大雪'),COLORFF9900,align0,PXDN5;   
  64. drawtext(tj=24,L,'冬至'),COLORFF9900,align0,PXDN5;   
  65. drawtext(tj=1 ,H,'丑月'),COLORYELLOW,align0,PXUP19;   
  66. drawtext(tj=3 ,H,'寅月'),COLORGREEN,align0,PXUP19;   
  67. drawtext(tj=5 ,H,'卯月'),COLORGREEN,align0,PXUP19;   
  68. drawtext(tj=7 ,H,'辰月'),COLORYELLOW,align0,PXUP19;   
  69. drawtext(tj=9 ,H,'巳月'),COLORRED,align0,PXUP19;   
  70. drawtext(tj=11,H,'午月'),COLORRED,align0,PXUP19;   
  71. drawtext(tj=13,H,'未月'),COLORYELLOW,align0,PXUP19;   
  72. drawtext(tj=15,H,'申月'),COLORBBBBBB,align0,PXUP19;   
  73. drawtext(tj=17,H,'酉月'),COLORBBBBBB,align0,PXUP19;   
  74. drawtext(tj=19,H,'戌月'),COLORYELLOW,align0,PXUP19;   
  75. drawtext(tj=21,H,'亥月'),COLORFF9900,align0,PXUP19;   
  76. drawtext(tj=23,H,'子月'),COLORFF9900,align0,PXUP19;   
  77.   
  78. //二十四节气量   
  79. TBS:=POW(10,ABS(LOG(MINDIFF)));   
  80. jqd:=LSOLARTERMday(date);   
  81. fd:=date;   
  82. tj:=(jqd-ref(jqd,1)<>DATEDIFF(ref(fd,1),fd))*((month)*2-(jqd>day)-(day<=16));   
  83. Jw:BARSLAST(tj),LINETHICK;   
  84. Jdg:=Jw=0 or ISLASTBAR;   
  85. Jwx:=0*C;   
  86. for JQ=datacount-1 downto lbound(Jdg) do  
  87. if Jdg[JQ] then   
  88. Jwx[JQ]:=0;   
  89. else  
  90. Jwx[JQ]:=Jwx[JQ+1]+1;   
  91. Jr:=BACKSET(ISLASTBAR,Jw+1)-ISLASTBAR;   
  92. Jwx:=refx(Jwx,1)+Jr,LINETHICK;   
  93. Joo:=ref(o,Jw);   
  94. Jzq1:=BARSLAST(ref(Jwx,1)=0 or BARPOS=1)+1;   
  95. Jyt1:=if(Jzq1=1 and refx(Jzq1,2)=1,13,if(refx(Jzq1,1)=1 or Jzq1=1,7,14));   
  96. 节开:=ROUND(JOO*TBS)/TBS;   
  97. 节收:=ROUND(refx(c,Jwx)*TBS)/TBS;   
  98. Jf:=节收>节开 or (节收=节开 and 节收>ref(节收,JW));   
  99. 节量:SUM(V,Jzq1),ColorFFff00,LINETHICK0;   
  100. 节换手率:SUM(vol/CAPITAL*100,Jzq1),linethick0,PRECISion2,colorffff00;   
  101. STICKLINE(节开<节收 ,节量*0.30,0,JYT1,0),Color5055B1;   
  102. STICKLINE(节开>节收 ,节量*0.30,0,JYT1,0),Color5A7234;   
  103. 日量:VOL,VOLSTICK,ColorFFff00;   
  104. 日换手率:vol/CAPITAL*100,ColorFFff00,LINETHICK0;   
  105. TT2:=ISLASTBAR=1;   
  106. DRAWTEXTEX(TT2,0,4,1,'【节期周期:  
  107. '+NUMTOSTR(Jzq1[SYSPARAM(1)],0)+''+'天 】'+''),Color00FFFF;   
  108. DRAWTEXTEX(TT2,0,4,16,'【节期量:  
  109. '+NUMTOSTR(节量[SYSPARAM(1)],0)+''+'】'+''),Color00FFFF;   
  110. MA3:MA(日量,5),COLORFFffff,linethick1;   
  111. MAd:MA(日量,13),COLOR00ffff,linethick1;   
  112. MA90:MA(日量,90),color00ff00;   
  113. DRAWTEXT(ISLASTBAR=1 AND MAd>REF(MAd,1),MAd,' '+' ↑'),COLOR00ffff,align0;   
  114. DRAWTEXT(ISLASTBAR=1 AND MAd<REF(MAd,1),MAd,' '+' ↑'),Color00ffff,align0;   
  115. DRAWTEXT(BARSTATUS=2 AND MA3>REF(MA3,1),MA3,' '+' ↑'),COLORFFffff,align1;   
  116. DRAWTEXT(BARSTATUS=2 AND MA3<REF(MA3,1),MA3,'  
  117. '+' ↓'),ColorFFffff,align1;  

 

 ☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

二十四节K线 二十四节气量

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

上传会员: 
股海网
文件大小: 
Bytes
上传时间: 
2009-11-23
下载积分: 
-
免责声明: 
请仔细阅读并同意后才能下载
本附件为用户分享上传,股海网没有对文件进行验证,不能保证下载资源的准确性、安全性和完整性,也不保证下载资源能正常安装和使用,且下载后扣除的积分无法退还,除非您充分理解并完全接受本声明,否则您无权下载。
本站对提供下载的软件、指标、资料等不拥有任何权利,其版权归该下载资源的合法拥有者所有。本附件仅供学习和研究使用,不得用于商业或者非法用途,如有侵犯您的版权, 请参看 《股海网侵权处理流程》《股海网免责声明条款》
点击下载无反应时,更换主流浏览器重新登录操作,如360浏览器、Edge浏览器、谷歌浏览器,个别浏览器有不兼容现象。
勾选以下表示您已经阅读并同意以上声明才能下载本文件,扣除积分无法退还!
我已阅读所有条款规定, 请点我同意 所有条款内容!我自愿下载!
提示:如下载失败,请点关闭刷新此页面或提交问题反馈给管理员→
关闭

关于我们 - 联系我们 - 隐私政策 - 免责声明 - 下载帮助 - 广告合作 - SiteMap - TOP
增值电信业务经营ICP许可证:湘B2-20210269 湘ICP备09016573号-10 湘公网安备43108102000040号
Copyright © 2021 铭网科技,All Rights Reserved.