当前位置:→ 股海网飞狐公式 → 正文
  • 蛟龙出海

  • 相关简介:C/C++ Code 复制内容到剪贴板 {蛟龙出海}{YNGS仿制} DRAWGBK(CLOSE,COLORRGB(100,0,0),COLORRGB(255,255,0),0); GA:=(3*CLOSE+LOW+OPEN+HIGH)/6; GB:=(20*GA+19*REF(GA,1)+18*REF(GA,2)+17*REF(GA,3)+16*REF(GA,4)+15*REF(GA,5)+14*REF(GA,6)+13*REF(GA,7)+12*REF(GA,8)+11*RE

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

 

C/C++ Code复制内容到剪贴板
  1. {蛟龙出海}{YNGS仿制}   
  2. DRAWGBK(CLOSE,COLORRGB(100,0,0),COLORRGB(255,255,0),0);   
  3. GA:=(3*CLOSE+LOW+OPEN+HIGH)/6;   
  4. GB:=(20*GA+19*REF(GA,1)+18*REF(GA,2)+17*REF(GA,3)+16*REF(GA,4)+15*REF(GA,5)+14*REF(GA,6)+13*REF(GA,7)+12*REF(GA,8)+11*REF(GA,9)+10*REF(GA,10)+9*REF(GA,11)+8*REF(GA,12)+7*REF(GA,13)+6*REF(GA,14)+5*REF(GA,15)+4*REF(GA,16)+3*REF(GA,17)+2*REF(GA,18)+REF(GA,20))/210;   
  5. D1:MA(GB,3);   
  6. D2:MA(GB,5);   
  7. D3:MA(GB,21);   
  8. D4:MA(GB,34);   
  9. FILLRGN(D3>D4,D3,D4),color8000FF;   
  10. FILLRGN(D3<D4,D3,D4),colorFF80;   
  11. FILLRGN(D1>D2,D1,D2),color80FF;   
  12. FILLRGN(D1<D2,D1,D2),colorFF8000;   
  13. TJ:=CLOSE>OPEN OR CLOSE=OPEN AND CLOSE>REF(CLOSE,1);   
  14. STICKLINE(TJ,LOW,HIGH,0.8,0),colorFF;   
  15. STICKLINE(TJ,OPEN,CLOSE,8,0),colorFF;   
  16. STICKLINE(TJ,OPEN,CLOSE,6,0),color8B6AFD;   
  17. STICKLINE(TJ,OPEN,CLOSE,2,0),colorC6B6FE;   
  18. STICKLINE(TJ,OPEN,CLOSE,1,0),colorF9F7FF;   
  19. STICKLINE(NOT(TJ),LOW,HIGH,0.1,0),colorFF0000;   
  20. STICKLINE(NOT(TJ),OPEN,CLOSE,8,0),colorFF0000;   
  21. STICKLINE(NOT(TJ),OPEN,CLOSE,6,0),colorFF7578;   
  22. STICKLINE(NOT(TJ),OPEN,CLOSE,2,0),colorFFBFC1;   
  23. STICKLINE(NOT(TJ),OPEN,CLOSE,0.5,0),colorFFFFF7;   
  24. DRAWBKBMP(CLOSE,'cpw'),ALIGN4;   
  25. RSI1:=(SMA(MAX(INDEXC-REF(INDEXC,1),0),6,1))/(SMA(ABS(INDEXC-REF(INDEXC,1)),6,1))*100;   
  26. DA1:=(3*INDEXC+INDEXL+INDEXO+INDEXH)/6;   
  27. DB:=(20*DA1+19*REF(DA1,1)+18*REF(DA1,2)+17*REF(DA1,3)+16*REF(DA1,4)+15*REF(DA1,5)+14*REF(DA1,6)+13*REF(DA1,7)+12*REF(DA1,8)+11*REF(DA1,9)+10*REF(DA1,10)+9*REF(DA1,11)+8*REF(DA1,12)+7*REF(DA1,13)+6*REF(DA1,14)+5*REF(DA1,15)+4*REF(DA1,16)+3*REF(DA1,17)+2*REF(DA1,18)+REF(DA1,20))/210;   
  28. B1:=MA(DB,3);   
  29. B2:=MA(DB,5);   
  30. B3:=MA(DB,21);   
  31. B4:=MA(DB,34);   
  32. S:=IF(DATE>960101,1,0);   
  33. VARQS12:=LLV(INDEXC,24)*1.056;   
  34. VARQS13:=(COUNT(MA(INDEXC,5)>REF(MA(INDEXC,5),1),17))/17*100;   
  35. DRAWTEXT(CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 AND B3<B4 OR CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>REF(INDEXC,1)*1.056 AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MAX(B3,B4) AND B3<B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MIN(B3,B4) AND B3>B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1,LOW*0.98,'大盘见底啦!');   
  36. DRAWTEXT(CROSS(B4,INDEXC) AND B3<B4 AND INDEXC>MIN(B1,MIN(B2,MIN(B3,B4))) AND B1<B4 AND COUNT(CROSS(B4,B3),BARSLAST(CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 AND B3<B4 OR CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>REF(INDEXC,1)*1.056 AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MAX(B3,B4) AND B3<B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MIN(B3,B4) AND B3>B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1))=1 AND COUNT(CROSS(B4,INDEXC) AND B3<B4,BARSLAST(CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 AND B3<B4 OR CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>REF(INDEXC,1)*1.056 AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MAX(B3,B4) AND B3<B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MIN(B3,B4) AND B3>B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1))=1,HIGH*1.02,'准备清仓逃顶!'),colorFFFF;   
  37. DRAWTEXT(CROSS(RSI1,80) AND B2>B3 AND COUNT(INDEXC<B4,BARSLAST(CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 AND B3<B4 OR CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>REF(INDEXC,1)*1.056 AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MAX(B3,B4) AND B3<B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MIN(B3,B4) AND B3>B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1))>=5,HIGH*1.02,'准备清仓逃顶!'),colorFFFF;   
  38. DRAWTEXT(CROSS(RSI1,80) AND COUNT(INDEXC>INDEXO,8)=8,HIGH*1.02,'准备清仓逃顶!'),colorFFFF;   
  39. DRAWTEXT(CROSS(VARQS13,75) AND COUNT(CROSS(75,VARQS13),BARSLAST(CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 AND B3<B4 OR CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>REF(INDEXC,1)*1.056 AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MAX(B3,B4) AND B3<B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MIN(B3,B4) AND B3>B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1))=1,HIGH*1.02,'准备清仓逃顶!'),colorFFFF;   
  40. DRAWTEXT(CROSS(99,VARQS13) AND COUNT(VARQS13=100,BARSLAST(CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 AND B3<B4 OR CROSS(INDEXC,VARQS12) AND LLV(INDEXC,24)=LLV(INDEXC,60) AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>REF(INDEXC,1)*1.056 AND INDEXC<MIN(B1,MIN(B2,MIN(B3,B4))) AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MAX(B3,B4) AND B3<B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1 OR CROSS(INDEXC,VARQS12) AND INDEXC>MAX(B1,MAX(B2,MAX(B3,B4))) AND MAX(B1,B2)<MIN(B3,B4) AND B3>B4 AND COUNT(CROSS(INDEXC,VARQS12),13)<=1))>21,HIGH*1.02,'准备清仓逃顶!'),colorFFFF;   

 

问题反馈

蛟龙出海

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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