当前位置:→ 股海网通达信公式 → 正文
  • 通达信精华组合,kdj源码

  • 相关简介:通达信精华组合,kdj源码 {股海网提供: www.guhai.com.cn } 复制内容到剪贴板 RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; K:SMA(RSV,M1,1),COLOR9FA1A1; D:SMA(K,M2,1),COLOR00A13C; J:3*K-2*D,COLOR0089FF,LINETHICK2; OBV:=K; P:=5; A1:=REF(OBV,P)=HHV(OBV,2*P+1

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

 通达信精华组合,kdj源码

{股海网提供:www.guhai.com.cn}复制内容到剪贴板
  1. RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;   
  2. K:SMA(RSV,M1,1),COLOR9FA1A1;   
  3. D:SMA(K,M2,1),COLOR00A13C;   
  4. J:3*K-2*D,COLOR0089FF,LINETHICK2;   
  5. OBV:=K;         
  6. P:=5;   
  7. A1:=REF(OBV,P)=HHV(OBV,2*P+1);   
  8. B1:=FILTER(A1,P);   
  9. C1:=BACKSET(B1,P+1);   
  10. D1:=FILTER(C1,P);{高点}   
  11. A2:=REF(OBV,P)=LLV(OBV,2*P+1);   
  12. B2:=FILTER(A2,P);   
  13. C2:=BACKSET(B2,P+1);   
  14. D2:=FILTER(C2,P);{低点}   
  15. 上:REF(OBV,BARSLAST(D1)),COLORFF00FF,NODRAW;   
  16. 下:REF(OBV,BARSLAST(D2)),COLOR00FF00,NODRAW;   
  17. 向上:CROSS(OBV,上*1.01),NODRAW;   
  18. 相对能量:(OBV-下)/(上-下)*100,COLORYELLOW,NODRAW;   
  19. R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);    
  20. S11:=R11>REF(R11,1);   
  21. DRAWLINE(D1,OBV,S11,OBV,1),COLOR0000FF;   
  22. T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);   
  23. U11:=T11>REF(T11,1);   
  24. DRAWLINE(D2,OBV,U11,OBV,1),COLORFFFF00;   
  25. STICKLINE(C>0,下,下,1,0),COLOR00FF00;   
  26. STICKLINE(C>0,上,上,1,0),COLORFF00FF;   
  27. DRAWTEXT(CROSS(OBV,上*1.01),上,'上'),COLORFFFFFF;   
  28. DRAWTEXT(CROSS(下*0.99,OBV),下,'下'),COLORFFFFFF;   
  29.   
  30. {主升波段显示}   
  31. BBI:=(EMA(CLOSE,3)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24))/4;    
  32. EBBI:=(EMA(C,6)+EMA(C,18)+EMA(C,54)+EMA(C,162))/4;    
  33. FF1:=EMA(C,3)>EMA(C,7) AND EMA(C,7)>EMA(C,21) AND EMA(C,21)>EMA(C,54);    
  34. DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);    
  35. DEA:=EMA(DIFF,9);    
  36. 主升浪:IF(BBI>EBBI AND FF1 AND DIFF>DEA,10,0),COLORYELLOW,POINTDOT;    
  37. STICKLINE(主升浪,10,0,1,1),COLORYELLOW;    
  38. DRAWICON(CROSS(K,D) AND CROSS(J,D),10,1);{1号图标显示红箭头};   
  39. DRAWICON(D1,OBV,27);   
  40. DRAWICON(D2,OBV,25);    
  41.   
  42. {金叉共振}   
  43. VAR0004:="KDJ.K#WEEK"(9,3,3);    
  44. VAR0005:="KDJ.D#WEEK"(9,3,3);    
  45. VAR0006:="KDJ.K#MONTH"(9,3,3);   
  46. VAR0007:="KDJ.D#MONTH"(9,3,3);    
  47. 周金叉:IF(CROSS(VAR0004,VAR0005),15,0)LINESTICK, COLORRED;   
  48. 月金叉:IF(CROSS(VAR0006,VAR0007),20,0)LINESTICK,COLORYELLOW;   
  49. DRAWTEXT(周金叉,16,'周金叉'),COLORRED;   
  50. DRAWTEXT(月金叉,20,'月金叉'),COLORYELLOW;   
  51.   
  52. {抄底加仓}   
  53. 抄底:IF(REF(COUNT(K<REF(K,1),5)>=5,1) AND COUNT(K<30,5)>=2  AND COUNT(J<0,3)>0 AND CROSS(J,0),60,50),COLOR00FFFF;   
  54. TJ00:=BARSLAST(REF(CROSS(K,D) AND REF(K,1)<35,1));   
  55. TJ11:=C<REF(C,TJ00+1)*1.1 AND REF(K,1)<60  AND (TJ00+1)<25   AND (TJ00+1)>5  AND  K>REF(K,TJ00+1) AND CROSS(K,D);   
  56. 加仓:IF(TJ11,35,0),COLORGREEN;    
  57. A22:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));  

精华组合,kdj(源码)

精华组合,kdj(源码)

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

通达信精华组合,kdj源码

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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