通达信拉升进入主图与选股公式有附图

阅读 作者:股海网时间 2009-12-16 通达信公式

 通达信拉升进入主图与选股公式有附图

{股海网提供:www.guhai.com.cn}

复制内容到剪贴板
  1. {拉升进入主图}   
  2. A6:EMA(CLOSE,5),COLORGREEN;   
  3. A10:EMA(CLOSE,10),COLORGREEN;   
  4. RJ:(C+O)*1/2;   
  5. STICKLINE(A6>REF(A6,3),A6,REF(A6,1),1,1),COLORRED;   
  6. STICKLINE(A6<REF(A6,3),A6,REF(A6,1),1,1),COLORGREEN;   
  7. IF(C>A6,A6,DRAWNULL),COLORWHITE,LINETHICK2;   
  8. IF(C>A10,A10,DRAWNULL),COLORRED,LINETHICK2;   
  9. JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));   
  10. DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);   
  11. JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));   
  12. CYC1:IF(JJJT,0.01*EXPMA(AMOUNT,6)/EXPMA(VOL,6),EMA((HIGH+LOW+CLOSE)/3,6)),COLORGREEN;   
  13. CYC2:IF(JJJT,0.01*EXPMA(AMOUNT,8)/EXPMA(VOL,8),EMA((HIGH+LOW+CLOSE)/3,8)),COLORGREEN;   
  14. CYC3:IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34));   
  15. CYC∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));   
  16. IF(CYC1>REF(CYC1,1) OR C>CYC1,CYC1,DRAWNULL),COLORWHITE,LINETHICK2;   
  17. IF(C>CYC2,CYC2,DRAWNULL),COLORRED,LINETHICK2;   
  18. B:=CROSS(CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1)   
  19. AND CYC∞>REF(CYC∞,1) AND C>CYC∞ AND RJ>REF(RJ,1) AND A6>REF(A6,1),0.2);   
  20. 拉升进入:= CROSS(C,CYC∞) AND CYC∞>REF(CYC∞,1) AND CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1);   
  21. DRAWTEXT(B,LOW-(H-L)*0.6,'升');   
  22. DRAWTEXT(拉升进入,LOW-(H-L)*0.96,'拉升');   

 

复制内容到剪贴板
  1. {拉升进入选股}   
  2. A6:=EMA(CLOSE,5),COLORGREEN;   
  3. A10:=EMA(CLOSE,10),COLORGREEN;   
  4. RJ:=(C+O)*1/2;   
  5. {STICKLINE(A6>REF(A6,3),A6,REF(A6,1),1,1),COLORRED;   
  6. STICKLINE(A6<REF(A6,3),A6,REF(A6,1),1,1),COLORGREEN;}   
  7. Q1:=IF(C>A6,A6,DRAWNULL),COLORWHITE,LINETHICK2;   
  8. Q2:=IF(C>A10,A10,DRAWNULL),COLORRED,LINETHICK2;   
  9. JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));   
  10. DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);   
  11. JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));   
  12. CYC1:=IF(JJJT,0.01*EXPMA(AMOUNT,6)/EXPMA(VOL,6),EMA((HIGH+LOW+CLOSE)/3,6)),COLORGREEN;   
  13. CYC2:=IF(JJJT,0.01*EXPMA(AMOUNT,8)/EXPMA(VOL,8),EMA((HIGH+LOW+CLOSE)/3,8)),COLORGREEN;   
  14. CYC3:=IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34));   
  15. CYC∞:=IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));   
  16. P1:=IF(CYC1>REF(CYC1,1) OR C>CYC1,CYC1,DRAWNULL),COLORWHITE,LINETHICK2;   
  17. P2:=IF(C>CYC2,CYC2,DRAWNULL),COLORRED,LINETHICK2;   
  18. B:=CROSS(CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1)   
  19. AND CYC∞>REF(CYC∞,1) AND C>CYC∞ AND RJ>REF(RJ,1) AND A6>REF(A6,1),0.2);   
  20. 拉升进入:= CROSS(C,CYC∞) AND CYC∞>REF(CYC∞,1) AND CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1);   
  21. 拉升:=IF(A6>REF(A6,1),1,0) AND   
  22. CROSS(C,A6),COLORRED;   
  23. FILTER((拉升=1 AND V*1.5),5),COLORYELLOW;   

拉升进入主图与选股公式(有附图)

收藏
全部看法共 0 条
上传会员: 
股海网
上传时间: 
2009-12-16
下载积分: 
-
免责申明: 
请仔细阅读并同意后才能下载
本附件为用户分享上传,股海网没有对文件进行验证,不能保证下载资源的准确性、安全性和完整性,也不保证下载资源能正常安装和使用,且下载后扣除的积分无法退还,除非您充分理解并完全接受本声明,否则您无权下载。
本站对提供下载的软件、指标、资料等不拥有任何权利,其版权归该下载资源的合法拥有者所有。本附件仅供学习和研究,不得用于商业或非法用途,如有侵犯您的版权,请参看 《侵权处理流程》《免责声明条款》
点击下载无反应时,更换手机自带浏览器重登录操作,如华为浏览器,苹果Safari浏览器,第三方浏览器有不兼容现象,或先收藏再到电脑端下载。
同意以上声明才能下载,扣除积分无法退还!
我已知晓! 点我同意 所有条款自愿下载!
如有问题请点关闭提交问题反馈→
关闭

问题反馈 取消