账号设置

密码修改

退出登录
股海首页| 金钻指标 | 股海博客| 指标公式|看盘软件|股票数据|数据题材|工具应用|期货基金|指标战法|股海宝贝|炒股知识|资讯消息|VIP之家|
飞狐公式|通达信公式|大智慧公式|同花顺公式|东方财富通公式|大智慧股票池|通达信股票池|公式帮助|博易大师公式|益盟操盘手公式|文华财经公式|金字塔公式|
当前位置：→ 股海网 → 大智慧公式 → 正文

  • 大智慧精品指标公式：[板块个股分析]供短线抓牛股

  • 相关简介：C/C++ Code 复制内容到剪贴板 {GGZJ} CC:=C; HH:=H; LL:=L; a1:=AMOUNT/(100*vol); a:=(CC-a1)/(H-L); AA:=sum(a*V,1); 一日:aa/CAPITAL*10000; AA1:=REF(AA,1); 昨日:aa1/CAPITAL*10000; AA2:=REF(AA,2);; 前天:aa2/CAPITAL*10000; &

  • 文章来源：择股网作者：股海网发布时间：2009-07-21浏览次数：下载次数：25

 

C/C++ Code复制内容到剪贴板
  1. {GGZJ}   
  2.   
  3. CC:=C;   
  4. HH:=H;   
  5. LL:=L;   
  6. a1:=AMOUNT/(100*vol);   
  7. a:=(CC-a1)/(H-L);   
  8. AA:=sum(a*V,1);   
  9. 一日:aa/CAPITAL*10000;   
  10. AA1:=REF(AA,1);   
  11. 昨日:aa1/CAPITAL*10000;   
  12. AA2:=REF(AA,2);;   
  13. 前天:aa2/CAPITAL*10000;   
  14. AA3:=sum(a*V,5);   
  15. 一周:aa3/CAPITAL*10000;   
  16. VV:V/CAPITAL*100;   
  17. VV1:1/2*V/CAPITAL*100;   
  18. DD:DATE;   
  19. 日涨幅:(c/REF(c,1)-1)*100;   
  20. 周涨幅:(c/REF(c,5)-1)*100;   
  21.   
  22.   
  23. {板块个股分析2}   
  24. DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1);   
  25. RQ:=DATE;//取日期   
  26. A:=BLKNAME;   
  27. HY:=STRLEFT(A,STRFIND(A,',',1)-1);   
  28. HYs:=STKCOUNT(HY);   
  29. 板块个股数:HYs,LINETHICK0;   
  30. DYZB:=IF(c>0,'GGZJ.一日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));   
  31. DAS:=DATACOUNT;   
  32. D0:=RQ[DAS];//取最后日期   
  33. variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;   
  34. for k=1 to HYs do  begin   
  35.    DDD:=STKFROMBLK(HY,k);   
  36.    DM[k]:=DDD;   
  37.    TMP:=STKINDI(DDD,DYZB,0,6);   
  38.    TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);   
  39.    vcp[k]:=TMP[DAS];   
  40.    vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股   
  41.    TP:=TP+IF(vci[k]=-1000,1,0);   
  42. end;   
  43. PX1:=SORTPOS(vci,1,1,HYs);   
  44. DRAWTEXTEX(islastbar,1,115,50,'[当日攻击资金前十名]'),Color1080FA;   
  45. DRAWTEXTEX(islastbar,1,10,250,'1: '+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),Color0000FF;   
  46. DRAWTEXTEX(islastbar,1,10,400,'2: '+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),Color0000FF;   
  47. DRAWTEXTEX(islastbar,1,10,550,'3: '+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),Color0000FF;   
  48. DRAWTEXTEX(islastbar,1,10,700,'4: '+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),Color0000FF;   
  49. DRAWTEXTEX(islastbar,1,10,850,'5: '+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),Color0000FF;   
  50. DRAWTEXTEX(islastbar,1,275,250,'6: '+STKNAMEEX(DM[vci[6]])+':'+numtostr(vcp[vci[6]],2)),Color0000FF;   
  51. DRAWTEXTEX(islastbar,1,275,400,'7: '+STKNAMEEX(DM[vci[7]])+':'+numtostr(vcp[vci[7]],2)),Color0000FF;   
  52. DRAWTEXTEX(islastbar,1,275,550,'8: '+STKNAMEEX(DM[vci[8]])+':'+numtostr(vcp[vci[8]],2)),Color0000FF;   
  53. DRAWTEXTEX(islastbar,1,275,700,'9: '+STKNAMEEX(DM[vci[9]])+':'+numtostr(vcp[vci[9]],2)),Color0000FF;   
  54. DRAWTEXTEX(islastbar,1,275,850,'10: '+STKNAMEEX(DM[vci[10]])+':'+numtostr(vcp[vci[10]],2)),Color0000FF;   
  55.   
  56. DYZB:=IF(c>0,'GGZJ.一日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));   
  57. DAS:=DATACOUNT;   
  58. D0:=RQ[DAS];//取最后日期   
  59. variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;   
  60. for k=1 to HYs do  begin   
  61.    DDD:=STKFROMBLK(HY,k);   
  62.    DM[k]:=DDD;   
  63.    TMP:=STKINDI(DDD,DYZB,0,6);   
  64.    TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);   
  65.    vcp[k]:=TMP[DAS];   
  66.    vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股   
  67.    TP:=TP+IF(vci[k]=-1000,1,0);   
  68. end;   
  69. PX1:=SORTPOS(vci,0,1,HYs);   
  70. DRAWTEXTEX(islastbar,1,650,50,'[当日攻击资金后十名]'),Color00FF33;   
  71. DRAWTEXTEX(islastbar,1,545,250,'1: '+STKNAMEEX(DM[vci[1]])+':'+numtostr(vcp[vci[1]],2)),Color00FF33;   
  72. DRAWTEXTEX(islastbar,1,545,400,'2: '+STKNAMEEX(DM[vci[2]])+':'+numtostr(vcp[vci[2]],2)),Color00FF33;   
  73. DRAWTEXTEX(islastbar,1,545,550,'3: '+STKNAMEEX(DM[vci[3]])+':'+numtostr(vcp[vci[3]],2)),Color00FF33;   
  74. DRAWTEXTEX(islastbar,1,545,700,'4: '+STKNAMEEX(DM[vci[4]])+':'+numtostr(vcp[vci[4]],2)),Color00FF33;   
  75. DRAWTEXTEX(islastbar,1,545,850,'5: '+STKNAMEEX(DM[vci[5]])+':'+numtostr(vcp[vci[5]],2)),Color00FF33;   
  76. DRAWTEXTEX(islastbar,1,815,250,'6: '+STKNAMEEX(DM[vci[6]])+':'+numtostr(vcp[vci[6]],2)),Color00FF33;   
  77. DRAWTEXTEX(islastbar,1,815,400,'7: '+STKNAMEEX(DM[vci[7]])+':'+numtostr(vcp[vci[7]],2)),Color00FF33;   
  78. DRAWTEXTEX(islastbar,1,815,550,'8: '+STKNAMEEX(DM[vci[8]])+':'+numtostr(vcp[vci[8]],2)),Color00FF33;   
  79. DRAWTEXTEX(islastbar,1,815,700,'9: '+STKNAMEEX(DM[vci[9]])+':'+numtostr(vcp[vci[9]],2)),Color00FF33;   
  80. DRAWTEXTEX(islastbar,1,815,850,'10: '+STKNAMEEX(DM[vci[10]])+':'+numtostr(vcp[vci[10]],2)),Color00FF33;   
  81.   
  82. DYZB4:=IF(c>0,'GGZJ.日涨幅',IF(c<0,'GGZJ.VV','GGZJ.VV1'));   
  83. DAS:=DATACOUNT;   
  84. D0:=RQ[DAS];//取最后日期   
  85. variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;   
  86. for k=1 to HYs do  begin   
  87.    DDD:=STKFROMBLK(HY,k);   
  88.    DM[k]:=DDD;   
  89.    TMP:=STKINDI(DDD,DYZB4,0,6);   
  90.    TMPD:=STKINDI(DDD,'GGZJ.DD',0,6);   
  91.    vcp[k]:=TMP[DAS];   
  92.    vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股   
  93.    TP:=TP+IF(vci[k]=-1000,1,0);   
  94. end;   
  95. PX1:=SORTPOS(vci,1,1,HYs);   
  96. //PX2:=SORTPOS(vcp,1,1,HYs);   
  97. KHYS:=HYS-TP,LINETHICK;   
  98. IF KHYS<2 THEN EXIT;   
  99. EXPLAIN(ISLASTBAR,'[日涨跌幅领先前十五名]'),Color00FFFF;   
  100. EXPLAIN(ISLASTBAR,' 1: '+STKNAMEEX(DM[vci[1]])+' '+numtostr(vcp[vci[1]],2)+'%'),Color0000F9;   
  101. EXPLAIN(ISLASTBAR and KHYS>1,' 2: '+STKNAMEEX(DM[vci[2]])+' '+numtostr(vcp[vci[2]],2)+'%'),Color0000F9;   
  102. IF KHYS<3 THEN EXIT;   
  103. EXPLAIN(ISLASTBAR and KHYS>2,' 3: '+STKNAMEEX(DM[vci[3]])+' '+numtostr(vcp[vci[3]],2)+'%'),Color0000F9;   
  104. IF KHYS<4 THEN EXIT;   
  105. EXPLAIN(ISLASTBAR and KHYS>3,' 4: '+STKNAMEEX(DM[vci[4]])+' '+numtostr(vcp[vci[4]],2)+'%'),Color0000F9;   
  106. IF KHYS<5 THEN EXIT;   
  107. EXPLAIN(ISLASTBAR and KHYS>4,' 5: '+STKNAMEEX(DM[vci[5]])+' '+numtostr(vcp[vci[5]],2)+'%'),Color0000F9;   
  108. IF KHYS<6 THEN EXIT;   
  109. EXPLAIN(ISLASTBAR and KHYS>5,' 6: '+STKNAMEEX(DM[vci[6]])+' '+numtostr(vcp[vci[6]],2)+'%'),Color0000F9;   
  110. IF KHYS<7 THEN EXIT;   
  111. EXPLAIN(ISLASTBAR and KHYS>6,' 7: '+STKNAMEEX(DM[vci[7]])+' '+numtostr(vcp[vci[7]],2)+'%'),Color0000F9;   
  112. IF KHYS<8 THEN EXIT;   
  113. EXPLAIN(ISLASTBAR and KHYS>7,' 8: '+STKNAMEEX(DM[vci[8]])+' '+numtostr(vcp[vci[8]],2)+'%'),Color0000F9;   
  114. IF KHYS<9 THEN EXIT;   
  115. EXPLAIN(ISLASTBAR and KHYS>8,' 9: '+STKNAMEEX(DM[vci[9]])+' '+numtostr(vcp[vci[9]],2)+'%'),Color0000F9;   
  116. IF KHYS<10 THEN EXIT;    
  117. EXPLAIN(ISLASTBAR and KHYS>9,' 10: '+STKNAMEEX(DM[vci[10]])+' '+numtostr(vcp[vci[10]],2)+'%'),Color0000F9;   
  118. IF KHYS<11 THEN EXIT;    
  119. EXPLAIN(ISLASTBAR and KHYS>10,' 11: '+STKNAMEEX(DM[vci[11]])+' '+numtostr(vcp[vci[11]],2)+'%'),Color0000F9;   
  120. IF KHYS<12 THEN EXIT;   
  121. EXPLAIN(ISLASTBAR and KHYS>11,' 12: '+STKNAMEEX(DM[vci[12]])+' '+numtostr(vcp[vci[12]],2)+'%'),Color0000F9;   
  122. IF KHYS<13 THEN EXIT;   
  123. EXPLAIN(ISLASTBAR and KHYS>12,' 13: '+STKNAMEEX(DM[vci[13]])+' '+numtostr(vcp[vci[13]],2)+'%'),Color0000F9;   
  124. IF KHYS<14 THEN EXIT;   
  125. EXPLAIN(ISLASTBAR and KHYS>13,' 14: '+STKNAMEEX(DM[vci[14]])+' '+numtostr(vcp[vci[14]],2)+'%'),Color0000F9;   
  126. IF KHYS<15 THEN EXIT;    
  127. EXPLAIN(ISLASTBAR and KHYS>14,' 15: '+STKNAMEEX(DM[vci[15]])+' '+numtostr(vcp[vci[15]],2)+'%'),Color0000F9;   
  128. IF KHYS<16 THEN EXIT;    
  129.   
  130. EXPLAIN(ISLASTBAR,'\n[日涨跌幅滞后前十名]'),Color00CCFF;   
  131. EXPLAIN(ISLASTBAR,' 1: '+STKNAMEEX(DM[vci[KHYs]])+' '+numtostr(vcp[vci[KHYs]],2)+'%'+' \n 2: '+STKNAMEEX(DM[vci[KHYs-1]])+' '+numtostr(vcp[vci[KHYs-1]],2)+'%'+' \n 3: '+   
  132.   STKNAMEEX(DM[vci[KHYs-2]])+' '+numtostr(vcp[vci[KHYs-2]],2)+'%'+' \n 4: '+STKNAMEEX(DM[vci[KHYs-3]])+' '+numtostr(vcp[vci[KHYs-3]],2)+'%'+   
  133. ' \n 5: '+STKNAMEEX(DM[vci[KHYs-4]])+' '+numtostr(vcp[vci[KHYs-4]],2)+'%'+' \n 6: '+STKNAMEEX(DM[vci[KHYs-5]])+' '+numtostr(vcp[vci[KHYs-5]],2)+'%'+' \n 7: '+   
  134.   STKNAMEEX(DM[vci[KHYs-6]])+' '+numtostr(vcp[vci[KHYs-6]],2)+'%'+' \n 8: '+STKNAMEEX(DM[vci[KHYs-7]])+' '+numtostr(vcp[vci[KHYs-7]],2)+'%'+   
  135. ' \n 9: '+ STKNAMEEX(DM[vci[KHYs-8]])+' '+numtostr(vcp[vci[KHYs-8]],2)+'%'+' \n 10: '+   
  136.   STKNAMEEX(DM[vci[KHYs-9]])+' '+numtostr(vcp[vci[KHYs-9]],2)+'%'),Color00A800;    

下载链接：( 说明：股海资源如需解压密码的请输入本站域名：www.guhai.com.cn请仔细输入！）
下载 （免费下载）
上一篇：大智慧精品指标公式：金钻系列指标 精品指标  下一篇：大智慧精品指标公式：抄底极品，万国二号+疯牛绝佳买
☞股海网提供公式解密、改选股服务 联系点击查看详情（有偿服务,非诚勿扰）...
☞股海网公式指标安装帮助说明，新手必读，好好学习天天向上！...
☞股海网注册、登录、下载问题说明，如遇问题请查阅。...
　☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

大智慧精品指标公式：[板块个股分析]供短线抓牛股

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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