当前位置:→ 股海网大智慧公式 → 正文
  • 老张解盘

  • 相关简介:C/C++ Code 复制内容到剪贴板 {老张解盘} 多空2:=ema(c,148); 多空3:=ema(c,250); TJTS:=BARSTATUS=2; IFC0ANDTJTSTHENBEGIN DRAWTEXTREL(20,50, '老张解盘' ),LINETHICK6,Coloryellow; DRAWTEXTREL(200,50,STKLABEL+ '' +STKNAME),LINETHICK6,ColorFFFF80; DRAWTEXTREL(500

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

 

C/C++ Code复制内容到剪贴板
  1. {老张解盘}   
  2. 多空2:=ema(c,148);   
  3. 多空3:=ema(c,250);   
  4. TJTS:=BARSTATUS=2;   
  5. IF C>0 AND TJTS  THEN  BEGIN   
  6. DRAWTEXTREL(20,50,'老张解盘'),LINETHICK6,Coloryellow;   
  7. DRAWTEXTREL(200,50,STKLABEL+' '+STKNAME),LINETHICK6,ColorFFFF80;   
  8. DRAWTEXTREL(500,30,'流通:'+NUMTOSTRN(FINANCE2 (36),0 )+' '+'换手:'+NUMTOSTRN( DYNAINFO(37)*100,3 )),LINETHICK3,ColorFFFF80;end;   
  9. IF c>=多空2 AND TJTS  THEN  BEGIN   
  10. DRAWTEXTREL(480,200,'股价在半年线之上'),LINETHICK3,color00ff00;end;   
  11. IF c<多空2 AND TJTS  THEN  BEGIN   
  12. DRAWTEXTREL(480,200,'股价在半年线之下'),LINETHICK3,color00ffff;end;   
  13. IF 多空2>=ref(多空2,1) AND TJTS  THEN  BEGIN   
  14. DRAWTEXTREL(670,200,'半年线趋势向上'),LINETHICK3,colorffff00;end;   
  15. IF 多空2<ref(多空2,1) AND TJTS  THEN  BEGIN   
  16. DRAWTEXTREL(670,200,'半年线趋势向下'),LINETHICK3,color00ffff;end;   
  17.   
  18. IF c>=多空3 AND TJTS  THEN  BEGIN   
  19. DRAWTEXTREL(240,600,'股价在年线之上'),LINETHICK3,color00ffff;end;   
  20. IF c<多空3 AND TJTS  THEN  BEGIN   
  21. DRAWTEXTREL(240,600,'股价在年线之下'),LINETHICK3,colorffff00;end;   
  22. IF 多空3>=ref(多空3,1) AND TJTS  THEN  BEGIN   
  23. DRAWTEXTREL(240,700,'年线趋势向上'),LINETHICK3,color00ffff;end;   
  24. IF 多空3<ref(多空3,1) AND TJTS  THEN  BEGIN   
  25. DRAWTEXTREL(240,700,'年线趋势向下'),LINETHICK3,colorffff00;end;   
  26.   
  27. tr:=c*2.5/100+c;   
  28. hd:=c-c*2.5/100;   
  29. IF cost(50) AND TJTS  THEN  BEGIN   
  30. DRAWTEXTREL(20,200,'市场平均成本:'+NUMTOSTRN( cost(50),2)),LINETHICK3,colorffff00;end;   
  31. IF cost(4) AND TJTS  THEN  BEGIN   
  32. DRAWTEXTREL(20,300,'主力平均成本:'+NUMTOSTRN( cost(4),2)),LINETHICK3,color00ffff;end;   
  33. IF cost(30) AND TJTS  THEN  BEGIN   
  34. DRAWTEXTREL(20,400,'控盘平均成本:'+NUMTOSTRN( cost(30),2)),LINETHICK3,color0000ff;end;   
  35. IF cost(75) AND TJTS  THEN  BEGIN   
  36. DRAWTEXTREL(20,500,'拉升平均成本:'+NUMTOSTRN( cost(75),2)),LINETHICK3,color0000ff;end;   
  37. IF cost(95) AND TJTS  THEN  BEGIN   
  38. DRAWTEXTREL(20,600,'顶部平均成本:'+NUMTOSTRN( cost(95),2)),LINETHICK3,color00ffff;end;   
  39. IF cost(0.05) AND TJTS  THEN  BEGIN   
  40. DRAWTEXTREL(20,700,'底部平均成本:'+NUMTOSTRN( cost(0.05),2)),LINETHICK3,color00ffff;end;   
  41. IF tr AND TJTS  THEN  BEGIN   
  42. DRAWTEXTREL(240,200,'股道卖出价预测:'+NUMTOSTRN( tr,2)),LINETHICK3,color00ffff;end;   
  43. IF hd AND TJTS  THEN  BEGIN   
  44. DRAWTEXTREL(240,300,'股道买入价预测:'+NUMTOSTRN( hd,2)),LINETHICK3,color0099ff;end;   
  45. IF C>0 AND TJTS  THEN  BEGIN   
  46. DRAWTEXTREL(240,400,'获利盘比例=:'+NUMTOSTRN( winner(c)*100,2)),LINETHICK3,color0099ff;end;   
  47. IF C>0 AND TJTS  THEN  BEGIN   
  48. DRAWTEXTREL(240,500,'套牢盘比例=:'+NUMTOSTRN( (100-winner(c)*100),2)),LINETHICK3,color0000ff;end;   
  49.   
  50. ld:=ma(v/(h-l),4);   
  51. dmp:=abs(c-o);   
  52. dmm:=v/(h-l);   
  53. i:=-100;   
  54. IF dmm<ld and dmp<ma(dmp,4) AND TJTS  THEN  BEGIN   
  55. DRAWTEXTREL(480,400+i,'资金无入场意愿,萎缩中'),LINETHICK3,colorffff00;i:=i+100;end;   
  56. IF dmm<ld and dmp>ma(dmp,4) AND TJTS  THEN  BEGIN   
  57. DRAWTEXTREL(480,400+i,'场内资金有运作行为'),LINETHICK3,colorffff00;i:=i+100;end;   
  58. IF dmm>ld and dmp<ma(dmp,4) AND TJTS  THEN  BEGIN   
  59. DRAWTEXTREL(480,400+i,'多空双方激烈争夺中'),LINETHICK3,color00ffff;i:=i+100;end;   
  60. IF dmm>ld and dmp>ma(dmp,4) AND TJTS  THEN  BEGIN   
  61. DRAWTEXTREL(480,400+i,'场外资金介入(或出局)意愿强烈'),LINETHICK3,color00ffff;i:=i+100;end;   
  62.   
  63. pdi:=sum(max(max(h-l,abs(h-ref(c,1))),abs(l-ref(c,1))),14);   
  64. mdi:=h-ref(h,1);   
  65. adx:=ref(l,1)-l;   
  66. adxr:=sum(if(mdi>0 and mdi>adx,mdi,0),14);   
  67. typ:=sum(if(adx>0 and adx>mdi,adx,0),14);   
  68. cci:=adxr*100/pdi;   
  69. wr:=typ*100/pdi;   
  70. mtm:=ma(abs(wr-cci)/(wr+cci)*100,6);   
  71. mtmma:=(mtm+ref(mtm,6))/2;   
  72. IF cross(cci,wr) AND TJTS  THEN  BEGIN   
  73. DRAWTEXTREL(480,400+i,'PDI线从下向上突破MDI线,显示有新多头进场,为买进信号'),LINETHICK3,color0099ff;i:=i+100;end;   
  74. IF cross(wr,cci) AND TJTS  THEN  BEGIN   
  75. DRAWTEXTREL(480,400+i,'PDI线从上向下跌破MDI线,显示有新空头进场,为卖出信号'),LINETHICK3,colorff0000;i:=i+100;end;   
  76. IF mtm>ref(mtm,1) AND TJTS  THEN  BEGIN   
  77. DRAWTEXTREL(480,400+i,'ADX值持续高于前一日,行情将维持原趋势'),LINETHICK3,colorffff00;i:=i+100;end;   
  78. IF mtm<ref(mtm,1) and mtm<20 AND TJTS  THEN  BEGIN   
  79. DRAWTEXTREL(480,400+i,'ADX值递减,降到20以下,且横向行进时,气氛为盘整'),LINETHICK3,color00ffff;i:=i+100;end;   
  80. IF mtm<ref(mtm,1) and ref(mtm,1)<ref(mtm,2) and ref(mtm,2)>ref(mtm,3) and ref(mtm,3)>ref(mtm,4) AND TJTS  THEN  BEGIN   
  81. DRAWTEXTREL(480,400+i,'ADX值从上升倾向转为下降时,表明行情即将反转'),LINETHICK3,color0099ff;i:=i+100;end;   
  82.   
  83. lc:=(h+l+c)/3;   
  84. rsi1:=(lc-ma(lc,14))/0.015*avedev(lc,14);   
  85.   
  86. rsi2:=-(100*(hhv(h,14)-c)/(hhv(h,14)-llv(l,14)));   
  87.   
  88. IF rsi1<-180 AND TJTS  THEN  BEGIN   
  89. DRAWTEXTREL(480,400+i,'CCI指标底位,买入机会'),LINETHICK3,color00ffff;i:=i+100;end;   
  90. IF rsi1>180 AND TJTS  THEN  BEGIN   
  91. DRAWTEXTREL(480,400+i,'CCI指标高位,卖出机会'),LINETHICK3,color00ff00;i:=i+100;end;   
  92. IF v/capital>0.075 AND TJTS  THEN  BEGIN   
  93. DRAWTEXTREL(480,400+i,'换手过大,小心主力出逃,短期头部'),LINETHICK3,colorffff00;i:=i+100;end;   
  94. IF rsi2>-20 AND TJTS  THEN  BEGIN   
  95. DRAWTEXTREL(480,400+i,'W&R超买,短线即将见顶,应及时卖出'),LINETHICK3,color00ffff;i:=i+100;end;   
  96. IF rsi2<-80 AND TJTS  THEN  BEGIN   
  97. DRAWTEXTREL(480,400+i,'W&R超卖,短线即将见底,应伺机买进'),LINETHICK3,colorffff00;i:=i+100;end;   
  98. psy:=c-ref(c,6);   
  99. 布林1:=ma(psy,6);   
  100. IF cross(psy,布林1) and 布林1<-0.8 AND TJTS  THEN  BEGIN   
  101. DRAWTEXTREL(480,400+i,'MTM从下向上突破MTMMA,买入信号'),LINETHICK3,color00ff00;i:=i+100;end;   
  102. IF cross(布林1,psy) and 布林1>0.8 AND TJTS  THEN  BEGIN   
  103. DRAWTEXTREL(480,400+i,'MTM从上向下跌破MTMMA,卖出信号'),LINETHICK3,color00ff00;i:=i+100;end;   
  104.   
  105. 布林2:=ref(c,1);   
  106. 布林3:=sma(max(c-布林2,0),6,1)/sma(abs(c-布林2),6,1)*100;   
  107. 布林4:=sma(max(c-布林2,0),12,1)/sma(abs(c-布林2),12,1)*100;   
  108.   
  109. IF 布林3>80 AND TJTS  THEN  BEGIN   
  110. DRAWTEXTREL(480,400+i,'6日RSI向上突破85,超买,考虑卖出'),LINETHICK3,colorffff00;i:=i+100;end;   
  111. IF 布林3<15 AND TJTS  THEN  BEGIN   
  112. DRAWTEXTREL(480,400+i,'6日RSI超卖,随时有可能反弹,考虑买入'),LINETHICK3,colorffff00;i:=i+100;end;   
  113. IF cross(布林3,15) AND TJTS  THEN  BEGIN   
  114. DRAWTEXTREL(480,400+i,'6日RSI向上突破15,买进信号'),LINETHICK3,color00ffff;i:=i+100;end;   
  115. IF cross(布林3,85) AND TJTS  THEN  BEGIN   
  116. DRAWTEXTREL(480,400+i,'6日RSI向下跌破85,卖出信号'),LINETHICK3,color00ff00;i:=i+100;end;   
  117.   
  118. 布林5:=count(c>ref(c,1),12)/12*100;   
  119. 布林6:=(ma(c,3)+ma(c,6)+ma(c,12)+ma(c,24))/4;   
  120. 布林7:=布林6+3*std(布林6,10);   
  121. xx:=布林6-3*std(布林6,10);   
  122. a001:=(布林7-xx)/布林7<0.03;   
  123. a002:=(布林7-xx)/布林7>0.18;   
  124. a003:=(ma(c,60)-ma(c,5))/ma(c,60)>0.15;   
  125. a004:=(ma(c,5)-ma(c,60))/ma(c,5)>0.15;   
  126. IF a001 AND TJTS  THEN  BEGIN   
  127. DRAWTEXTREL(480,400+i,'多空布林收敛中,有变盘的可能,上下自己分析'),LINETHICK3,colorffff00;i:=i+100;end;   
  128. IF a003 and a002 and c>o AND TJTS  THEN  BEGIN   
  129. DRAWTEXTREL(480,400+i,'布林上下乖离太大,有反弹的可能'),LINETHICK3,color00ffff;i:=i+100;end;   
  130. IF a004 and a002 and c<o AND TJTS  THEN  BEGIN   
  131. DRAWTEXTREL(480,400+i,'布林上下乖离太大,有回落的可能'),LINETHICK3,color00ff00;i:=i+100;end;   
  132. IF h>=hhv(h,20) AND TJTS  THEN  BEGIN   
  133. DRAWTEXTREL(850,200,'创20天新高'),LINETHICK3,colorffff00;end;    

 

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

老张解盘

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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