当前位置:→ 股海网大智慧公式 → 正文
  • ts加bs加未封缺口(源码)

  • 相关简介:C/C++ www.zegu.cn 择股网提供 Code 复制内容到剪贴板 a:= STSFunc@CALSTSL ; R1:= STSFunc@STS_RISK1 ; R2:= STSFunc@STS_RISK2 ; S1:= STSFunc@STS_STS1 ; S2:= STSFunc@STS_STS2 ; TBS:= STSFunc@STS_STSBS ; DN:= STSFunc@STS_STSDN ; UP:=

  • 文章来源:择股网作者:股海网发布时间:2010-05-17浏览次数:下载次数:0

 

C/C++ www.zegu.cn 择股网提供 Code复制内容到剪贴板
  1. a:="STSFunc@CALSTSL";   
  2. R1:="STSFunc@STS_RISK1";   
  3. R2:="STSFunc@STS_RISK2";   
  4. S1:="STSFunc@STS_STS1";   
  5. S2:="STSFunc@STS_STS2";   
  6. TBS:="STSFunc@STS_STSBS";   
  7. DN:="STSFunc@STS_STSDN";   
  8. UP:="STSFunc@STS_STSUP";   
  9.   
  10. 压力位:UP,linethick0,color0000ff,PRECIS2;   
  11. 支撑位:DN,linethick0,color00ff00,PRECIS2;   
  12. 警示位:IF(R1<>0,ABS(R1),IF(R2<>0,ABS(R2),0)),linethick0,colorff00ff,PRECIS2;   
  13. MA5:MA(CLOSE,5),colorFFFFff,PRECIS2;   
  14. MA10:MA(CLOSE,10),color00FFff,PRECIS2;   
  15.   
  16. DRAWLINE(UP>0,UP,UP<>REF(UP,1) OR C=DYNAINFO(7),REF(ABS(UP),1),0),dotline,color0000ff,LINETHICK1;   
  17. DRAWLINE(DN>0,DN,DN<>REF(DN,1) OR C=DYNAINFO(7),REF(ABS(DN),1),0),dotline,color00ff00,LINETHICK1;   
  18. DRAWLINE(UP<0,-UP,UP<>REF(UP,1) OR C=DYNAINFO(7),REF(ABS(UP),1),0),color0000ff;   
  19. DRAWLINE(DN<0,-DN,DN<>REF(DN,1) OR C=DYNAINFO(7),REF(ABS(DN),1),0),color00ff00;   
  20. DRAWLINE(R1>0,R1,R1<>REF(R1,1) OR C=DYNAINFO(7),REF(ABS(R1),1),0),dotline,colorEE88ff;   
  21. DRAWLINE(R2>0,R2,R2<>REF(R2,1) OR C=DYNAINFO(7),REF(ABS(R2),1),0),dotline,colorEE88ff;   
  22. DRAWLINE(R1<0,-R1,R1<>REF(R1,1) OR C=DYNAINFO(7),REF(ABS(R1),1),0),colorEE88ff;   
  23. DRAWLINE(R2<0,-R2,R2<>REF(R2,1) OR C=DYNAINFO(7),REF(ABS(R2),1),0),colorEE88ff;   
  24.   
  25. drawbmp(TBS=1,l*0.96,'STSbuy1.bmp'),align1,valign0;   
  26. drawbmp(TBS=-1,h*1.07,'STSsell1.bmp'),align1,valign0;   
  27. drawbmp(S2=14,l*0.94,'STSbuy.bmp'),align1,valign0;   
  28. drawbmp(S2=-14,h*1.09,'STSsell.bmp'),align1,valign0;   
  29.   
  30. drawtext(S1>0,L,STR(S1)),color00FF00,LINETHICK1,align1,valign0;   
  31. drawtext(S1<0,H*1.03,STR(-S1)),color00FF00,LINETHICK1,align1,valign0;   
  32. drawtext(S2>0 and S2<13,l*0.97,STR(S2)),color0000FF,LINETHICK1,align1,valign0;   
  33. drawtext(S2<0 and S2>-13,H*1.06,STR(-S2)),color0000FF,LINETHICK1,align1,valign0;   
  34. drawtext(S2=13,l*0.97,'+'),color0000FF,LINETHICK1,align1,valign0;   
  35. drawtext(S2=14,l*0.97,'13'),color0000FF,LINETHICK1,align1,valign0;   
  36. drawtext(S2=-13,h*1.06,'+'),color0000FF,LINETHICK1,align1,valign0;   
  37. drawtext(S2=-14,h*1.06,'13'),color0000FF,LINETHICK1,align1,valign0;   
  38.   
  39. b:="LTFunc6@FORLT2";   
  40. s11:="LTFunc6@LT_S1";   
  41. hs:="LTFunc6@LT_HS";   
  42. ls:="LTFunc6@LT_LS";   
  43. p1:="LTFunc6@LT_P1";   
  44. upp:="LTFunc6@LT_UPP";   
  45. udd:="LTFunc6@LT_UDD";   
  46.   
  47. d1:=ema(abs("ddx.ddx"),60);   
  48. d2:=max("ddx.ddx"/d1+7.5,7.5);   
  49. d3:=min("ddx.ddx"/d1,10);   
  50. fb:=if(s11=0,hs,ls);   
  51. tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现S点\n','若明日收盘价> '+numtostrn(upp,2)+',出现B点\n');   
  52. tr1:=ifs(s11=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价> '+numtostrn(hs,2)+'短线买入机会');   
  53. tr2:=ifs(p1=1,ifs(cross(p1,0),'B点','持股'),ifs(cross(1,p1),'S点','持币'));   
  54. tr3:=ifs(s11=0,'向下,','向上,');   
  55. tr4:='3.能量级别:'+numtostrn(d3,1)+'级';   
  56.   
  57. bs:='<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+' 买卖点决策系统提示\n'+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'1.BS 点:'+tr2+','+tr0+'<*t=E7FFFF*><*c=000000*><*p=95*>'+'2. 短线:'+tr3+tr1+'\n'+'<*t=E7FFFF*><*c=000000*><*p=95*> '+tr4;   
  58. drawflagtext(1,fb,bs);   
  59.   
  60. STICKLINE(p1=1 and c>=o and o<>0,c,o,d2,0),color5454ff;   
  61. STICKLINE(p1=1 and c>=o and o<>0,c,o,7.5,0),colorblack;   
  62. STICKLINE(p1=1 and c>=o and o<>0,c,c,7.5,0),color5454ff;   
  63. STICKLINE(p1=1 and c>=o and o<>0,o,o,7.5,0),color5454ff;   
  64. STICKLINE(p1=1 and c>=o and o<>0,o,c,7.5,1),color5454ff;   
  65. STICKLINE(p1=1 and c<=o,o,c,7.5,1),color5454ff;   
  66. STICKLINE(p1=1 and c<=o,l,c,0.5,1),color5454ff;   
  67. STICKLINE(p1=1 and c<=o,h,o,0.5,1),color5454ff;   
  68.   
  69. STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,o,7.5,1),colorffff54;   
  70. STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,h,0.5,1),colorffff54;   
  71. STICKLINE((p1<>1 or barscount(c)<3) and c>=o,l,o,0.5,1),colorffff54;   
  72.   
  73. drawbmp(p1=1 and ref(p1,1)=0,l,'buy1.bmp'),align1,valign0;   
  74. drawbmp(p1=0 and ref(p1,1)=1,h,'sell1.bmp'),align1,valign2;   
  75.   
  76. drawbmp(s11=1 and ref(s11,1)=0 and (p1+ref(p1,1))<>1,l,'bs.bmp'),align1,valign0;   
  77. drawbmp(s11=0 and ref(s11,1)=1 and (p1+ref(p1,1))<>1,h,'ss.bmp'),align1,valign2;   
  78.   
  79. zg8:=FINANCE2(35);{总股}   
  80. lta8:=FINANCE2(36);{流通A}   
  81. sy8:=FINANCE2(3);{收益}   
  82. sl8:=DYNAINFO(39);{市盈率}   
  83. wf8:=FINANCE2(8);{未分}   
  84. gj8:=FINANCE2(7);{公积};   
  85. jz8:=FINANCE2(4);{净资}   
  86. cw8:='总股:'+zg8+' 流通A:'+lta8+' 收益:'+sy8+' 市盈率:'+sl8+' 未分:'+wf8+' 公积:'+gj8+' 净资:'+jz8;   
  87. DRAWTEXTREL(20,10,BKNAME),Coloryellow;   
  88. DRAWTEXTREL(20,60,cw8),COLORAAEEEE;   
  89.   
  90.   
  91. I1:=0;   
  92. flag1:=0;   
  93. while I1<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)   
  94. DO     
  95.         IF REF(H,I1)<REF(L,I1+1) AND REF(L,I1+1)>HHV(H,I1+1)   
  96.            THEN   BEGIN     FLAG1:=1;   
  97.                             S1:=I1;   
  98.                             I1:=BARSLAST(DISPSTATUS=1);                           
  99.                   END   
  100.         ELSE  I1:=I1+1;               
  101.    STICKLINE(FLAG1,REF(L,S1+1),HHV(H,S1+1),(s1+1)*20,0),ColorC0C0C0,ALIGN1,LAYER7;   
  102.   DRAWTEXT(flag1,REF(L,s1+1),NUMTOSTRN(ref(h,s1+1),2)+'-'+NUMTOSTRN(hhV(h,S1+1),2)),ALIGN2,COLORgreen;   
  103.   
  104. I:=0;   
  105. flag:=0;   
  106. while I<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)   
  107. DO     
  108.         IF REF(L,I)>REF(H,I+1) AND REF(H,I+1)<LLV(LOW,I+1)   
  109.            THEN   BEGIN     FLAG:=1;   
  110.                             S:=I;   
  111.                             I:=BARSLAST(DISPSTATUS=1);                           
  112.                   END   
  113.         ELSE  I:=I+1;               
  114.    STICKLINE(FLAG,REF(h,S+1),LLV(LOW,S+1),20*(s+1),500),ColorC0C0C0,ALIGN1,LAYER7;   
  115. DRAWTEXT(FLAG,REF(H,s+1),NUMTOSTRN(ref(h,s+1),2)+'-'+NUMTOSTRN(LLV(LOW,S+1),2)),ALIGN2,COLORgreen;  

 ☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

ts加bs加未封缺口(源码)

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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