公式网 股票指标公式源码分享 登录 注册
公式指标平网
未来函数检测
首页 金钻指标 通达信公式 大智慧公式 同花顺公式 文华财经公式 东财通公式 飞狐公式 操盘手公式 其他公式 公式解答 股票软件 股票池
当前位置:→ 公式网 > 飞狐公式 > 正文 → 正文

反向推算KDJ---推演全程 (附公式源码)-飞狐版

发布时间:2009/10/25 9:42:19  浏览次数:

反向推算KDJ---推演全程 (附公式源码)-飞狐版

 

C/C++ Code复制内容到剪贴板
  1. input:j1(-50,-50,120);   
  2. n:=9;m1:=3;m2:=3;   
  3. RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;   
  4. K:=SMA(RSV,M1,1);   
  5. D:=SMA(K,M2,1);   
  6. J:=3*K-2*D;   
  7. {-----线值------------}   
  8. k1:1/3*rsv+ref(k,1)/3*2;   
  9. d1:1/3*k+ref(d,1)/3*2;   
  10. Jj:3*K1-2*D1;   
  11. {-----显示-------------}   
  12. j11:=j;j昨:=ref(j,1);jx:=if(j1=-50,j11,if(j1=-49,j昨,j1));   
  13. xxx:((9/7*jx-2*ref(k,1)+12/7*ref(d,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9),colorred,linethick;   
  14.   
  15. IF j1=-50 THEN BEGIN   
  16. DRAWTEXTEX(sysparam(3)=BARPOS,0,10,10,'设J='+NUMTOSTR(jx[SYSPARAM(1)],2)+' 所演即时股价: '+NUMTOSTR(xxx[SYSPARAM(1)] ,2)),colorred;   
  17. end;   
  18. IF j1=-49 THEN BEGIN   
  19. DRAWTEXTEX(sysparam(3)=BARPOS,0,10,10,'设J='+NUMTOSTR(jx[SYSPARAM(1)],2)+'  J线拐头股价: '+NUMTOSTR(xxx[SYSPARAM(1)] ,2)),coloryellow;   
  20. end;   
  21. IF j1>-49 THEN BEGIN   
  22. DRAWTEXTEX(sysparam(3)=BARPOS,0,10,10,'设J='+NUMTOSTR(jx[SYSPARAM(1)],2)+'  J线达标临界股价: '+NUMTOSTR(xxx[SYSPARAM(1)] ,2)),color00ff00;   
  23. end;   

 

资源下载链接   资源大小:4KB

手机移动版 - 关于我们 - 联系我们 - 广告合作 - 下载声明 - 网站帮助 - 友情链接 - 网站地图 - TOP
湘ICP备09016573号-3 增值电信业务经营ICP许可证:湘B2-20210269 湘公网安备43108102000039号
Copyright © GSZX.COM.CN ,All Rights Reserved.
股票公式,股票指标,股票软件,股票知识