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

主力动向指标 （有图有源码）

发布时间：2010/5/26 6:59:52  浏览次数：

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. {-------【主力动向】主力,散户筹码一目了然,经典MACD与KDJ的完美组合!---------}   
  2. {-------------------------通达信新分时源码广哥深度优化版--------------------}   
  3. A:=CURRBARSCOUNT;   
  4. A1:=DAY!=REF(DAY,1);   
  5. A2:=BARSLAST(A1)+1;   
  6. A3:=MA(C,A2);   
  7. A4:=SUM(AMO,A2)/SUM(VOL,A2)/100;   
  8. A5:=IF(CAPITAL>0,A4,A3);   
  9. 均价线:=IF(A<=CONST(A2),A5,DRAWNULL);   
  10. 分钟有效周期:=IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,DRAWNULL))));   
  11. 分时价:=TFILT(CLOSE,CURRBARSCOUNT,00,CURRBARSCOUNT,00);   
  12. 分时判断:=IF(分时价=DRAWNULL,1,IF(分钟有效周期=DRAWNULL,DRAWNULL,1));   
  13. {-----------------------------由MACD定位顶底-------------------------------}   
  14. DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);   
  15. DEA:=EMA(DIFF,9);   
  16. MACD:=2*(DIFF-DEA);   
  17. KX:=BARSSINCE(CLOSE);{←首次开盘价距金的天数}   
  18. HHN:=CONST(HHV(DIFF,KX));   
  19. HLN:=CONST(LLV(DEA,KX));   
  20. RC1:=CONST((HHN+HLN)/2);   
  21. SS:=((HHN-HLN)/200);   
  22. MACD底部:=(-100*SS+RC1)+-(-100*SS+RC1),COLOR669999;    
  23. MACD顶部:=(100*SS+RC1)+-(-100*SS+RC1),COLORFF0033;   
  24. MACD中轴:=0+-(-100*SS+RC1);   
  25. DIFF修正:=DIFF+-(-100*SS+RC1),COLOR008080;   
  26. DEA修正:=DEA+-(-100*SS+RC1),COLOR00FF00;   
  27. MACD修正:=2*(DIFF修正-DEA修正)+MACD中轴,COLOR0000BB,NODRAW;   
  28. MACD超跌:=CONST(LLV(MACD修正,KX));   
  29. MACD超跌线:=IF(MACD超跌<MACD底部,MACD超跌,MACD底部);   
  30. {----------------------利用MACD趋势进行精确顶底判断------------------------}   
  31. 顶部:=MACD顶部+-MACD超跌线;   
  32. 天际:=顶部*0.809;   
  33. 中轴:=MACD中轴+-MACD超跌线;   
  34. 海面:=顶部*0.191;   
  35. 底部:=MACD底部;   
  36. {------------------------传统KDJ指标结合MACD优化---------------------------}   
  37. RSVA:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*顶部;{采用21日月线优化}   
  38. K:SMA(RSVA,3,1),COLORFFFFFF,NODRAW;   
  39. D:SMA(K,3,1),COLOR00FFFF,NODRAW;   
  40. 原J值参数:=3*K-2*D;   
  41. JD:=IF(原J值参数<底部,底部,原J值参数);{J值底部钝化处理}   
  42. J:IF(JD>顶部,顶部,JD),COLORFF00FF,NODRAW;{底部钝化处理后再进行顶部钝化处理}   
  43. {---------------------------MACD多空量能判断-------------------------------}   
  44. MACD多头:DIFF修正+-MACD超跌线,COLOR339999;   
  45. 空头:DEA修正+-MACD超跌线,COLOR00FF00;   
  46. 量能柱:2*(MACD多头-空头)+中轴,COLOR0000BB,NODRAW;   
  47. 超前DEA:=(EMA(MACD多头,7));   
  48. 超前MACD:=2*(MACD多头-超前DEA)+中轴;   
  49. {-----------------------------------大盘动向-------------------------------}   
  50. VAR1大盘:=LLV(LOW,13);   
  51. VAR2大盘:=HHV(HIGH,13);   
  52. VAR3大盘:=(SMA((CLOSE-VAR1大盘)/(VAR2大盘-VAR1大盘)*顶部,5,1))-顶部/2;   
  53. VAR4大盘:=SMA((VAR2大盘-CLOSE)/(VAR2大盘-VAR1大盘)*顶部,5,1)-顶部/2;   
  54. 大盘散户:=IF(VAR4大盘<底部,底部,VAR4大盘),COLOR408000;   
  55. 大盘主力:=IF(VAR3大盘<底部,底部,VAR3大盘),COLOR330088;   
  56. {---------------------------------密集成本突破-----------------------------}   
  57. 最高获利参数:=顶部/100;   
  58. VAR1C:=(COST(89)-COST(11))*最高获利参数;   
  59. VAR2C:=(COST(99.9)-COST(1))*最高获利参数;   
  60. 单峰:=((1-VAR1C/VAR2C))*顶部;   
  61. 低密:=((COST(90)-COST(60))/VAR2C)*顶部;   
  62. 高密:=((COST(40)-COST(1))/VAR2C)*顶部;   
  63. 赢利:= (SMA(WINNER(AMOUNT/VOL/99),2,1))*顶部;   
  64. 活跃度:顶部-顶部/(1+EXPMA(HSL,21)),COLOR774455;{←CYF公众追涨热情指标}   
  65. ７０%成本集中度:=IF(VAR1C>顶部,顶部,VAR1C),COLORFFFFFF;   
  66. ９０%成本集中度:=IF(VAR2C>顶部,顶部,VAR2C),COLORFF0000;   
  67. 套牢筹码上升:=IF((单峰-赢利)>底部,(单峰-赢利),底部);   
  68. 个股散户:=IF(套牢筹码上升>顶部,顶部,套牢筹码上升),COLOR408000;   
  69. 散户:IF(个股散户=DRAWNULL,DRAWNULL,个股散户),COLOR408000;   
  70. 获利筹码上升:=IF((赢利-单峰)>底部,(赢利-单峰),底部);   
  71. 个股主力:=IF(获利筹码上升>顶部,顶部,获利筹码上升),COLOR330088;   
  72. 主力:IF(个股主力=DRAWNULL,DRAWNULL,个股主力),COLOR330088;   
  73. {--------------------换手率,五日换手率辅助判断个股活跃度-------------------}   
  74. 换手:SUM(VOL,1)/CAPITAL*100,COLOR666666,NODRAW;   
  75. ⑤日换:SUM(VOL,5)/CAPITAL*100,COLOR999999,NODRAW;   
  76. {----------------------密集成本突破指标筹码峰画线--------------------------}   
  77. 金色背景修边1:STICKLINE(C>0 AND CURRBARSCOUNT>=2,顶部,底部,3.05,0),COLOR003333;   
  78. 金色背景修边2:STICKLINE(C>0 AND CURRBARSCOUNT>=2,顶部,中轴,3.05,0),COLOR003333;   
  79. 金色背景补充:DRAWBAND(顶部,RGB(51,51,0),中轴,RGB(51,51,0));   
  80. 金色背景:DRAWBAND(顶部,RGB(51,51,0),底部,RGB(128,128,128));   
  81. 追涨热度峰紫色:DRAWBAND(活跃度,RGB(66,52,81),底部,RGB(204,0,0));   
  82. 高密峰墨蓝色:=DRAWBAND(高密,RGB(0,0,51),底部,RGB(0,0,255));   
  83. 低密峰纯蓝色:=DRAWBAND(低密,RGB(0,0,102),底部,RGB(0,0,255));   
  84. ９０%成本峰:DRAWBAND(９０%成本集中度,RGB(0,0,153),底部,RGB(0,0,153));   
  85. ７０%成本峰:DRAWBAND(７０%成本集中度,RGB(0,128,0),底部,RGB(255,255,255));   
  86. 散户峰绿色:DRAWBAND(散户,RGB(0,64,0),底部,RGB(204,0,0));   
  87. 主力峰红色:DRAWBAND(主力,RGB(102,26,51),底部,RGB(0,0,255));   
  88. MACD多空趋势:DRAWBAND(MACD多头,RGB(204,51,51),空头,RGB(0,179,0));   
  89. MACD多头重画:DRAWBAND(MACD多头,RGB(153,153,51),MACD多头,RGB(153,153,51));   
  90. MACD空头重画:DRAWBAND(空头,RGB(0,204,0),空头,RGB(0,204,0));   
  91. {--------创幻论坛‘131488’会员提供的通达信■新宝塔线■-----原码-----------}   
  92. VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);   
  93. VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  94. VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  95. VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  96. VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  97. VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  98. VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  99. VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  100. VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  101. VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);   
  102. VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  103. VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  104. VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  105. VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  106. VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  107. VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  108. VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  109. VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  110. VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  111. VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  112. VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  113. 三平底翻金:=(REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1))   
  114.             AND VAR1;   
  115. 主力启动线:=MA(V,5),COLORFFFFFF;   
  116. 主力洗盘线:=MA(V,35),COLOR00FFFF;   
  117. 资金异动线:=MA(V,135),COLORFF0000;   
  118. {----------------------------买卖参考--------------------------------------}   
  119. 出击:=(CROSS(主力启动线,资金异动线) OR ((主力洗盘线 > 资金异动线) AND CROSS(主力启动线,主力洗盘线))),COLORYELLOW;   
  120. 启动:=(主力启动线>REF(主力启动线,1) AND (CROSS(VOL,主力启动线) AND (REF(VOL,1)<REF(资金异动线,1) OR REF(VOL,2)<REF(资金异动线,2)))),COLOR45AAEE;   
  121. 成立:=三平底翻金 AND (出击 OR 启动);   
  122. 买入提示:=IF(成立=1,海面*0.5,0) AND 分时判断=1;   
  123. {------------------------顶部线,天际线,海面线,底部线重画-------------------}   
  124. 顶部线:DRAWBAND(顶部,RGB(51,0,255),顶部,RGB(51,0,255));   
  125. 天际线:DRAWBAND(天际,RGB(128,64,64),天际,RGB(128,64,64));   
  126. 海面线:DRAWBAND(海面,RGB(0,153,153),海面,RGB(0,153,153));   
  127.   
  128. {------------------------超前MACD多空量能柱--------------------------------}   
  129. 超前MACD红柱1:STICKLINE(超前MACD>=中轴,超前MACD,中轴,1.50,0),COLOR226688;   
  130. 超前MACD红柱2:STICKLINE(超前MACD>=中轴,超前MACD,中轴,0.95,0),COLOR4488BB;   
  131. 超前MACD红柱3:STICKLINE(超前MACD>=中轴,超前MACD,中轴,0.31,0),COLOR55AADD;   
  132. 超前MACD兰柱1:STICKLINE(超前MACD<=中轴,超前MACD,中轴,1.50,0),COLOR006600;   
  133. 超前MACD兰柱2:STICKLINE(超前MACD<=中轴,超前MACD,中轴,0.95,0),COLOR007700;   
  134. 超前MACD兰柱3:STICKLINE(超前MACD<=中轴,超前MACD,中轴,0.31,0),COLOR008800;   
  135. {--------------------------MACD多空量能柱----------------------------------}   
  136. MACD红柱1:STICKLINE(量能柱>=中轴,量能柱,中轴,1.5,0),COLOR000077;   
  137. MACD红柱2:STICKLINE(量能柱>=中轴,量能柱,中轴,1.1,0),COLOR000088;   
  138. MACD红柱3:STICKLINE(量能柱>=中轴,量能柱,中轴,0.6,0),COLOR000099;   
  139. MACD红柱4:STICKLINE(量能柱>=中轴,量能柱,中轴,0.15,0),COLOR0000AA;   
  140. MACD兰柱1:STICKLINE(量能柱<=中轴,量能柱,中轴,1.5,0),COLORAA6633;   
  141. MACD兰柱2:STICKLINE(量能柱<=中轴,量能柱,中轴,1.1,0),COLORBB7744;   
  142. MACD兰柱3:STICKLINE(量能柱<=中轴,量能柱,中轴,0.6,0),COLORCC8855;   
  143. MACD兰柱4:STICKLINE(量能柱<=中轴,量能柱,中轴,0.15,0),COLORDD9966;   
  144. {---------中轴线重画及顶部线,天际线,海面线,底部线,多空线文字说明-----------}   
  145. 中轴线:DRAWBAND(中轴,RGB(128,128,255),中轴,RGB(128,128,255));   
  146. 顶部线文字:DRAWTEXT(CURRBARSCOUNT=1,顶部*0.98,'  顶部线'),COLORFF0033;   
  147. 天际线文字:DRAWTEXT(CURRBARSCOUNT=1,天际*0.98,'  天际线'),COLOR404080;   
  148. 海面线文字:DRAWTEXT(CURRBARSCOUNT=1,海面,'  海面线'),COLOR999900;   
  149. 底部线文字:DRAWTEXT(CURRBARSCOUNT=1,底部,'  底部线'),COLOR669999;   
  150. 中轴线文字:DRAWTEXT(CURRBARSCOUNT=1,中轴,'  多空线'),COLORFF8080;   
  151. {-------------------------------传统KDJ指标线重画--------------------------}   
  152. D线重画:DRAWBAND(D,RGB(255,255,0),D*0.998,RGB(255,255,0));   
  153. K线重画:DRAWBAND(K,RGB(255,255,255),K,RGB(255,255,255));   
  154. J线重画:DRAWBAND(J,RGB(255,0,255),J,RGB(255,0,255));　  

主力动向指标 （有图有源码）

资源下载链接   资源大小：3KB
精品资源推荐
公式指标平台栏目导航

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