当前位置:→ 股海网通达信公式 → 正文
  • 股市风帆

  • 相关简介:这是编公式中得的付加产品。 好处就在於想知道当天的领涨领跌快速、方便。 C/C++ Code 复制内容到剪贴板 {股市风帆参数RN:1,100,10} VAR1:=( 399139$C ); VAR2:=( 399190$C ); VAR3:=( 399132$C ); VAR4:=( 399150$C ); VAR5:=( 399138$C ); VAR6:=( 399200$C&q

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

这是编公式中得的付加产品。

好处就在於想知道当天的领涨领跌快速、方便。

 

C/C++ Code复制内容到剪贴板
  1. {股市风帆  参数 RN:1,100,10  }   
  2.   
  3. VAR1:=("399139$C");   
  4. VAR2:=("399190$C");   
  5. VAR3:=("399132$C");   
  6. VAR4:=("399150$C");   
  7. VAR5:=("399138$C");   
  8. VAR6:=("399200$C");   
  9. VAR7:=("399110$C");   
  10. VAR8:=("399136$C");   
  11. VAR9:=("399135$C");   
  12. VAR10:=("399130$C");   
  13. VAR11:=("399160$C");   
  14. VAR12:=("999999$C");   
  15. VAR13:=("399137$C");   
  16.   
  17.   
  18. 医药:=REF(SUM((VAR1/REF(VAR1,1)-1)*100,0)*10,1);   
  19. 金融:=REF(SUM((VAR2/REF(VAR2,1)-1)*100,0)*10,1);   
  20. 纺织:=REF(SUM((VAR3/REF(VAR3,1)-1)*100,0)*10,1);   
  21. 建筑:=REF(SUM((VAR4/REF(VAR4,1)-1)*100,0)*10,1);   
  22. 机械:=REF(SUM((VAR5/REF(VAR5,1)-1)*100,0)*10,1);   
  23. 地产:=REF(SUM((VAR6/REF(VAR6,1)-1)*100,0)*10,1);   
  24. 农林:=REF(SUM((VAR7/REF(VAR7,1)-1)*100,0)*10,1);   
  25. 电子:=REF(SUM((VAR8/REF(VAR8,1)-1)*100,0)*10,1);   
  26. 石化:=REF(SUM((VAR9/REF(VAR9,1)-1)*100,0)*10,1);   
  27. 制造:=REF(SUM((VAR10/REF(VAR10,1)-1)*100,0)*10,1);   
  28. 运输:=REF(SUM((VAR11/REF(VAR11,1)-1)*100,0)*10,1);   
  29. 上证:=REF(SUM((VAR12/REF(VAR12,1)-1)*100,0)*10,1);   
  30. 金属:=REF(SUM((VAR13/REF(VAR13,1)-1)*100,0)*10,1);   
  31.   
  32. 医药A:=SUM((VAR1/REF(VAR1,1)-1)*100,0)*10;   
  33. 金融A:=SUM((VAR2/REF(VAR2,1)-1)*100,0)*10;   
  34. 纺织A:=SUM((VAR3/REF(VAR3,1)-1)*100,0)*10;   
  35. 建筑A:=SUM((VAR4/REF(VAR4,1)-1)*100,0)*10;   
  36. 机械A:=SUM((VAR5/REF(VAR5,1)-1)*100,0)*10;   
  37. 地产A:=SUM((VAR6/REF(VAR6,1)-1)*100,0)*10;   
  38. 农林A:=SUM((VAR7/REF(VAR7,1)-1)*100,0)*10;   
  39. 电子A:=SUM((VAR8/REF(VAR8,1)-1)*100,0)*10;   
  40. 石化A:=SUM((VAR9/REF(VAR9,1)-1)*100,0)*10;   
  41. 制造A:=SUM((VAR10/REF(VAR10,1)-1)*100,0)*10;   
  42. 运输A:=SUM((VAR11/REF(VAR11,1)-1)*100,0)*10;   
  43. 上证A:=SUM((VAR12/REF(VAR12,1)-1)*100,0)*10;   
  44. 金属A:=SUM((VAR13/REF(VAR13,1)-1)*100,0)*10;   
  45.   
  46. AVAR17:=CONST(MA(医药A,RN));   
  47. AVAR18:=CONST(MA(金融A,RN));   
  48. AVAR19:=CONST(MA(纺织A,RN));   
  49. AVAR20:=CONST(MA(建筑A,RN));   
  50. AVAR21:=CONST(MA(机械A,RN));   
  51. AVAR22:=CONST(MA(地产A,RN));   
  52. AVAR23:=CONST(MA(农林A,RN));   
  53. AVAR24:=CONST(MA(电子A,RN));   
  54. AVAR25:=CONST(MA(石化A,RN));   
  55. AVAR26:=CONST(MA(制造A,RN));   
  56. AVAR27:=CONST(MA(运输A,RN));   
  57. AVAR28:=CONST(MA(上证A,RN));   
  58. AVAR29:=CONST(MA(金属A,RN));   
  59.   
  60. VAR17:=CONST(MA(医药,RN));   
  61. VAR18:=CONST(MA(金融,RN));   
  62. VAR19:=CONST(MA(纺织,RN));   
  63. VAR20:=CONST(MA(建筑,RN));   
  64. VAR21:=CONST(MA(机械,RN));   
  65. VAR22:=CONST(MA(地产,RN));   
  66. VAR23:=CONST(MA(农林,RN));   
  67. VAR24:=CONST(MA(电子,RN));   
  68. VAR25:=CONST(MA(石化,RN));   
  69. VAR26:=CONST(MA(制造,RN));   
  70. VAR27:=CONST(MA(运输,RN));   
  71. VAR28:=CONST(MA(上证,RN));   
  72. VAR29:=CONST(MA(金属,RN));   
  73.   
  74. P1:=IF(BARSLAST(CURRBARSCOUNT=4+1),1,0);   
  75. P2:=IF(BARSLAST(CURRBARSCOUNT=6+2),1,0);   
  76. P3:=IF(BARSLAST(CURRBARSCOUNT=8+3),1,0);   
  77. P4:=IF(BARSLAST(CURRBARSCOUNT=10+4),1,0);   
  78. P5:=IF(BARSLAST(CURRBARSCOUNT=12+5),1,0);   
  79. P6:=IF(BARSLAST(CURRBARSCOUNT=14+6),1,0);   
  80. P7:=IF(BARSLAST(CURRBARSCOUNT=16+7),1,0);   
  81. P8:=IF(BARSLAST(CURRBARSCOUNT=18+8),1,0);   
  82. P9:=IF(BARSLAST(CURRBARSCOUNT=20+9),1,0);   
  83. P10:=IF(BARSLAST(CURRBARSCOUNT=22+10),1,0);   
  84. P11:=IF(BARSLAST(CURRBARSCOUNT=24+11),1,0);   
  85. P12:=IF(BARSLAST(CURRBARSCOUNT=26+12),1,0);   
  86. P13:=IF(BARSLAST(CURRBARSCOUNT=28+13),1,0);   
  87. P14:=IF(BARSLAST(CURRBARSCOUNT=2),1,0);   
  88.   
  89.   
  90.   
  91. 医药B:=(CONST(医药A)-(AVAR17))-(CONST(医药)-(VAR17));   
  92. 金融B:=(CONST(金融A)-(AVAR18))-(CONST(金融)-(VAR18));   
  93. 纺织B:=(CONST(纺织A)-(AVAR19))-(CONST(纺织)-(VAR19));   
  94. 建筑B:=(CONST(建筑A)-(AVAR20))-(CONST(建筑)-(VAR20));   
  95. 机械B:=(CONST(机械A)-(AVAR21))-(CONST(机械)-(VAR21));   
  96. 地产B:=(CONST(地产A)-(AVAR22))-(CONST(地产)-(VAR22));   
  97. 农林B:=(CONST(农林A)-(AVAR23))-(CONST(农林)-(VAR23));   
  98. 电子B:=(CONST(电子A)-(AVAR24))-(CONST(电子)-(VAR24));   
  99. 石化B:=(CONST(石化A)-(AVAR25))-(CONST(石化)-(VAR25));   
  100. 制造B:=(CONST(制造A)-(AVAR26))-(CONST(制造)-(VAR26));   
  101. 运输B:=(CONST(运输A)-(AVAR27))-(CONST(运输)-(VAR27));   
  102. 上证B:=(CONST(上证A)-(AVAR28))-(CONST(上证)-(VAR28));   
  103. 金属B:=(CONST(金属A)-(AVAR29))-(CONST(金属)-(VAR29));   
  104.   
  105. STICKLINE(医药,0,IF(P2-P1,CONST(医药B),DRAWNULL),8,0),COLOR999999;   
  106. STICKLINE(金融,0,IF(P3-P2,CONST(金融B),DRAWNULL),8,0),COLOR999999;   
  107. STICKLINE(纺织,0,IF(P4-P3,CONST(纺织B),DRAWNULL),8,0),COLOR999999;   
  108. STICKLINE(建筑,0,IF(P5-P4,CONST(建筑B),DRAWNULL),8,0),COLOR999999;   
  109. STICKLINE(机械,0,IF(P6-P5,CONST(机械B),DRAWNULL),8,0),COLOR999999;   
  110. STICKLINE(地产,0,IF(P7-P6,CONST(地产B),DRAWNULL),8,0),COLOR999999;   
  111. STICKLINE(农林,0,IF(P8-P7,CONST(农林B),DRAWNULL),8,0),COLOR999999;   
  112. STICKLINE(电子,0,IF(P9-P8,CONST(电子B),DRAWNULL),8,0),COLOR999999;   
  113. STICKLINE(石化,0,IF(P10-P9,CONST(石化B),DRAWNULL),8,0),COLOR999999;   
  114. STICKLINE(制造,0,IF(P11-P10,CONST(制造B),DRAWNULL),8,0),COLOR999999;   
  115. STICKLINE(运输,0,IF(P12-P11,CONST(运输B),DRAWNULL),8,0),COLOR999999;   
  116. {STICKLINE(上证,0,IF(P1-P14,CONST(上证B),DRAWNULL),8,0),COLOR999999;}   
  117. STICKLINE(金属,0,IF(P13-P12,CONST(金属B),DRAWNULL),8,0),COLOR999999;   
  118.   
  119.   
  120. STICKLINE(医药,0,IF(P2-P1,CONST(医药A)-(AVAR17),DRAWNULL),6.5,-2),COLORFF00FF;   
  121. STICKLINE(金融,0,IF(P3-P2,CONST(金融A)-(AVAR18),DRAWNULL),6.5,-2),COLORFF00FF;   
  122. STICKLINE(纺织,0,IF(P4-P3,CONST(纺织A)-(AVAR19),DRAWNULL),6.5,-2),COLORFF00FF;   
  123. STICKLINE(建筑,0,IF(P5-P4,CONST(建筑A)-(AVAR20),DRAWNULL),6.5,-2),COLORFF00FF;   
  124. STICKLINE(机械,0,IF(P6-P5,CONST(机械A)-(AVAR21),DRAWNULL),6.5,-2),COLORFF00FF;   
  125. STICKLINE(地产,0,IF(P7-P6,CONST(地产A)-(AVAR22),DRAWNULL),6.5,-2),COLORFF00FF;   
  126. STICKLINE(农林,0,IF(P8-P7,CONST(农林A)-(AVAR23),DRAWNULL),6.5,-2),COLORFF00FF;   
  127. STICKLINE(电子,0,IF(P9-P8,CONST(电子A)-(AVAR24),DRAWNULL),6.5,-2),COLORFF00FF;   
  128. STICKLINE(石化,0,IF(P10-P9,CONST(石化A)-(AVAR25),DRAWNULL),6.5,-2),COLORFF00FF;   
  129. STICKLINE(制造,0,IF(P11-P10,CONST(制造A)-(AVAR26),DRAWNULL),6.5,-2),COLORFF00FF;   
  130. STICKLINE(运输,0,IF(P12-P11,CONST(运输A)-(AVAR27),DRAWNULL),6.5,-2),COLORFF00FF;   
  131. STICKLINE(上证,0,IF(P1-P14,CONST(上证A)-(AVAR28),DRAWNULL),6.5,-1),COLORFF00FF;   
  132. STICKLINE(金属,0,IF(P13-P12,CONST(金属A)-(AVAR29),DRAWNULL),6.5,-2),COLORFF00FF;   
  133.   
  134.   
  135. STICKLINE(医药,0,IF(P2-P1,CONST(医药)-(VAR17),DRAWNULL),4,0),COLORFF00FF;   
  136. STICKLINE(金融,0,IF(P3-P2,CONST(金融)-(VAR18),DRAWNULL),4,0),COLORFF00FF;   
  137. STICKLINE(纺织,0,IF(P4-P3,CONST(纺织)-(VAR19),DRAWNULL),4,0),COLORFF00FF;   
  138. STICKLINE(建筑,0,IF(P5-P4,CONST(建筑)-(VAR20),DRAWNULL),4,0),COLORFF00FF;   
  139. STICKLINE(机械,0,IF(P6-P5,CONST(机械)-(VAR21),DRAWNULL),4,0),COLORFF00FF;   
  140. STICKLINE(地产,0,IF(P7-P6,CONST(地产)-(VAR22),DRAWNULL),4,0),COLORFF00FF;   
  141. STICKLINE(农林,0,IF(P8-P7,CONST(农林)-(VAR23),DRAWNULL),4,0),COLORFF00FF;   
  142. STICKLINE(电子,0,IF(P9-P8,CONST(电子)-(VAR24),DRAWNULL),4,0),COLORFF00FF;   
  143. STICKLINE(石化,0,IF(P10-P9,CONST(石化)-(VAR25),DRAWNULL),4,0),COLORFF00FF;   
  144. STICKLINE(制造,0,IF(P11-P10,CONST(制造)-(VAR26),DRAWNULL),4,0),COLORFF00FF;   
  145. STICKLINE(运输,0,IF(P12-P11,CONST(运输)-(VAR27),DRAWNULL),4,0),COLORFF00FF;   
  146. {STICKLINE(上证,0,IF(P1-P14,CONST(上证)-(VAR28),DRAWNULL),4,0),COLORFF00FF;}   
  147. STICKLINE(金属,0,IF(P13-P12,CONST(金属)-(VAR29),DRAWNULL),4,0),COLORFF00FF;   
  148. DRAWTEXT(P2-P1,-2,' 医药'),COLORYELLOW;   
  149. DRAWTEXT(P3-P2,-2,' 金融'),COLORYELLOW;   
  150. DRAWTEXT(P4-P3,-2,' 纺织'),COLORYELLOW;   
  151. DRAWTEXT(P5-P4,-2,' 建筑'),COLORYELLOW;   
  152. DRAWTEXT(P6-P5,-2,' 机械'),COLORYELLOW;   
  153. DRAWTEXT(P7-P6,-2,' 地产'),COLORYELLOW;   
  154. DRAWTEXT(P8-P7,-2,' 农林'),COLORYELLOW;   
  155. DRAWTEXT(P9-P8,-2,' 电子'),COLORYELLOW;   
  156. DRAWTEXT(P10-P9,-2,' 石化'),COLORYELLOW;   
  157. DRAWTEXT(P11-P10,-2,' 制造'),COLORYELLOW;   
  158. DRAWTEXT(P12-P11,-2,' 运输'),COLORYELLOW;   
  159. DRAWTEXT(P1-P14,-2,' 上证'),COLORYELLOW;   
  160. DRAWTEXT(P13-P12,-2,' 金属'),COLORYELLOW;    

 

下载链接:( 说明:股海资源如需解压密码的请输入本站域名:www.guhai.com.cn请仔细输入!)
本地下载 (免费下载)
 ☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

股市风帆

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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